Halaman

Rabu, 21 Maret 2012

Bekerja dengan Control Object pada VB2010


Controls di VB 2010 merupakan berbagai macam tools yang bias diletakkan pada form. Tools befungsi untuk membuat berbagai macam jenis aplikasi windows. Ada beberapa kategori dalam Tools yaitu: Common Controls, Containers, Menus, Toolbars, Data, Components, Printings dan Dialogs. Pada kesempatan ini, kita akan focus untuk membahas Common Controls. Adapun beberapa bagian dari Common controls antara lain: Button, Label, ComboBox, ListBox, PictureBox, TextxBox, dll. Untuk memasukkan control object ke dalam form, kita cukup meng-drag salah satu control object dan drop ke dalam form. Anda bias mengubah letak control objek dan mengubah ukurannya sesuai kebutuhan.

Menggunakan TextBox
Pada program berikut, anda akan memasukkan 2 TextBox, 3 Labels dan 1 Button. 2 textbox berfungsi untuk memasukkan 2 nomor, 1 label berfungsi untuk menampilkan operator matematika dan label lainnya untuk menampilkan tanda sama dengan (=). Label terakhir untuk menampilkan hasil.

Source code:
PrivateSub Button1_Click(ByVal sender AsSystem.Object, ByVal e AsSystem.EventArgs)
Dim num1, num2, product As Single
        num1 = TextBox1.Text
        num2 = TextBox2.Text
product = num1 * num2
        Label3.Text = product
EndSub
Menggunakan ListBox
Pada program ini akan ditambahkan 1 item yang ada pada textbox ke dalam listbox dengan cara meng-klik button.
Source code:
PrivateSub Button1_Click_1(ByVal sender AsSystem.Object, ByVal e AsSystem.EventArgs) Handles Button1.Click
Dim item AsString
item = TextBox1.Text
'untuk menambahkan item kedalam listbox
ListBox1.Items.Add(item)
        TextBox1.Text = ""
EndSub




Menggunakan Picture Box
            Pada program ini, kita akan memasukkan picturebox dan button ke dalam form. Pastikan untuk mengubah setting picturebox pada SizeMode di properties menjadi StretchImage.
 



Source code:
Private Sub Button1_Click(ByVal sender AsSystem.Object, ByVal e AsSystem.EventArgs) Handles Button1.Click
'untukmeloadgambarkedalampicturebox
        PictureBox1.Image = Image.FromFile("c:\Users\Public\Pictures\Sample Pictures\Koala.jpg")
End Sub
Untuk mendapatkan file pdf nya, silahkan klik  download

Tidak ada komentar:

Posting Komentar