Visual Basic.NET How to Program (PDF)

168 Control Structures: Part 2 Chapter 5
The Windows application in Fig. 5.21 demonstrates the use of the logical operators by
displaying their truth tables in six labels.
1 ' Fig. 5.21: LogicalOperator.vb
2 ' Using logical operators.
3
4 Public Class FrmLogicalOperator
5 Inherits System.Windows.Forms.Form
6
7 ' Visual Studio .NET generated code
8
9 Private Sub FrmLogicalOperator_Load( _
10 ByVal sender As System.Object, _
11 ByVal e As System.EventArgs) Handles MyBase.Load
12
13 lblAndAlso.Text = "AndAlso" & vbCrLf & vbCrLf & _
14 "False AndAlso False: " & (False AndAlso False) & _
15 vbCrLf & "False AndAlso True: " & _
16 (False AndAlso True) & vbCrLf & _
17 "True AndAlso False: " & (True AndAlso False) & _
18 vbCrLf & "True AndAlso True: " & (True AndAlso True)
19
20 lblOrElse.Text = "OrElse" & vbCrLf & vbCrLf & _
21 "False OrElse False: " & (False OrElse False) & _
22 vbCrLf & "False OrElse True: " & (False OrElse True) & _
23 vbCrLf & "True OrElse False: " & (True OrElse False) & _
24 vbCrLf & "True OrElse True: " & (True OrElse True)
25
26 lblAnd.Text = "And" & vbCrLf & vbCrLf & _
27 "False And False: " & (False And False) & vbCrLf & _
28 "False And True: " & (False And True) & vbCrLf & _
29 "True And False: " & (True And False) & vbCrLf & _
30 "True And True: " & (True And True)
31
32 lblOr.Text = "Or" & vbCrLf & _
33 vbCrLf & "False Or False: " & (False Or False) & _
34 vbCrLf & "False Or True: " & (False Or True) & _
35 vbCrLf & "True Or False: " & (True Or False) & _
36 vbCrLf & "True Or True: " & (True Or True)
37
38 lblXor.Text = "Xor" & vbCrLf & _
39 vbCrLf & "False Xor False: " & (False Xor False) & _
40 vbCrLf & "False Xor True: " & (False Xor True) & _
41 vbCrLf & "True Xor False: " & (True Xor False) & _
42 vbCrLf & "True Xor True: " & (True Xor True)
43
44 lblNot.Text = "Not" & vbCrLf & vbCrLf & _
45 "Not False: " & (Not False) & vbCrLf & "Not True: " & _
46 (Not True)
47
48 End Sub ' FrmLogicalOperator_Load
49
50 End Class ' FrmLogicalOperator
Fig. Fig. 5.21 5.21 Logical operator truth tables (part 1 of 2).