Membuat Text Berjalan Kiri Dan Kanan Di Vb 6.0

Buatlah Form Seperti Di Bawah Ini:

Memuat foto
Ketiklah Listing Seperti Di Bawah Ini:

Private Sub Command1_Click()
 End
End Sub

Private Sub Form_Load()
  Label1 = "http://herfikom.wordpress.com     "
  Label2 = "www.herfikom.hexat.com     "
End Sub

Private Sub Timer1_Timer()
  s$ = Label1
  s$ = Right$(s$, 1) & Mid$(s$, 1, Len(s$) - 1)
  Label1 = s$
 
  s$ = Label2
  s$ = Mid$(s$, 2, Len(s$)) & Left$(s$, 1)
  Label2 = s$
End Sub






Program ini dibuat oleh Heri Afrizal di Bireuen

Komentar

Postingan populer dari blog ini

Tutorial Membuat Kalender Menggunakan Publisher 2007

Program Mencari Bilangan Prima Dengan Vb 6.0

Cara Membuat File PDF dari Microsoft Word