Kursus Programmer Online 
Skip Navigation Links
Home
Kursus online
Toko online
Layanan
Forum
Social programmer
E-book
Peta situs
Tentang saya
Donasi
Halo " !" | Login

Skip Navigation Links.
Expand Artikel Visual BasicArtikel Visual Basic
Expand Basis Data - DatabaseBasis Data - Database
Expand Pemrograman GrafisPemrograman Grafis
Expand E-Book TutorialE-Book Tutorial
Expand Video Kursus - TutorialVideo Kursus - Tutorial
Expand Software - Open Source codeSoftware - Open Source code
Expand W E B  ProgrammingW E B Programming
Expand Windows SystemWindows System
Expand XBasicFrameworkXBasicFramework
Expand Berbagi PengalamanBerbagi Pengalaman
Expand Quick BasicQuick Basic

Belajar Program dgn Saya 
HyperLink Siapa bilang belajar program  SULIT!!  Otodidak juga bisa.  ANDA bisa Jadi PROGRAMMER handal.  Baca E-Book  Saya di sini...!

kursus programmer online

Jika ANDA telah membeli E-book Saya belum juga bisa membuat program... Saya yang akan "Turun Tangan Langsung" mengajarkannya kepada ANDA                   
















Software Gratis 
Software gratis! Open Source Code

Banner 

HyperLink

HyperLink


Chat dengan Saya 

Chat dengan Saya

HyperLink


Hit Counter 


Skip Navigation LinksMENU>Artikel Visual Basic>Visual Basic .NET>Scoope Variable


Scoope Variabel
                                                                                                                                             
Kode pada modul:
Module Module1

  Public sNama As String

End Module


kode pada form:

Public Class Form1

Private sKota As String

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

  sNama = "Visual basic Net"
  TextBox1.Text = sNama

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

  sKota = "Medan"
  TextBox1.Text = sKota

End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

  Dim sNegara As String = "Indonesia"
  TextBox1.Text = sNegara

End Sub

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click

  TextBox1.Text = snegara

End Sub

End Class


Di bawah ini adalah gambar demo programnya:


sNegara dinyatakan error  Name “snegara” is not declared.
Ini disebabkan variable sNegara yang dinyatakan dengan
Dim sNegara As String = "Indonesia" yang dinyatakan pada Button3_click hanya berlaku local. Tidak dapat dibaca dari sub prosedur lain (Button4_click).


Download Project   klik di sini

Untuk memperoleh penjelasan yang lebih detail anda dapat membaca E-Book saya yang berjudul TRIK DASAR BELAJAR VISUAL BASIC .NET 2005 klik di sini
 




  (C)XBasicPro 2012 | Kursus Programmer Online | Software Gratis | Open Source Code | Sewa Toko Online