Tadi sebelumnya saya sudah memberikan contoh bagaimana membuat variabel lokal, untuk tutorial berikutnya yaitu membuat variabel global, sebelum mengikuti tutorial ini siapkan secangkir teh atau kopi kesukaan biar rileks kalo engga ada juga boleh, lanjut jika sebelumnya sudah mengikuti project awal di Cara Membuat Variabel Lokal Di Visual Basic 2010 bisa langsung buat form2 atau yang mau langsung disini new project saja jadinya form1.
1. Buat Project baru, dengan nama bebas/yang sudah mengikutin tutorial sebelumnya Cara Membuat Variabel Lokal Di Visual Basic 2010 lanjut buat form baru dengan nama form2.
3. Tambahkan kontrol ke form seperti gambar diatas dan atur propertinya sepert tabel berikut.:
Object | Properties | Nilai |
Form1/Form2 | Name Text | Form1/Form2 Variabel Global |
Button1 | Name Text | BtnExit Exit |
4. Klik ganda pada form kemudian beri kode program berikut :
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim tutup As String
End Sub
Dim tutup As String
End Sub
5. Klik ganda pada BtnExit kemudian beri kode program berikut :
Private Sub BtnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnExit.Click
Dim tutup As String
tutup = MessageBox.Show("Anda yakin tutup form ini ?", "Global Variabel", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If tutup = MsgBoxResult.Yes Then
Application.Exit()
Else
End If
End Sub
End Class
Dim tutup As String
tutup = MessageBox.Show("Anda yakin tutup form ini ?", "Global Variabel", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If tutup = MsgBoxResult.Yes Then
Application.Exit()
Else
End If
End Sub
End Class
6. Hasilnya sama yang seperti variabel lokal tetapi ketika di start debugging bedanya ketika pilih yes seluruh form akan keluar semua.
0 komentar: