Tugas1. Bahasa Pemrograman Membuat Data Mahasiswa menggunakan Visual Basic

hermin4hermin3

Private Sub HerminBatal_Click()
HerminNpm.SetFocus
HerminNpm = ” ”
HerminNama = ” ”
HerminAlamat = ” ”

End Sub

Private Sub HerminKeluar_Click()
End

End Sub

Private Sub HerminLagi_click()
HerminNpm.SetFocus
HerminNpm = ” ”
HerminNama = ” ”
HerminAlamat = ” ”

End Sub

Private Sub HerminNama_keypress(keyascii As Integer)
If keyascii = 13 Then
HerminAlamat.SetFocus
End If

End Sub

Private Sub HerminNpm_keypress(keyascii As Integer)
If keyascii = 13 Then
HerminNama.SetFocus
End If
End Sub

 

Advertisements

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out /  Change )

Google+ photo

You are commenting using your Google+ account. Log Out /  Change )

Twitter picture

You are commenting using your Twitter account. Log Out /  Change )

Facebook photo

You are commenting using your Facebook account. Log Out /  Change )

Connecting to %s