[الاستاذ خليل]

تفاعلكم مشجع

بالنسبة للسؤال الذي فيه اكثر من احتمال للحل نستخدم فيه ادات الربط OR و ترجمتها( أو ) و تفيد في تحقق احد الشروط يعطيك العبارة صحيحة . مثلا لو تريد تختبر ان اذا كتب المستخدم أ ب أو حتى ب أ تقوم بربطهم هكذا
مثلا

Private Sub CommandButton1_Click()
If TextBox1.Text = "ب أ" Or TextBox1.Text = "أ ب" Then
MsgBox "الاجابة صحيحة", vbOKOnly, "رسالة البرنامج"
End If

End Sub

و ممكن ان تختبر اكثر من شرطين حيث تكمل في الجملة كالكود التالي

Private Sub CommandButton1_Click()
If TextBox1.Text = "ب أ" Or TextBox1.Text = "أ ب" Or TextBox1.Text = "أب" Then
MsgBox "الاجابة صحيحة", vbOKOnly, "رسالة البرنامج"
End If

End Sub