|
Teman-teman tolong perhatikan code dibawah ini
:
Private Sub cmdMulai_Click()
txtMulai.Text = "11:00:00" ' waktu mulai menggunakan komputer End Sub Private Sub cmdStop_Click()
txtStop.Text = "11:04:12" ' waktu selesai menggunakan komputer txtLamaPakai = (TimeValue(txtStop) - TimeValue(txtMulai)) * 24 * 60 txtLamaPakai = Round(txtLamaPakai) txtBayar = 200 * Val(txtLamaPakai) ' 200 merupakan harga pemakaian komputer per menit. End Sub
Dengan code seperti diatas, akan menghasilkan
program sederhana seperti dibawah ini:
![]() Yang menjadi permasalahannya adalah:
1. Bagaimana code supaya pada
txtLamaPakai.text = 00:04:12 atau dengan format
HH:MM:DD.
2. Bagaimana rumusnya agar selama program
ini berjalan, txtLamaPakai harus selalu menampilkan Durasi Waktu pemakaian
komputer, dan txtBayar harus selalu menampilkan Biaya pemakaian
komputer.
Sekian dan Terima kasih.
Wahana Programmer Groups Links <*> Untuk mengunjungi sponsor milis ini, klik link berikut: http://wahanaprogrammer.net <*> Untuk menghubungi owner milis ini, kirim email ke: [EMAIL PROTECTED] <*> Konsultasi pemrogramman bisa chat disini: Yahoo! Messenger: wahanaprogrammer YAHOO! GROUPS LINKS
|

