본문 바로가기
프로그래밍 놀이터/C, C++, C#, VB

[VB] 이미지 불러와서 Resize 해서 PictureBox 에 붙이기.

by 돼지왕 왕돼지 2013. 5. 18.
반응형



 이미지 불러와서 Resize 해서 PictureBox 에 붙이기

 

Visual Baisc, VB, VB6Visual Basic 6.0


지인의 부탁으로 초등학교 5학년 때 이후 처음으로 Visual Basic 을 만져보았다.

뭔가 VB 가 엄청나게 쓰이고 있다고는 하지만, 의외로 소스도 매우 부족하고,

요즘 Hot 한 아이템이 아니라 그런가 전문자료도 부족한 것 같다.

( 많은 Blogger 들이 VB 를 다루고 있지 않음.. ㅠ )


그래서 이미지 불러와서 Resize 해서 PictureBox 에 넣는 것
구글링을 열심히 하고, Reference Doc 도 보고 하면서 여러가지 실험 끝에 완성..

그 샘플코드를 공유하고자 한다.

Private Sub SetPictureWithScale(fileName As String)
    Dim myPic As StdPicture
    Set myPic = LoadPicture(App.Path & "\" & fileName & ".jpg")
    Picture1.PaintPicture myPic, 0, 0, 3000, 3000
End Sub


먼저 LoadPicture 를 통해 return 되는 값의 Type 은 StdPicture Type 이다.

이 녀석은 Tutorial 에 안 나와있어서 검색해서 찾았다.






두번째는 Set 문.

Reference 문서에 따르면, 변수에 값을 할당할 때 자동으로 Set 이 호출된다고 하는데,

Set myPic 과 같이 Set 을 명시적으로 써주지 않으면 할당에서 에러가 발생한다.

이 부분에 대해서는 정확한 원인을 조금 더 찾아보던가

책을 보면서 VB 의 Syntax 를 확실히 이해한 다음에 다시 포스팅 해야 할 것 같다.


세번째는 PaintPicture 함수.

이 녀석은 인자로 source, x-pos, y-pos, width, height 를 받는다.

( optional 값들이 더 있다. )

특이한 것은 이 때 함수 call 을 이야기하는 ( ) 를 쓰면 또 컴파일 에러가 난다.

이 녀석도 syntax 에 대한 이해가 더 필요할 것 같다.


VB 를 어느정도라도 이해하고 사용하기 위해서는

이 Language 의 syntax 이해가 시급하다고 보인다...

그렇지 않으면 언제나 구글링에 많이 의존해야 할듯.

공부할 것이 하나 더 생겼다.



반응형

댓글