Visual Basic ( mendisplay sebuah tampilan )

Koding :

Private Sub Command2_Click() 'Clear
Text1.Text = ""

End Sub

Private Sub Command3_Click() 'Exit
Unload Me

End Sub

Private Sub Command1_Click() 'Display
Dim Tampil1, Tampil2, Tampil3, Tampil4, Enter
Enter = Chr(13) + Chr(10)
Tampil1 = ""
Tampil2 = "STIE - STMIK IBBI"
Tampil3 = "Jln. Sei Deli No.18"
Tampil4 = "Medan - Indonesia"
Text1.Text = Tampil1 + Enter + Tampil2 + Enter + Tampil3 + Enter + Tampil4
End Sub

Tampil Run

Ganti teks ini dengan informasi mengenai permalink atau apapun di sini.
<a href="http://baim-blogs.blogspot.com/2013/09/visual-basic-mendisplay-sebuah-tampilan.html">Visual Basic ( mendisplay sebuah tampilan )</a>