Camera is a responsive/adaptive slideshow. Try to resize the browser window
It uses a light version of jQuery mobile, navigate the slides by swiping with your fingers
It's completely free (even though a donation is appreciated)
Camera slideshow provides many options to customize your project as more as possible
It supports captions, HTML elements and videos.
  • Membuat musics player dengan Visual basic 6.0

    Baiklah saya akan mencoba menjelaskan tentang pembuatan aplikasi Music player ini yang dimana component sederhana yang di gunakana pada menu toolbox.temen-temen pasti hobi sekali bermain komputer
    sambil mendengar musik atau apalagi online sambil mendengarkan musik itu sangat mengasikkan, program yang anda buka pasti kalau bukan winamp, windows media player, GOM player atau yang lainnya.

    Tapi kali ini kita akan membuat sendiri aplikasi pemutar musik atau mp3 player tersebut dengan Visual basic, pasti anda menyangka sangat sulit untuk membuat aplikasi tersebut, jika prediksi saya itu benar berarti selama ini temen-temen salah besar karena dalam membuat program aplikasi mp3 player dengan program visual basic wah itu sangat mudah sekali, berikut tutorialnya...

    1. Jalankan program VB anda kemudian buat new project dan tetap pilih standar.exe
    2. Klik Menu Project >> Components (CTRL+T) kemudian pilih dan tandai Microsoft Common Dialog Control 6.0 dan Microsoft Multimedia Control 6.0 >> OK
    3. Lalu tambahkan pada form proyek anda 2 buah label, 2 commandbutton, satu CommonDialog dan MMControl, desainlah seperti dibawah ini dan untuk picture background terserah anda

    Lihat Statistik Gambar di atas!!
    4. Aturlah properties masing-masing object seperti dibawah ini :kemudian ketikkan kode/listing/script program dibawah ini :

    Private Sub Command1_Click()
    On Error GoTo loncat
    MMControl1.Command = "stop"
    CommonDialog1.ShowOpen
    MMControl1.FileName = CommonDialog1.FileName
    MMControl1.Command = "open"
    Label1.Caption = CommonDialog1.FileTitle
    loncat:
    Exit Sub
    End Sub

    Private Sub Form_Unload(Cancel As Integer)

    MMControl1.Command = "stop"
    End Sub

    Private Sub Command2_Click()

    End
    End Sub

    6. Save hasil kerja anda dan kemudian silahkan run program anda dengan menekan F5, lalu klik open dan ambil lagu kesayangan anda lalu klik tanda play,,selamat mendengarkan

    Terima Kasih .Semoga Bermanfaat
  • You might also like

    Tidak ada komentar:

    Posting Komentar