Tugas 1. Membuat Input Data Mahasiswa STMIK PRINGSEWU Menggunakan Visual Basic 6.0

Tugas 1. Input Data Mahasiswa STMIK PRINGSEWU

Gambar. Tampilan Form Input Data Mahasiswa

Berikut adalah source code dari tampilan di atas:

Private Sub Lagi_Click()

    Npm.SetFocus

    Npm = ""

    Nama = ""

    Alamat = ""

End Sub

Private Sub Batal_Click()

    Npm.SetFocus

    Npm = ""

    Nama = ""

    Alamat = ""

End Sub

Private Sub Keluar_Click()

    End

End Sub

Private Sub Npm_KeyPress(KeyAscii As Integer)

    If KeyAscii = 13 Then

    Nama.SetFocus

    End If

End Sub

Private Sub Nama_KeyPress(KeyAscii As Integer)

    If KeyAscii = 13 Then

    Alamat.SetFocus

    End If

End Sub

Related Posts:

Tweet