Xor

Article View: be.comp.programming

Article #7116

Back to be.comp.programming Previous Next

#7116

From: Christian
Date: Sun, 13 Oct 2002 17:30

50 lines
2271 bytes

Dag iedereen,

Ik ben een zelfstudie cursus VB.Net aan het leren en zit met een code die
niet wil werken.
Kan er mij aub iemand vertellen waar mijn fout ligd.

Op mijn blad staat het volgende:
Bouw een selectie-structuur (naar analogie met de XOR operator, maar zonder
die te gebruiken) die slechts indien 1 van de 2 ingelezen getallen
verschillend van 0 de som gaat afdrukken.

Het groene gedeelte heb ik als voorbeeld gekregen, maar helaas heeft deze
ook niet het gewenste resultaat.

Alvast bedankt.
Christian.

Sub Main()

Dim intGetal1, intGetal2, intResultaat As Integer



Console.WriteLine("Voer getal 1 in :")

intGetal1 = Console.ReadLine()

Console.WriteLine("Voer getal 2 in :")

intGetal2 = Console.ReadLine()

'If intGetal1 <> 0 Xor intGetal2 <> 0 Then

' Console.WriteLine("De som is : " & intGetal1 + intGetal2)

'End If

If (intGetal1 <> 0 And intGetal2 = 0) Or _

(intGetal1 = 0 And intGetal2 <> 0) Then

intResultaat = intGetal1 * intGetal2

Console.WriteLine("De som is : " & intResultaat)

End If

Console.ReadLine()

End Sub

Technical Details

Message-ID: <L4iq9.159352$8o4.24383@afrodite.telenet-ops.be>

Path:

arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-01!sn-xit-04!supernews.com!news.maxwell.syr.edu!newsfeed.icl.net!newsfeed.fjserv.net!kibo.news.demon.net!demon!newshub1.nl.home.com!news.nl.home.com!amsnews01.chello.com!news-hub.cableinet.net!blueyonder!btnet-peer!btnet!newsfeed.london1.eu.level3.net!level3eu!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mail

Show Full Headers

Complete Article Headers

X-Google-Language: DUTCH,ASCII-7-bit
X-Google-Thread: fcea4,9448616996bf38c4,start
X-Google-Attributes: gidfcea4,public
X-Google-ArrivalTime: 2002-10-13 10:36:00 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-01!sn-xit-04!supernews.com!news.maxwell.syr.edu!newsfeed.icl.net!newsfeed.fjserv.net!kibo.news.demon.net!demon!newshub1.nl.home.com!news.nl.home.com!amsnews01.chello.com!news-hub.cableinet.net!blueyonder!btnet-peer!btnet!newsfeed.london1.eu.level3.net!level3eu!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mail
From: "Christian" <Christian.Rosseel@pandora.be>
Newsgroups: be.comp.programming
Subject: Xor
Lines: 55
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2720.3000
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000
Message-ID: <L4iq9.159352$8o4.24383@afrodite.telenet-ops.be>
Date: Sun, 13 Oct 2002 17:30:19 GMT
NNTP-Posting-Host: 213.118.114.76
X-Complaints-To: abuse@telenet.be
X-Trace: afrodite.telenet-ops.be 1034530219 213.118.114.76 (Sun, 13 Oct 2002 19:30:19 MET DST)
NNTP-Posting-Date: Sun, 13 Oct 2002 19:30:19 MET DST
Organization: Telenet Internet