If Statements!....for a newbie :)

Please support our VB.NET advertiser: Intel Parallel Studio Home
Reply

•
•
Join Date: Mar 2008
Posts: 5
Reputation: ferrier18 is an unknown quantity at this point 
Solved Threads: 0
ferrier18 ferrier18 is offline Offline
Newbie Poster

If Statements!....for a newbie :)

 
0
  #1
Mar 22nd, 2008
Hey guys, I am having trouble with this If satement. heres the code that i have so far:

vb Syntax (Toggle Plain Text) 
  1. If Val(TextBox1.Text) = Val(TextBox3.Text) And Val(TextBox2.Text) = Val(TextBox4.Text) Then
  2.      Label6.Text = "Students share 2 Subjects"
  3. End If
  4.  
  5. If Val(TextBox1.Text) = Val(TextBox4.Text) And Val(TextBox2.Text) = Val(TextBox3.Text) Then
  6.      Label6.Text = "Students share 2 Subjects"
  7. End If
  8.  
  9. If Val(TextBox1.Text) = Val(TextBox3.Text) Or Val(TextBox2.Text) = Val(TextBox4.Text) Then
  10.      Label6.Text = "Students share 1 Subject"
  11.      If Val(TextBox2.Text) = Val(TextBox3.Text) Or Val(TextBox1.Text) = Val(TextBox4.Text) Then
  12.           Label6.Text = "Students share 1 Subject"
  13.      End If
  14. End If
  15.  
  16. If Val(TextBox1.Text) <> Val(TextBox3.Text) And Val(TextBox2.Text) <> Val(TextBox4.Text) Then
  17.      Label6.Text = "Students share 0 subjects"
  18. End If
  19. If Val(TextBox1.Text) <> Val(TextBox4.Text) And Val(TextBox2.Text) <> Val(TextBox3.Text) Then
  20.      Label6.Text = "Students share 0 subjects"
  21. End If



And here's what im trying to achieve (DL pic file attatchment). So If the two subject codes are the same the label is meant to read "students share 2 subjects" and if only one subject code matches then the label is meant to read "students share 1 subject" and if no subjects match then "students share 0 subjects".

I haven't named the textboxes or labels yet, so TextBox1 and TextBox2 are the subjects of Student 1 and TextBox3 and TextBox4 are the subjects of Student 2. Label6 is wehre the "students share x subject(s)"!!

Thank you very much for any help....I'm new to vb.net and appreciate any help given, Thank you very much!!!!
Last edited by WolfPack; Mar 22nd, 2008 at 9:49 am. Reason: Added code tags. Use them when you post code. Also corrected indenting.
Attached Thumbnails
untitled.JPG  
Reply With Quote Quick reply to this message  
•
•
Join Date: Mar 2008
Posts: 31
Reputation: BluePaper is an unknown quantity at this point 
Solved Threads: 0
BluePaper's Avatar
BluePaper BluePaper is offline Offline
Light Poster

Re: If Statements!....for a newbie :)

 
0
  #2
Mar 22nd, 2008
Hey there ferrier, couldn't you just shorten that whole piece of code down to just 3 statements? I've done it here (without using Val, you can add it if you want and such):

VBNET Syntax (Toggle Plain Text) 
  1. If TextBox1.Text = TextBox3.Text And TextBox2.Text = TextBox4.Text Or TextBox1.Text = TextBox4.Text And TextBox2.Text = TextBox3.Text Then
  2.             Label6.Text = "Students share 2 subjects"
  3.         ElseIf TextBox1.Text = TextBox3.Text And TextBox2.Text <> TextBox4.Text Or TextBox1.Text = TextBox4.Text And TextBox2.Text <> TextBox3.Text Or TextBox2.Text = TextBox4.Text And TextBox1.Text <> TextBox3.Text Or TextBox2.Text = TextBox3.Text And TextBox1.Text <> TextBox4.Text Then
  4.             Label6.Text = "Students share 1 subject"
  5.         Else
  6.             Label6.Text = "Students share 0 subjects"
  7.         End If

I think it works with every option if it doesn't then I'd have to sit down and work through it some more. Aye the middle elseif is just one huge statement lol.

Hope it works.

mhmm, looks like the VB.net highlighting syntax is incomplete
Stone In Focus - Caffeine Group - CoffeePHP - Open Notes - Onyx - Redpoint Network - Espresso
Reply With Quote Quick reply to this message  
Reply

Quick Reply to Thread
This thread is more than three months old.
Perhaps start a new thread instead?
•
•
•
•
•
•
•
•
Message:
•
•
•
•



Similar Threads
Other Threads in the VB.NET Forum
Thread Tools Search this Thread



.net .net2008 2005 2008 access account array arrays basic bing browser button buttons c# center check checkbox code convert crystalreport cuesent data database datagrid datagridview date datetimepicker dissertation dissertations dissertationtopic dropdownlist eclipse excel fade file-dialog filter ftp generatetags gridview hardcopy images inline input insert intel internet listview mobile monitor net networking objects output panel passingparameters pdf picturebox port position print printing problem read remove save searchbox searchvb.net select serial settings shutdown soap sorting survey table tcp temperature text textbox timer timespan toolbox transparency trim update user validation vb vb.net vb.netformclosing()eventpictureboxmessagebox vb2008 vbnet visual visualbasic visualbasic.net visualstudio2008 web winforms wpf year
About Us | Contact Us | Advertise | DaniWeb | Acceptable Use Policy | RSS Feed

©2003 - 2009 DaniWeb® LLC