Cara Membuat Animasi Text dengan VB

Cara Membuat Animasi Text dengan VB

Visual Basic Admin   19:45

Berikut adalah tutorial membuat label atau text dalam vb 6 menjadi seolah diketik

1.       Pertama buka visual basic 6.0

2.       Pilih standar.exe

3.       Masukan 3 buah komponen berikut

a.       Label

b.      Timer dgn property, enabled = false, interval = 300

c.       Command buton dgn property, caption = mainkan

4.       Masukkan listing berikut

Private Sub Command1_Click()

If Command1.Caption = "mainkan" Then

    Timer1.Enabled = True

    Command1.Caption = "Stop"

Else

    Timer1.Enabled = False

    Command1.Caption = "mainkan"

End If

End Sub

Private Sub Form_Load()

Label1.Caption = "K"

End Sub

Private Sub Timer1_Timer()

Select Case Label1

    Case "K"

    Label1.Caption = "KO"

    Case "KO"

    Label1.Caption = "KOM"

    Case "KOM"

    Label1.Caption = "KOMP"

    Case "KOMP"

    Label1.Caption = "KOMPU"

    Case "KOMPU"

    Label1.Caption = "KOMPUT"

    Case "KOMPUT"

    Label1.Caption = "KOMPUTE"

    Case "KOMPUTE"

   Label1.Caption = "KOMPUTER"

    Case "KOMPUTER"

    Label1.Caption = "KOMPUTER D"

    Case "KOMPUTER D"

    Label1.Caption = "KOMPUTER DO"

    Case "KOMPUTER DO"

    Label1.Caption = "KOMPUTER DOT"

    Case "KOMPUTER DOT"

    Label1.Caption = "KOMPUTER DOTC"

    Case "KOMPUTER DOTC"

    Label1.Caption = "KOMPUTER DOTCO"

    Case "KOMPUTER DOTCO"

    Label1.Caption = "KOMPUTER DOTCOM"

    Case "KOMPUTER DOTCOM"

    Label1.Caption = "K"

   

End Select

End Sub

Lalu jalankan dengan menekan tombol F5 pada keyboard, pelajari setiap logika yang di pakai pada program orang lain, maka anda akan mempunyai banyak penyelesaian masalah dalam pembuatan program.

Syntax untuk membuat dan menghapus Folder

Syntax untuk membuat dan menghapus Folder

Visual Basic Admin   00:58

Uitssss... lamaaaa skali nggak update nieh blog (maaf lagi sibuuuk skali ^^). Nah pembahasan kali ini syntax yang berhubungan dengan folder, yakni untuk menyatakan "cinta" (upss salaahhh...) menyatakan folder [Dir$()], membuat folder [MkDir] dan menghapus folder [RmDir]. Emang nieh pembahasan kali ini sangaaattt dasar bangets hehehe....

Oke mari kita bahas satu-satu!

Syntax Dir$()

Digunakan untuk menyatakan sebuah direktori. Statemen ini juga dapat digunakan untuk pencarian file.

Syntax dasar :

stringvar = Dir$(path[,attributes])

Contoh :

If Dir$(“C:/tempe.log”) = “” Then
    MsgBox “File tidak ditemukan”
Else
    MsgBox “File ditemukan”
End if

Penjelasan :

Maksud dari contoh di atas yakni penggunaan fungsi if then else yang kalo di jelasin jika file pada alamat C:/tempe.log adalah kosong ("" tuh maksutnya 0 nol atau kosong) maka akan muncul message box yang isinya "File tidak ditemukan", else tuh kalau sebaliknya jika file dengan alamat tersebut ada maka yang muncul message box "File ditemukan", kira-kira begitu penjelasannya hehehe...

Syntax MkDir

Digunakan untuk membuat folder baru.

Syntax dasar :

MkDir path

Contoh :

MkDir “c:\VisualBasic\”

Penjelasan :

Saya rasa cukup jelas lah, cuman yang harus diperhatiin untuk penulisan path nya yang agak berbeda dari syntax Dir$(), kalo untuk mencari file atau menyatakan direktori tuh path nya pake tanda "/" tetapi untuk membuat dan menghapus folder memakai tanda "\", inget yah beda banget tuh!

Syntax RmDir

Digunakan untuk menghapus folder.

Syntax dasar :

RmDir path

Contoh :

RmDir “c:\VisualBasic\”

Penjelasan :
hehehe...idem lah seperti penjelasan syntax MkDir.

Oke sekian dulu pembahasan syntax kali ini, thank's udah ngebaca...^^

Cara Memainkan lagu/suara Saat Form di Load

Cara Memainkan lagu/suara Saat Form di Load

Visual Basic Admin   09:48

Cara paling mudah untuk memainkan lagu/suara saat form di load pada VB adalah dengan menggunakan komponen Windows Media Player. Tak perlu input komponen tambahan, karena sudah tersedia dari sononya.

Yang diperlukan :
1 Form
1 Timer (ubah interval-nya jadi 100)
1 WindowsMediaPlayer (Jika belum ada, tambahkan dengan menekan CTRL+T, dan ceklis komponen “Windows Media Player”)
Lagu/suara yang akan dimainkan (simpan 1 folder dengan project VB nya)

Source code :

1	Private Sub Form_Load()

2	WindowsMediaPlayer1.URL = App.Path & "\sound.mp3"

3

End Sub

4

5	Private Sub Timer1_Timer()

6	WindowsMediaPlayer1.Controls.play

7

End Sub

Anda juga bisa mengganti lagu yang sesuai dengan kebutuhan anda, caranya dengan memasukkan dan menyimpan file lagu di dalam satu satu folder programnya.

Untuk lebih jelasnya, Download Source Code  nya.

Membuat Windows Media Player menggunakan vb 6.0

Membuat Windows Media Player menggunakan vb 6.0

Visual Basic Admin   08:36

Membuat mp-dengan-menggunakan-vb-6.0

View more documents from oonaries