Sebelumnya salam kenal semua,
saya anggota baru di milis ini,
kode yang mas buat sebenarnya bukan untuk menghitung bilangan seperti
yang diinginkan. kode itu untuk menggabungkan string walaupun variabel a, b, c, dan d dideklarasikan dengan tipe data integer.
oleh karena itu diperlukan sebuah fungsi built-in vb yaitu fungsi VAL yang
berfungsi untuk mengambil deretan angka pertama dari sebuah string.
misalkan jika kita menulis kode seperti berikut:
- val("text") 'return valuenya adalah 0
-val("123text") 'return valuenya adalah 123
-val("123text123") ' return valuenya adalah 123 (tetap).
hanya angka sebelum teks yang diambil.
semoga bisa membantu.
salam
--- On Fri, 5/30/08, Ju$t QQ_Thea™ <[EMAIL PROTECTED]> wrote:
From: Ju$t QQ_Thea™ <[EMAIL PROTECTED]>
Subject: Re: [Programmer-VB] Fwd: Fw: Tanya perhitungan
To: [email protected]
Date: Friday, May 30, 2008, 12:28 AM
Dear All..
Salam Kenal..
cba pke fungsi val()
a = val(txt1.Text)
b = val(txt2.Text)
c = val(txt3.Text)
D = c - (a + b)
txtsrj.Text = Format(D, "#,##0")
----- Original Message ----
From: Purwedi Kurniawan <purwedi.kurniawan@ gmail.com>
To: programmer-vb@ yahoogroups. com
Sent: Friday, May 30, 2008 14:21:50
Subject: [Programmer- VB] Fwd: Fw: Tanya perhitungan
fyi
---------- Forwarded message ----------
From: iwan gunawan <[EMAIL PROTECTED] com>
Date: 2008/5/28
Subject: Fw: Tanya perhitungan
To: Programmer-VB- [EMAIL PROTECTED] s.com
Pak Mod, ini e-mail yg di tolak, thanks.
----- Forwarded Message ----
From: iwan gunawan <[EMAIL PROTECTED] com>
To: programmer-VB@ yahoogroups. com; indoprog-vb@ yahoogroups. com
Sent: Tuesday, May 27, 2008 1:40:23 PM
Subject: Tanya perhitungan
Guys, tanya donk, gw bikin progam kayak di bwh ini, tapi hasil yg di dapet
: D=c-a, yg b ga ke hitung, kira2 salah di mana yah? thanks.
note: pake tabel.mdb
a = txt1.Text
b = txt2.Text
c = txt3.Text
D = c - (a + b)
txtsrj.Text = Format(D, "#,##0")
