Visual Basic'de KDV Hesaplamak?

Merhaba THT...
VB'de Yeniyim Bi Program Kodu Sorucam Bilen Varmı Acaba?

Şunlar Olucak Programda:

TEXTBOX
LİSTBOX
ve
LABEL

TEXTBOX'A GİRİLEN ÜRÜN DOLAR FİYATI OLUCAK
DAHA SONRA LİSTBOXTAN DOLAR KURU SEÇİLECEK
VE %18 KDV EKLENİP LABEL'E YAZDIRICAK..

Ben Şöyle Düşündüm ama Olmadı Neresi Yanlış Mantıksal Olarak Böyle Olması Gerekmezmi?

PrivateSub Button1_Click
Dim A, B AsInteger
A = Val(TextBox1.Text)
B = Val(ListBox1.Text)

Label5.Text = (A * 1.8) * B

EndSub

şunu anlamadım textbox a yazdığın fiyattı listboxa mı aktarmaya çalışıyorsun biraz daha açık anlatabilir misn?

Hayır Textbox'takini Listbox'a Aktarmıycam Textbox'a Dolar Fiyatı Girilicek Listboxtan da Dolar Kuru Seçilecek Bu İkisini Çarpıp %18 Kdv sini Ekleyip LABEL'e Yazıcak..

Private Sub Command1_Click()
If Option1.Value = True Then Text4.Text = Val(Text3.Text) * Val(Text1.Text) + Val(Text1.Text) * Val(Text3.Text) * 1.8
If Option2.Value = True Then Text4.Text = Val(Text3.Text) * Val(Text2.Text) + Val(Text2.Text) * Val(Text3.Text) * 1.8
End Sub

Private Sub Text1_Click()
Text1.Text = ""
End Sub

Private Sub Text2_Click()
Text2.Text = ""
End Sub

Private Sub Text3_Click()
Text3.Text = ""
End Sub


arkadaşım bu kodları yapıştır ek olarak 4 tane text box 2 option 1 tanede button ekle
böyle bir programa kurları kaydetse daha güzel olur onun içinde ayrıca vb de kayıt işlemlerine bakmanı tavsiye ederim dolar kuru text1 japon yeni text2(bunu salladım.çeiştlilik olsun diye) text3 kdvsiz türk lirası
text4 sonuç opiton ı seçersen dolar kuru option2 i seçersen japon yenini hesaplıcak tabi önceden değerleri girmen gerekio textboxlara.tam olarak ne anladtığını anlamadım doğaçlama yaptın anlıyacağın internette arat vb planete bak ingilizcen varsa yoksa vb türk istediğine yakın sonuçlar bulursun

Microsoft Visual Studio 2008 ile Çalışıyorum Option felan yok .

aradaki farkı bilmiyorum arkadaşım ben vb 6 ile uğraşıyorum kolay gelsin sana