Nattawut Phetmak
Jack of all Trades
สำหรับตัวดำเนินการบวก ลบ คูณ หาร (และหารปัดเศษทิ้ง)
Private Sub Button1_Click(...) Handles Button1.Click
MessageBox.Show(2 + 9)
' get: 11
MessageBox.Show(3 - 2)
' get: 1
MessageBox.Show(2 * 3)
' get: 6
MessageBox.Show(3 / 5)
' get: 0.6
MessageBox.Show(4 \ 5)
' get: 0
End Sub
อย่างไรก็ตาม การหารธรรมดาแล้วเก็บค่าเข้าไว้ในตัวแปร Integer จะส่งผลลัพท์เป็นจำนวนเต็มปัดเศษที่ 0.5
Private Sub Button1_Click(...) Handles Button1.Click
Dim n As Integer
n = 2 / 5
MessageBox.Show(n)
' get: 0
n = 3 / 5
MessageBox.Show(n)
' get: 1
End Sub
ส่วนการหารเก็บเศษนั้น จะพิจารณาเครื่องหมายของผลลัพท์จากตัวตั้งเท่านั้น
Private Sub Button1_Click(...) Handles Button1.Click
MessageBox.Show(17 mod 3)
' get: 2
MessageBox.Show(5 mod -1.5)
' get: 0.5
MessageBox.Show(-3.5 mod 1.2)
' get: -1.1
End Sub
ส่วนตัวแปรแบบข้อความนั้น การนำมาเชื่อมกันทำได้โดย
Private Sub Button1_Click(...) Handles Button1.Click
Dim h, w As String
h = "hello "
w = "world!"
MessageBox.Show(h & w)
' get: hello world!
End Sub
สุดท้าย เราสามารถ assign ค่าให้ตัวแปรเดิมได้เช่นภาษาอื่นๆ ทั่วไปครับ
Private Sub Button1_Click(...) Handles Button1.Click
Dim n As Decimal
n += 5
MessageBox.Show(n)
' get: 5
n /= 2
MessageBox.Show(n)
' get: 2.5
End Sub