Supaya saat kita pencet tombol 'Enter' tidak usah keluar bunyi
Private Sub Text1_Keypress(KeyAscii As Integer)
If keyAscii = vbKeyReturn Then
'Kode .....
KeyAscii = 0
End If
End Sub
Semoga bermanfaat ......
Private Sub Text1_Keypress(KeyAscii As Integer)
If keyAscii = vbKeyReturn Then
'Kode .....
KeyAscii = 0
End If
End Sub
Semoga bermanfaat ......
0 komentar:
Post a Comment