반응형
Private Sub vas_DblClick(ByVal Col As Long, ByVal Row As Long)
Dim num As String
vaS.Row = Row: vaS.Col = 1: num = vaS.Text
Load frmMemIns
frmMemIns.txtnum = num
frmMemIns.State = -1
frmMemIns.Show
frmMemIns.cmdSearch = True
End Sub
스프레드를 클릭해서 매개변수를 넘겨 받아 다른 폼을 로드해서
값을 넘기는 부분이다.
자주 쓸거 같아 메모 해둔다.
반응형
'Developer > VB6' 카테고리의 다른 글
VB6 에서 다음 우편번호검색 Api 사용하기 / 주소검색 /VB6 / 도로명/ 도로명주소 (1) | 2016.01.21 |
---|