728x90
Private Sub Text1_KeyPress(KeyAscii As Integer)
' text1에서 Enter 입력시 특정 폼으로 이동되는 소스
If KeyAscii = Asc(vbCr) Then add.SetFocus ' 아스키코드값이 vbCr이 입력되면 add로 이동
' 여기서 add 는 Caption 이름
End Sub
' text1에서 Enter 입력시 특정 폼으로 이동되는 소스
If KeyAscii = Asc(vbCr) Then add.SetFocus ' 아스키코드값이 vbCr이 입력되면 add로 이동
' 여기서 add 는 Caption 이름
End Sub
Asc(vbcr) 이 무엇인가요?
ASC는 Visual Basic에서 제공하는 함수로서
()안의 문자를 ASCII(아스키)코드 숫자로 변환시키는 함수입니다.
즉 ASC(vbCr)의 뜻은 ()안의 문자인 vbCr을 아스키코드 숫자로
변환시킨다는 뜻입니다.
참고로 vbCr은 Career Return(즉 엔터키)을 말합니다.
'2020 이전 자료 > Visual Basic 6.0' 카테고리의 다른 글
VB IF문 알아보자. (0) | 2008.06.09 |
---|---|
VB 인터넷창을 띄어보자! (0) | 2008.06.06 |
VB 폼안에서 인터넷 실행하기. (0) | 2008.06.06 |
VB 변수선언 방법 (0) | 2008.06.01 |
VB Form1 에서 Form2 열고 닫기 (0) | 2008.06.01 |
VB 주석다는 방법 (0) | 2008.05.26 |
VB 커멘더 버튼 클릭시 인터넷창을 띄어보자! (0) | 2008.05.24 |
VB TextBox 줄바꿈 기능 사용하기. (1) | 2008.05.24 |
VB CommandButton에 단축키 설정방법 (0) | 2008.05.24 |