Cara Membuat Text Ketikan Di Vb 6.0



Buatlah Form Seperti Dibawah Ini:
Memuat foto
Klik Dua Kali Pada Form,Pilih General,Lalu Ketiklah Listing Dibawah Ini:
Option Explicit
Dim Teks As String
Dim i As Integer
Dim digit As Integer

Private Sub Timer1_Timer()
Teks = "http://herfikom.wordpress.com.. "
If digit > Len(Label1) Then digit = -1
digit = digit + 1
Label1.Caption = Mid(Teks, 1, digit)
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