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

Popular posts from this blog

Cara Merangsang Klitoris Wanita

Membuat nomor urut secara otomatis pada database MySQL menggunakan php