Private Sub txtnama_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
txtalamat.SetFocus
End If
End Sub
Private Sub txtnpm_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
txtnama.SetFocus
End If
End Sub
Langganan:
Posting Komentar (Atom)
tugas 6 pengolahan citra
Nama : Ayunda Mugiarsih Kelas : Line 1 TKJ NPM : 17100024 Tugas 6 Gamabar hasil Penjelasan Cgreyscale adalah suatu ci...
-
Private Sub cmdbatal_Click() txtn1 = "" txtn2 = "" txtn3 = "" txtn4 = "" txtn5 = &... -
Private Sub chkb_Click() If chkb.Value = 1 Then lbl1.FontBold = True Else lbl1.FontBold = False End If End Sub Private Sub chki_Click() ...
Tidak ada komentar:
Posting Komentar