Membuat InputBox di VB.NET

Ini Tutorial ke-dua ,hari ini kita akan membuat program sederhana yaitu program input box

seperti biasa buka VB.NET

Buat Project baru dengan cara : File->New Project->beri nama "Program ke-dua saya"->pilih Windows Forms Application->OK

tampilan akan seperti berikut :

 

Di bagian Toolbox sebelah kanan atas,tambahkan satu button,beri nama button tersebut "buka aku" dengan cara dibagian properties "Text" lalu beri nama.

Click 2 kali Button tersebut dan masukan coding sebagai berikut :

Public Class Form1 Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click Dim x As String 'membuat x sebagai variable String x = InputBox("Masukan kata : vbnetsite.blogspot.com", "Masuk") 'bagian dimana inputbox dibuat If x = "vbnetsite.blogspot.com" Then 'bila memasukan vbnetsite.blogspot.com MessageBox.Show("Success") 'pesan muncul success System.Diagnostics.Process.Start("http://vbnetsite.blogspot.com") 'membuka laman http://vbnetsite.blogspot.com Else MessageBox.Show("It's Wrong") 'pesan muncul jika salah memasukan site tersebut End If End Sub End Class 



 Untuk menjalankan program tersebut tekan F5

Jika Anda masih bingung silakan KOMENTAR di bawah :)
-----------------------------------------------------------------------------------------------------------------------
sumber : http://vbnetsite.blogspot.com

Share this on your favourite network

• Facebook
• Twitter
• Google+
• Pinterest
• StumbleUpon
• Delicious
• LinkedIn
• Reddit
• Technorati