Operator

สำหรับตัวดำเนินการบวก ลบ คูณ หาร (และหารปัดเศษทิ้ง)

    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

Nattawut Phetmak

Jack of all Trades

blog comments powered by Disqus