Materi Drive, File, Dan Dir ( List Box )
Sunday, November 24, 2013 @ 9:06 AM | 0 Comment Box(s)
1. Pengertian
- Drive List Box Adalah Salah Satu Fasilitas Tool Box Dalam Program Visual Basic 6.0 Untuk Menampilkan Daftar Drive Yang Ada Di Komputer Terkait
- Dir List Box Adalah Salah Satu Fasilitas Tool Box Dalam Program Visual Basic 6.0 Untuk Menampilkan Daftar Direktori Dari Drive Terpilih Yang Ada Di Komputer Terkait
- File List Box Adalah Salah Satu Fasilitas Tool Box Dalam Program Visual Basic 6.0 Untuk Menampilkan Daftar File Dari Drive Dan Direktori Terpilih Yang Ada Di Komputer Terkait
2. Tujuan
Tujuan Adanya Ketiga Fasilitas Ini Adalah Untuk Memudahkan Kita Mengambil Path Dari File Tertentu. Path Itu Sendiri Adalah Istilah Untuk Menunjukkan Alamat Dari Sebuah File
3. Langkah - Langkah Pembuatan
- Buka Program Visual Basic 6.0
- Buat Form Baru Dengan Memberi Nama Form "Belajar Membuat Drive, Dir, Dan File List Box"
- Tambahkan Drive List Box, Dir List Box, Dan File List Box Yang Ada Di Tool Box Sehingga Terdapat Pada Form Yang Telah Dibuat Tadi
- Pilih Menu Bar View Dan Klik Code
- Masukkan Source Code Berikut :
Private Sub Dir1_Change( )
Me.File1 = Me.Dir1.Path
End Sub
Private Sub Drive 1_Change( )
Me.Dir1.Path = Me.Drive1.Drive
End Sub
Private Sub File1_Click( )
Me.Caption = Me.File1.Path + "\" + Me.File1.FileName
End Sub
Me.File1 = Me.Dir1.Path
End Sub
Private Sub Drive 1_Change( )
Me.Dir1.Path = Me.Drive1.Drive
End Sub
Private Sub File1_Click( )
Me.Caption = Me.File1.Path + "\" + Me.File1.FileName
End Sub
- Jalankan Program
- Jika Ada Kesulitan,,, Contact Me... :-) :-) :-)
Attention !!! :-) :-) :-)
- Put Your Link Or E-mail, And Real Nick Name
- Ask Something, Request Tutorial / Freebies?
- I Will Answer Your Mes On Your Blog Or Your E-Mail Or My Facebook Page(http://www.facebook.com/kormakka?ref=hl)
- And No Harsh Word!
- Keep Smiling :-) :-):-)
Labels: Pemrog. Visual
Soal Ujian Tengah Semester Pemrograman Visual
@ 8:01 AM | 0 Comment Box(s)
UJIAN TENGAH SEMESTER ( UTS ) SEMESTER GANJIL
TAHUN AKADEMIK 2013 - 2014
1. Buat Program Dengan Ketentuan Interface Sebagai Berikut :
Dan Dengan Ketentuan Sebagai Berikut :
- Diketahui Terdapat 3 Tombol Input Liter Air, Reset, Dan Exit. Di Mana Tombol Input Liter Air Apabila Kita Klik Akan Menampilkan Input Box Dan Kita Dapat Isikan Jumlah Air Yang Akan Kita Isikan Ke Dalam Gelas
- Tombol Start Dan Reset : Setelah Diinputkan Banyak - Nya Air, Maka Kita Tekan Tombol Start Dan Caption Pada Tombol Start Akan Berubah Menjadi Reset. Tombol Reset Berfungsi Untuk Mengosongkan Gelas Sehingga Dapat Diisi Kembali Dengan Menginputkan Banyak - Nya Air Pada Tombol Input Liter Air ( Tombol Start Dan Reset Adalah 1 Command Button, Hanya Caption - Nya Yang Dirubah Disesuaikan Dengan Kondisi ). Di Mana Apabila Kondisi Awal Dan Setelah Penginputan Isi Air Pada Input Box, Maka Tombol Start Yang Aktif. Namun, Apabila Kondisi Pengisian Air Dan Setelah Pengisian, Maka Tombol Reset Yang Aktif
- Tombol Exit Untuk Keluar Dari Program
2. Lengkapi Source Code Program Dengan Interface Di Bawah Ini !
Dim menit As Integer, detik As Integer
Private Sub cmdstop_Click()
Timer1.Enabled = False
lbldetik.Caption = 0
lblmenit.Caption = 0
End Sub
Private Sub Command1_Click()
frmstopwatch.Show
frmlampu11.Visible = False
End Sub
Private Sub Command2_Click()
Timer1.Enabled = True
End Sub
Private Sub Form_Load()
frmlampu11.Visible = True
frmlogin.tmrwaktu.Enabled = False
End Sub
Private Sub Timer1_Timer()
Static i
detik = 1. ...
If detik > 60 Then
menit = 2. ...
detik = 0
If menit = 6 Then
menit = 0
End If
End If
lblmenit.Caption = 3. ...
lbldetik.Caption = 4. ...
i = menit
If i = 6 Then
i = 0
End If
If i = 0 Then
Shape2(2).FillColor = 5. ...
Shape2(0).FillColor = 6. ...
Else If i = 2 Then
Shape2(0).FillColor = 7. ...
Shape2(1).FillColor = 8. ...
Else If i = 4 Then
Shape2(1).FillColor = 9. ...
Shape2(2).FillColor = 10. ...
End If
End Sub
3. Buat Program Untuk Memasukkan Password Dengan Ketentuan Pada Label Hitung Dimulai Dengan Angka 10 Dengan Interval Timer = 500. Apabila Angka Pada Label Hitung Berada Pada Posisi 0, Maka Akan Keluar Pesan "Waktu Anda Habis Dan Program Dihentikan", Apabila Password Yang Diketikkan Benar, Maka Akan Keluar Pesan "Password Anda Benar" Dan Apabila Password Yang Ditulis Salah, Maka Akan Keluar Pesan "Password Anda Salah" Dan Anda Harus Kembali Mengetikkan Password Yang Benar Dengan Posisi Kursor Berda Di Text Box Masukkan Password. Untuk Tampilan Interface Program, Bisa Dilihat Dibawah Ini :
Attention !!! :-) :-) :-)
- Put Your Link Or E-mail, And Real Nick Name
- Ask Something, Request Tutorial / Freebies?
- I Will Answer Your Mes On Your Blog Or Your E-Mail Or My Facebook Page(http://www.facebook.com/kormakka?ref=hl)
- And No Harsh Word!
- Keep Smiling :-) :-):-)
Labels: Pemrog. Visual
Soal Quiz I Pemrograman Visual
@ 6:54 AM | 0 Comment Box(s)
SOAL QUIZ I
SEMESTER GANJIL
TAHUN AKADEMIK 2013 - 2014
1. Buatlah Progam Animasi Yang Bisa Membuat Gambar Berjalan Mengelilingi Bingkai Persegi ?
Attention !!! :-) :-) :-)
- Put Your Link Or E-mail, And Real Nick Name
- Ask Something, Request Tutorial / Freebies?
- I Will Answer Your Mes On Your Blog Or Your E-Mail Or My Facebook Page(http://www.facebook.com/kormakka?ref=hl)
- And No Harsh Word!
- Keep Smiling :-) :-):-)
Labels: Pemrog. Visual
Materi Perkuliahan Pemrograman Visual
@ 6:46 AM | 0 Comment Box(s)
Title: URL:
Title: URL:
Title: URL:
Title: URL:
Title: URL:
Title: URL:
Title: URL:
Title: URL:
Labels: Pemrog. Visual
