Jadikan hidup lebih bermakna.... Penuh semangat dan motivasi.... Wujudkan diri dengan karya dan bukti nyata.............................. Jadilah inspirasi untuk anak negeri....Kebanggaan diri sendiri.... Kebanggaan Keluarga.... Kebanggaan Bangsa dan Negara....
INDRA YUSUF_gcoz.blogspot

Selasa, 29 Maret 2011

Program4. Vb.Net (latihan materi)


Membuat program VB
toolnya menggunakan : textboox, label, button, dan listview.

"Listview" yaitu tempat penyimpan data sementara

Tampilan form sebagai berikut :




Syntax programnya sebagai berikut :

Public Class Form1
Dim listtxt(3) As String
Dim listitem As ListViewItem

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
listtxt(0) = Trim(TextBox1.Text)
listtxt(1) = Trim(TextBox2.Text)
listtxt(2) = Trim(TextBox3.Text)

listitem = New ListViewItem(listtxt)
ListView1.Items.Add(listitem)
End Sub

Sub setlistview()
ListView1.View = View.Details

ListView1.Columns.Add("NPM", 100, HorizontalAlignment.Center)
ListView1.Columns.Add("Nama", 100, HorizontalAlignment.Left)
ListView1.Columns.Add("Alamat", 100, HorizontalAlignment.Left)
End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Call setlistview()
End Sub

Private Sub ListView1_ItemSelectionChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.ListViewItemSelectionChangedEventArgs) Handles ListView1.ItemSelectionChanged
TextBox4.Text = e.Item.Text
End Sub
End Class


Hasil Runningnya :


Program ini menggunakan listview sebuah penyimpanan sementara tidak menggunakan atau link ke database. Semua data yang tersimpan disini hanya sementara dan akan hilang ketika program di tutup.

Selamat mencoba...


.

0 komentar:

Posting Komentar

INDRA YUSUF_gcoz.blogspot

B.Inggris

Join yuuu...

BISNIS ONLINE

Bisnis 100% Tanpa Modal

idebagus

Web hosting dan domain gratis untuk website di IdeBagus

BISNIS GRATIS