taj3da
شنبه 12 اردیبهشت 1394, 14:41 عصر
این کد معنی میکنید که چکاری انجام میده؟!
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles btn2.Click
TextBox2.Text = "min is :"
If Val(txt1.Text) < Val(TextBox1.Text) Then TextBox2.Text = TextBox2.Text + txt1.Text Else TextBox2.Text = TextBox2.Text + TextBox1.Text
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles btn2.Click
TextBox2.Text = "min is :"
If Val(txt1.Text) < Val(TextBox1.Text) Then TextBox2.Text = TextBox2.Text + txt1.Text Else TextBox2.Text = TextBox2.Text + TextBox1.Text
End Sub