Gunakan Timer Mas.

--- In [email protected], "Frengki Bunga"
<[EMAIL PROTECTED]> wrote:
>

> 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
>
>
>
>
>
> 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




Kirim email ke