VBA ลอจิคัล OperaTors: และ หรือ ไม่ใช่ ถ้าไม่ใช่ใน Excel VBA

โดย: ชาร์ล็อตต์มิลเลอร์ ชาร์ล็อตต์มิลเลอร์
Hours วันที่อัพเดท

VBA ลอจิคัล Operaทอร์: และ, หรือ, ไม่ใช่

Excel VBA เชิงตรรกะ Operaโปร

สมมติว่าคุณต้องการประมวลผลคำสั่งซื้อของลูกค้า ในการดำเนินการดังกล่าว คุณต้องตรวจสอบก่อนว่าผลิตภัณฑ์ที่สั่งซื้อมีอยู่หรือไม่ หากมี คุณต้องตรวจสอบด้วยว่าปริมาณที่มีอยู่เพียงพอหรือไม่ ตัวดำเนินการเชิงตรรกะมีประโยชน์ในกรณีดังกล่าว ตัวดำเนินการเชิงตรรกะใช้เพื่อประเมินเงื่อนไขมากกว่าหนึ่งเงื่อนไข

ตัวดำเนินการตรรกะหลักของ Excel VBA AND, OR, NOT มีอยู่ในตารางด้านล่างนี้:

S / N OperaTor Descriptไอออน ตัวอย่าง เอาท์พุต
1 AND AND: ใช้เพื่อรวมเงื่อนไขมากกว่าหนึ่งเงื่อนไข หากเงื่อนไขทั้งหมดเป็นจริง และประเมินว่าเป็นจริง หากเงื่อนไขข้อใดข้อหนึ่งเป็นเท็จ และประเมินว่าเป็นเท็จ ถ้าจริง = จริง และ เท็จ = จริง แล้ว เท็จ
2 OR หรือ: ใช้เพื่อรวมเงื่อนไขมากกว่าหนึ่งเงื่อนไข หากเงื่อนไขใดๆ ประเมินเป็นจริง OR จะคืนค่าเป็นจริง หากทั้งหมดเป็นเท็จ OR จะส่งกลับค่าเท็จ ถ้า true = true หรือ true = false แล้ว จริง
3 ไม่ ไม่: อันนี้ทำงานเหมือนกับฟังก์ชันผกผัน ถ้าเงื่อนไขเป็นจริง ก็จะส่งกลับค่าเท็จ และถ้าเงื่อนไขเป็นเท็จ ก็จะส่งกลับค่าจริง ถ้าไม่ (จริง) แล้ว เท็จ

VBA ลอจิคัล Operaซอร์สโค้ดตัวอย่างของ Tors

เพื่อความเรียบง่าย เราจะเปรียบเทียบตัวเลขที่ถูกเข้ารหัสแบบตายตัว

เพิ่มปุ่ม ActiveX ลงในแผ่นงานจาก "ตัวเลือกแทรก"

ตั้งค่าคุณสมบัติตามที่แสดงในภาพด้านล่าง

VBA ลอจิคัล Operaโปร
VBA ลอจิคัล Operaโปร

ตารางต่อไปนี้แสดงคุณสมบัติที่คุณต้องเปลี่ยนแปลงและค่าที่คุณต้องอัปเดต

S / N Control อสังหาริมทรัพย์ ความคุ้มค่า
1 ปุ่มคำสั่ง1 Name btnAND
คำบรรยายภาพ AND Operaทอร์ (0 = 0)
2 ปุ่มคำสั่ง2 Name btnOR
คำบรรยายภาพ OR Operaทอร์ (1 = 1) หรือ (5 = 0)
3 ปุ่มคำสั่ง3 Name btnNOT
คำบรรยายภาพ ไม่ Operaทอร์ ไม่ใช่ (0 = )

เพิ่มโค้ดต่อไปนี้ลงใน btnAND_Click

Private Sub btnAND_Click()
    If (1 = 1) And (0 = 0) Then
            MsgBox "AND evaluated to TRUE", vbOKOnly, "AND operator"
        Else
            MsgBox "AND evaluated to FALSE", vbOKOnly, "AND operator"
    End If
End Sub

VBA ถ้าและ OperaTor

  • “ถ้า (1 = 1) และ (0 = 0) แล้ว” คำสั่ง if ใช้ตัวดำเนินการตรรกะ AND เพื่อรวมเงื่อนไขสองเงื่อนไขเข้าด้วยกัน (1 = 1) และ (0 = 0) หากเงื่อนไขทั้งสองเป็นจริง โค้ดด้านบนคีย์เวิร์ด 'Else' จะถูกดำเนินการ หากเงื่อนไขทั้งสองไม่เป็นจริง โค้ดด้านล่างคีย์เวิร์ด 'Else' จะถูกดำเนินการ

เพิ่มโค้ดต่อไปนี้ลงใน btnOR_Click

Private Sub btnOR_Click()
    If (1 = 1) Or (5 = 0) Then
            MsgBox "OR evaluated to TRUE", vbOKOnly, "OR operator"
        Else
            MsgBox "OR evaluated to FALSE", vbOKOnly, "OR operator"
    End If
End Sub

บทความที่เกี่ยวข้อง

VBA ถ้าหรือ OperaTor

  • “ถ้า (1 = 1) หรือ (5 = 0) แล้ว” คำสั่ง if ใช้ตัวดำเนินการตรรกะ OR เพื่อรวมเงื่อนไขสองข้อเข้าด้วยกัน (1 = 1) และ (5 = 0) หากเงื่อนไขใดเงื่อนไขหนึ่งเป็นจริง โค้ดด้านบนคีย์เวิร์ด Else จะถูกดำเนินการ หากเงื่อนไขทั้งสองข้อเป็นเท็จ โค้ดด้านล่างคีย์เวิร์ด Else จะถูกดำเนินการ

เพิ่มโค้ดต่อไปนี้ลงใน btnNOT_Click

Private Sub btnNOT_Click()
    If Not (0 = 0) Then
            MsgBox "NOT evaluated to TRUE", vbOKOnly, "NOT operator"
        Else
            MsgBox "NOT evaluated to FALSE", vbOKOnly, "NOT operator"
    End If
End Sub

VBA ถ้าไม่ใช่ OperaTor

  • “ถ้าไม่ใช่ (0 = 0) งั้น” ฟังก์ชัน If Not ของ VBA ใช้ตัวดำเนินการตรรกะ NOT เพื่อปฏิเสธผลลัพธ์ของเงื่อนไขคำสั่ง if หากเงื่อนไขเป็นจริง โค้ดที่อยู่ด้านล่างคีย์เวิร์ด 'Else' จะถูกดำเนินการ หากเงื่อนไขเป็นจริง โค้ดที่อยู่ด้านบนคีย์เวิร์ด Else จะถูกดำเนินการ

ดาวน์โหลด Excel ที่มีโค้ดด้านบน