7. จงหาผลลัพธ์ของ X = 10 , Y = 15
Module Module1
Sub Main()
Dim x As Integer
Dim y As Integer
Dim z As Integer
x = InputBox("ป้อนค่า x : ")
y = InputBox("ป้อนค่า y : ")
z = x + y
MsgBox("x+y=" & z)
End Sub
1. Z=25
2. Z= 10+15
3. X+Y= 25
4. X+Y=10+15
8. ตัวแปรใดต่อไปนี้ใช้เก็บเลขจำนวนเต็ม
1. Short
2. Char
3. String
4. Single
9. ถ้า A เป็นจริง (True) B เป็น เท็จ (False) ถ้านำมา A And B จะมีค่าเป็นจริง หรือ เป็นเท็จ
1. จริง (True)
2. เท็จ (False)
10. ถ้า A เป็นจริง (True) B เป็นจริง (True) ถ้านำมา A And B จะมีค่าเป็นจริง หรือ เป็นเท็จ
1. จริง (True)
2. เท็จ (False)
11. ถ้า A เป็นเท็จ (False) B เป็นจริง (True) ถ้านำมา A or B จะมีค่าเป็นจริง หรือ เป็นเท็จ
1. จริง (True)
2. เท็จ (False)
12. ถ้า A เป็นเท็จ (False) B เป็นเท็จ (False) ถ้านำมา A or B จะมีค่าเป็นจริง หรือ เป็นเท็จ
1. จริง (True)
2. เท็จ (False)
13. ถ้า A เป็นจริง (True) B เป็นจริง (True) ถ้านำมา A Xor B จะมีค่าเป็นจริง หรือ เป็นเท็จ