Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim a, b, c As Double
Dim d As String
a = TextBox1.Text
b = TextBox2.Text
d = ComboBox1.Text
Select Case d
Case "Topla"
c = a + b
End Select
c = TextBox3.Text
End Sub
Hesap makinası yapcaktım bu kodları yazdım fakat bu hatayı verdi
A first chance exception of type 'System.InvalidCastException' occurred in Microsoft.VisualBasic.dll sin:
Yaralı style
