Kamis, 19 Desember 2013

Membuat Aplikasi “Hello, World!” dengan menambah kontrol secara dinamis pada saat di jalankan di Visual Basic.NET 2010

Hello_World.NET

Kalau pada posting sebelumnya saya sudah menerangkan cara menambahkan kontrol secara dinamis pada saat form di jalankan di Visual Basic 6.0 kini saya mencoba menerangkan cara ini melalui Visual Basic.NET 2010. Bagi teman-teman yang belum sempat membacanya ? teman-teman dapat membacanya di sini. Pada dasarnya ketertarikan saya menggunakan metode ini dikarenakan sebuah listing program Visual Basic.NET yang mengimplementasikan metode ini dalam pembuatan aplikasinya dan dari situlah saya berfikir apa cara ini bisa diterapkan pada Visual Basic 6.0 dan ternyata bisa. Walaupun cara penerapannya yang sangat berbeda tetapi tujuannya sama.

1. Jalankan terlebih dahulu aplikasi Visual Basic 2010

2. Pada tabulasi “Start Page” pilih “New Project” atau bisa juga dengan menekan tombol “Ctrl + N” pada keyboard

Start Page VB.NET Crop

3. Setelah muncul jendela “New Project” pilih “Windows Forms Application” kemudian tekan tombol “OK

New Project VB.NET

4. Lalu pada jendela “Solution Explorer” yang berada pada pojok kanan atas, pilih “View Code

Solution Explorer VB.NET

5. Setelah jendela “Form1.vb” terbuka copy semua listing code di bawah ini kemudian paste-kan di sana

 

Public Class Form1
Dim cmdClickHere As New Button

Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
With Me
.Text = "Hello World"
.CenterToScreen()

.Controls.Add(cmdClickHere)
End With

With cmdClickHere
.Text = "Click Here"
.Location = New Point(Me.Size.Width - 190, Me.Size.Height - 180)
End With

AddHandler cmdClickHere.Click, AddressOf cmdClickHere_Click
End Sub

Private Sub cmdClickHere_Click(ByVal sender As Object, ByVal e As EventArgs)
MsgBox("Hello, World!", MsgBoxStyle.Information, "Information")
End Sub
End Class



6. Setelah itu klik tombol “Start Debugging” pada “Command Bar” atau bisa juga menekan tombol “F5” pada keyboard


Start Debuging VB.NET

Label:

0 Komentar:

Posting Komentar

Berlangganan Posting Komentar [Atom]

<< Beranda