Loading halaman Tutorial Visual Basic, Delphi, PHP - Calon Programer : Scroll text visual basic ...

Untuk kalian yang ingin design animasi pada visual basic, ini ada animasi text berjalan atau scrolling text. Mungkin kalian biasa lihat seperti di form about atau di form lainnya.
Gimana cara buat scrolling text di visual basic??
Cara pertama ada yang menggunakan manual yang membutuhkan satu komponen timer. Tapi kali ini yang akan saya bahas adalah file .ocx khusus untuk membuat animasi scrooling text.
Lebih mudah dan cepat daripada kalian buat secara manual dengan menggunakan timer.
Sample nya :
Untuk listing nya :
  1. Private Sub Command1_Click()  
  2. 'memulai scroll  
  3. scroltext1.scrolstart  
  4. End Sub  
  5.   
  6. Private Sub Command2_Click()  
  7. 'menghentikan scroll  
  8. scroltext1.scrolstop  
  9. End Sub  
  10.   
  11. Private Sub Form_Load()  
  12. scroltext1.scrolstart  
  13. cap = "Contoh text 1" & vbCrLf  
  14. cap = cap & "Contoh text 2" & vbCrLf  
  15. cap = cap & "Contoh text 3"  
  16. scroltext1.Caption = cap  
  17. End Sub  
Baris listing diatas itu dari keseluruhan listing dari sample. Dimana dapat kalian lihat untuk animasi scrolling text dapat di mulai dan di hentikan secara manual.
Perhatikan listing berikut :
  1. scroltext1.scrolstart 'untuk mulai scroll  
  2.   
  3. scroltext1.scrolstop 'untuk menghentikan scroll  

Lalu untuk menabahkan text yang mau di buat scroll ada pada listing berikut:
  1. cap = "Contoh text 1" & vbCrLf 'vbCrLf perintah untuk pindah baris  
  2. cap = cap & "Contoh text 2" & vbCrLf  
  3. cap = cap & "Contoh text 3"  
  4. scroltext1.Caption = cap  

Untuk Download sample project scrolling text link ada di tombol bawah ini:
 | Calon Programer
Semoga bermanfaat :)

Klik Like/share jika anda menyukai tulisan Share


0 Reply :

Posting Komentar

Jika ada pertanyaan atau request,Komentar pada tab blogger akan lebih memudahkan saya untuk membalasnya karena lebih mudah melakukan pengecekan komentar.