Tugas 2.6




Private Sub ketik_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Label2 = ketik.Text
End If
End Sub

Private Sub OK_Click()
Label2 = ketik.Text
End Sub

Private Sub Option1_Click()
Label2.ForeColor = vbBlue
End Sub

Private Sub Option2_Click()
Label2.ForeColor = vbRed
End Sub

Private Sub SELESAI_Click()
End
End Sub

Komentar

Postingan populer dari blog ini

Looping Dan contoh dalam aplikasi java

CONTOH TEKNOLOGI INFORMASI