Pencarian

TERBARU

Undangan digital/Video khitanan power point (pptx)

Assalamualaikum, selamat siang pada siang hari ini saya akan berbagi sebuah desain atau sebuah template undangan digital yaitu undangan digi...

Jumat, 21 Maret 2014

Membuat Text Berjalan trik Microsoft Visual Basic 6.0

Langkah Pertama Anda Buatlah
1. Timer
dan
1. Label
seperti gambar dibawah ini :
Setelah membuat
1 Timer
dan
1 Label

Sekarang anda Klik 2x pada label
Selanjutnya silahkan anda ketik source code seperti dibawah ini :

Private Sub Form_Load()
Timer1.Interval = 150
Label1.Caption = "SEMOGA BERMANFAT "
End Sub


Lihat gambar :
KLIK PADA GAMBAR UNTUK PERBESAR
Selanjutnya anda klik 2x pada Timer
Lalu ketik source code seperti dibawah ini :

Dim Kalimat As String
Kalimat = Label1.Caption
Label1.Caption = Mid(Kalimat, 2) & Left(Kalimat, 1)


setelah anda ketik maka hasilnya seperti gambar dibawah ini :
KLIK PADA GAMBAR UNTUK PERBESAR
Selesai
coba sekarang anda Tes berhasil atau Tidak caranya tekan F5
atau klik RUN....

Jika berhasil maka hasilnya seperti gambar dibawah ini :
KLIK PADA GAMBAR UNTUK PERBESAR
SELAMAT MENCOBA SEMOGA BERMANFAAT
Mau download Project_nya Buat belajar ?
Silahkan download disini sob

Download Project Text Berjalan VB6

Tidak ada komentar:

Posting Komentar

Popular Posts