JUAL SSH UNTUK INTERNET UNLIMITED HANYA 20.000 / BULAN, JOIN GRUP INTERNET SOLUTION

Masukkan Kata Kunci Pencarian Anda Disini

Loading...

Saturday, 16 July 2011

Menampilkan dan Menghapus Data di VB. Net 2010

Siapkan Form Application pada VB. Net 2010
vb.net 2010
Masukkan Code berikut ini

Public Class Form1
    '---mengisi tindakan pada object Form dengan metode Load
    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        '---mengisi properti pada object Form       
Me.Text = "Latihan Menampilkan dan Menghapus Data"
        Me.ControlBox = False
        Me.BackColor = Color.PeachPuff
        Me.StartPosition = FormStartPosition.CenterScreen

        '---mengisi properti pada object Label
        Me.LbNim.Text = "No. Induk Mahasiswa"
        Me.LbNama.Text = "Nama Lengkap"
        Me.LbKelamin.Text = "Jenis Kelamin"
        Me.LbAlamat.Text = "Alamat Lengkap"
        Me.LbKota.Text = "K o t a"

       '---mengisi tindakan pada objek Button        Me.BtList.Text = "&List"
        Me.BtClear.Text = "&Clear"
        Me.BtExit.Text = "&Exit"
    End Sub
   '---mengisi tindakan pada objek Button list dengan metode Click
    Private Sub BtList_Click(sender As System.Object, e As System.EventArgs) Handles BtList.Click
        Me.TxtNim.Text = "2011-001"
        Me.TxtNama.Text = "Anak Rantau"
        Me.TxtKelamin.Text = "Laki-laki"
        Me.TxtAlamat.Text = "Jatirasa Barat, Karang Pawitan"
        Me.TxtKota.Text = "Karawang"

    End Sub
   '---mengisi tindakan pada objek Button Clear
    Private Sub BtClear_Click(sender As System.Object, e As System.EventArgs) Handles BtClear.Click
        Me.TxtNim.Clear()
        Me.TxtNama.Clear()
        Me.TxtKelamin.Clear()
        Me.TxtAlamat.Clear()
        Me.TxtKota.Clear()
        Me.TxtNim.Focus()
    End Sub
    '---mengisi tindakan pada button Exit    Private Sub BtExit_Click(sender As System.Object, e As System.EventArgs) Handles BtExit.Click
        Me.Close()
    End Sub
End Class

Save dan coba di loading.., akan tampil seperti ini
vb.net 2010
vb.net 2010
selamat mencoba….
Atau download program disini.

1 comment:

  1. Terima kasih kawan sudah berbagi,,, untuk yang ingin lebih menguasai tentang Vb.net dan databasenya bisa kunjngi blog ane...
    Ok, di tunggu..

    ReplyDelete

Gunakan bahasa yang baik dan sopan. Komentar yang berbau SARA akan di HAPUS / DELETE.
Komentar akan muncul setelah mendapat persetujuan dari Admin Anak Rantau.