Membuat Tulisan Berjalan di VB 6

Membuat tulisan berjalan Di VB 6 | Hai Sahabat source code aplikasi kali ini saya akan memberikan sebuah tutorial yang berjudul Membuat tulisan berjalan Di VB 6. Sebelum memulai siapkan aplikasi VB 6.

Langkah 1

Setelah itu buatlah 1 Buah Label dan 1 Buah Timer

Langkah 2

double klik form dan masukkan script berikut :

Private Sub Form_Load()
Label1.FontSize = 15
Label1.Font = Verdana
Label1 = "Membuat tulisan berjalan di VB oleh Bramanda"
End Sub
 
Private Sub Timer1_Timer()
If (Label1.Left + Label1.Width) <= 0 Then
Label1.Left = Me.Width
End If
Label1.Left = Label1.Left - 100
End Sub

Nanti susunan scriptnya akan seperti berikut :

Langkah 3

Jalankan file dengan menekan F5 atau tombol start. maka hasilnya akan sebagai berikut :

sumber : jagokoding, ditulis oleh : Bramanda Febri S