یک دستور IF بنویسید که  تساوی سه عدد را برسی کند .

Dim S , X , Z As Integer

If S = X And X = Z Then

“Print  ” Okay

Else

 ”Print ” Not Equal

End If