|
Dit artikel is gepubliceerd op zondag 31 juli 2011 op vbvoorbeelden, bezoek de website voor een recente versie van dit artikel of andere artikels.
Veronderstel dat we deze keer slechts de som van beide ingevoerde getallen wensen te geven indien minstens één van beide ingevoerde getallen positief is. Visual Basic 2010 Broncode Module NestedIfExample Sub Main() Console.WriteLine( "Value 1 ?") Dim value1 As Integer = Console.ReadLine() Console.WriteLine( "Value 2 ?") Dim value2 As Integer = Console.ReadLine() If value1 > 0 Then Console.WriteLine( "Sum : " & (value1 + value2)) Else If value2 > 0 Then Console.WriteLine( "Sum : " & (value1 + value2)) End If End If Console.ReadLine() End SubEnd ModuleDownload Visual Basic 2010 Broncode Download Visual C# Sourcecode
Console Application Output Value 1 ?
5
Value 2 ?
10
Sum : 15 Console Application Output Value 1 ?
-5
Value 2 ?
10
Sum : 5 Console Application Output Value 1 ?
5
Value 2 ?
-10
Sum : -5 Console Application Output Value 1 ?
-5
Value 2 ?
-10 Een variant met ElseIf had natuurlijk evengoed geweest. Visual Basic 2010 Broncode Module IfElseIfExample Sub Main() Console.WriteLine( "Value 1 ?") Dim value1 As Integer = Console.ReadLine() Console.WriteLine( "Value 2 ?") Dim value2 As Integer = Console.ReadLine() If value1 > 0 Then Console.WriteLine( "Sum : " & (value1 + value2)) ElseIf value2 > 0 Then Console.WriteLine( "Sum : " & (value1 + value2)) End If Console.ReadLine() End SubEnd ModuleDownload Visual Basic 2010 Broncode Download Visual C# Sourcecode
Console Application Output Value 1 ?
5
Value 2 ?
10
Sum : 15 Console Application Output Value 1 ?
-5
Value 2 ?
10
Sum : 5 Console Application Output Value 1 ?
5
Value 2 ?
-10
Sum : -5 Console Application Output Value 1 ?
-5
Value 2 ?
-10 Een alternatief hiervoor zou de logische binaire operator Or zijn. Deze combineert twee condities ( twee voorwaarden/logische expressies/booleaanse expressies ) en resulteert in één booleaanse expressie. Visual Basic 2010 Broncode Module LogicalDisjunctionOperatorOrExample Sub Main() Console.WriteLine( "Value 1 ?") Dim value1 As Integer = Console.ReadLine() Console.WriteLine( "Value 2 ?") Dim value2 As Integer = Console.ReadLine() If value1 > 0 Or value2 > 0 Then Console.WriteLine( "Sum : " & (value1 + value2)) End If Console.ReadLine() End SubEnd ModuleDownload Visual Basic 2010 Broncode Download Visual C# Sourcecode
Console Application Output Value 1 ?
5
Value 2 ?
10
Sum : 15 Console Application Output Value 1 ?
-5
Value 2 ?
10
Sum : 5 Console Application Output Value 1 ?
5
Value 2 ?
-10
Sum : -5 Console Application Output Value 1 ?
-5
Value 2 ?
-10 Vanaf dat één van beide aparte Boolean expressies correct ( True ) zijn, zal ook de gecombineerde booleaanse expressie correct ( True ) zijn.
Je zou volgende tabel kunnen opstellen : condition-1 condition-2 condition-1 Or condition-2 True True True True False True False True True False False False
Dit artikel is gepubliceerd op zondag 31 juli 2011 op vbvoorbeelden, bezoek de website voor een recente versie van dit artikel of andere artikels.
|