سلام.من یه رنامه میخوام بنویسم که نمره حساب کنه این کدو میزنم حواب نمیده با استفاده از دستور های (And,Or,Xor) میخوام کسی میدونه ... ؟
Dim A As Double
If (A >= 17 Or A <= 20) Then
Label1.Text = "A"
ElseIf (A >= 14 Or A <= 17) And A = C Then
Label1.Text = "B"
ElseIf (A >= 10 Or A <= 14) Then
Label1.Text = "C"
ElseIf (A >= 0 Or A <= 10) Then
Label1.Text = "D"
Else
Label1.Text = "Error"
End If
