=== BEGIN ARIEFWT'S POST ===
Maaf, ini adalah komunitas Programmer-VB, jadi terpaksa pertanyaan
Anda saya jawab secara programming.
'=== BEGIN CODE - COPY FROM HERE ===
Private Type PropertiGelas
MassaDalamGram as Integer
MassaKosongDalamGram as Integer
End Type
Dim V as Integer, Gelas as PropertiGelas
Sub Main()
V = Gelas.MassaDalamGram * 1000 - Gelas.MassaKosongDalamGram
MsgBox "Volum air dalam gelas: " & V
End Sub
'powered by Arief Softwares Lab ([EMAIL PROTECTED])
'=== END CODE - COPY UNTIL HERE ===
Kode tersebut dapat diubah agar support KG atau konversi semua satuan
massa yang ada di dunia ini.
=== END ARIEFWT'S POST ===
Catatan:
* Semoga posting ini dapat bermanfaat secara positif bagi kita semua
* CMIIW - Correct Me If I am Wrong!
* Silakan tinggalkan testimonial Anda di
http://ariefwt.byethost7.com/testimonial
======== My Online Things =========
Y!: [EMAIL PROTECTED]
MSN: [EMAIL PROTECTED]
Jabber/GTalk: [EMAIL PROTECTED]
ICQ: 421914355
www: http://ariefwt.byethost7.com
===================================
TPM, 24 Mei 2007
--
Best Regards,
(Arief Wibowo, C.Hts, RM)
Computer Programmer and Alternative Therapist
--- In [email protected], wiwiek WWD <[EMAIL PROTECTED]> wrote:
>
> aku mau bikin gelas yang bisa mengukur volume air pada gelas tsb.
Tolong Referensinya Thank's wiek
>
>
>
> ---------------------------------
> Luggage? GPS? Comic books?
> Check out fitting gifts for grads at Yahoo! Search.
>