Bugün serisini başlattığım program arşivi ile karşınızdayım. Program VB.Net ile hazırlanmıştır.

İlk programımız dövizi Türk Lirasına kdvli şekilde çeviren bir program. Yazım mantığı gayet basit.

Dim doviz, kur, kdv As Integer
Dim fiyat As Single

If ComboBox1.Text = "Dolar" Then
TextBox5.Text = "$"
End If
If ComboBox1.Text = "Euro" Then
TextBox5.Text = "€"
End If
doviz = CInt(TextBox1.Text)
kur = CInt(TextBox4.Text)
kdv = CInt(TextBox3.Text)
fiyat = (doviz * (kdv / 100) + doviz) * kur
TextBox2.Text = fiyat

Bunu oluşturduğumuz butona yazıyoruz. Gerekli textbox işlemlerini yapıyoruz. Bu kadar…

Bu programı hazır halde indirmek için TIKLAYINIZ…