I am using a select case loop to perform different tasks, one of the tasks the loop is doing is putting 1d arrays together into 3d arrays. But, when i come to print the 3d array only the 3rd "line" in the array is complete. Is there a way to pass variables created in a select case out of the select case?
Here is some code to try and explain better:
Select Case Int()
Case Is = 13
[code].....
I need to add a loop to allow repeated checking of ISBN numbers, which should check to determine when processing should be ended and should allow exiting the program without having to enter an ISBN before quitting. I also need to use a Select Case for the three ISBN possibilities (ISBN-10, ISBN-13, invalid ISBN length).
[Code]....
have a sub routine that I will create a string array dynamically. The XML is also listed,but it could be any of the values listed below. It will be something like this:
Dim offensiveLine() As String = New String() {"center", "right wing", "left wing"}
Dim defensiveLine As String = "defense"
Dim playerInfo = <Player><Name>John</Name><Position val="right wing"/></Player>
[code].....
I have a webservice that will return a 2-D Array of Boolean. It can return True, True; True, False; or False, False. If I try it in a Select Case statement, I get this error: Operator '=' is not defined for types '1-dimensional array of Boolean' and '1-dimensional array of Boolean'. Use 'Is' operator to compare two reference types. TechGeek00x If this was the answer you needed, please Mark as Answer. More people can find the answer they're looking for if you mark your answers.
View 8 RepliesIs there a way to pass data from a Select Case statement to an array? i.e. I have a gradebook program I'm working on which specifies that I'm to create a form with a menu that will open another form which has textboxes for 5 student names and 5 grades for each. I need to use an array that holds 5 student names (done), an array of 5 strings to hold each students' letter grade (?) and 5 arrays of 5 numbers to hold each student's set of test scores (done). What I can't figure out is how to get th
Public Class StudentData
Private Sub btnOk_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOk.Click
[code]......
I'm in the middle of making a battleship game, and I'm trying to get picture boxes .visible=True based on the coordinates (that have already been given a nice Try/Catch/Finally error handeling block) of the ships. Example: I have picture boxes in a grid formation that are all red, and my naming convention for them is picR00 for the coordinates (0,0), picR01 for the coordinates (0,1)... et al. Because I'm using a(10,10) for my boolean array, I want the stuff thats false (not marked), those coordinates' red picture box to become visible, and the true have the green ones become visible. Here is what i have so far:
Dim a(10, 10) As Boolean, b(10, 10) As Boolean, c As Integer, x As Integer, y As Integer, ox As Integer, oy As Integer
For c = 1 To 3
[Code].....
I am trying to port a program I wrote with old VB 1 and I have many control arrays in the program, and it was so easy to do this in older versions of VB, now I am trying to find how to do this and all the answers I have found are a major productions, to replace something that was so easy to do? I would think that microsoft would make programming easer with each new incarnation. instead they are making it harder. doing away with the DATA and READ statement, now it is much harder to fill an array with a loop, now you have to enter each item in an array ONE by ONE. they did away with the ON statement, I had several ON statements, I had to make complex Select case constructs. to replace a simple one word statement?
To make an array of controls in OldVB all you had to do is Name a Second control the Same as the First, and a dialog pops up and ask if you want to make an array, you click Yes, and that's it, what could be easier than this?
this is my code
Dim str As String = "str1,str2"
Dim array() As String = str.Split(",")
Dim MyListOfTextBoxes() As TextBox = {TextBox1, TextBox2, TextBox3}
[Code]....
i have 5 textboxes. i want to fill just textbox1 and textbox2 with array value. because no i have to word.but when i run the code "str1" repetition on textbox1,textbox2 and textbox3.
I have a series of checkboxes named cbS1 through cbS20 and I set 'Count' as an integer.What I need help doing is taking the value of count and check the checkboxes that are greater than the count.example: count = 7 so checkboxes 8-20 would be checked.Im not sure how to make an array out of the checkboxes to use in a loop.
View 1 RepliesI have a class project that I have been working on for a while, and I can't figure out how to add each cost from lstCosts together to show a total cost of the selected workshops in lblTotalCost. Using the current loop that I have, it only adds the last cost in lstCosts. Is there a way to add the indexes together?
Code:
Public Class Form1
' The registration fee for each workshop
Const intSTRESS As Integer = 595 ' handling stress
Const intMANAGEMENT As Integer = 695 ' time management
Const intSKILLS As Integer = 995 ' supervision skills
[Code] .....
When my form loads it adds some handles (using AddHandler) to a sub (showStatus). What this sub does is checks which control activated the sub (using sender.Equals) and displays text in the status label (status) accordingly.For this I use an If...Then statement for each possibility. There are many possibilities and my code get cluttered. Is there a way to do the same thing with a Select...Case statement. I tried: Select Case sender Case tbOne : status.Text = "blahblahblahblahblahblah" End Selectwhere: tbOne is a textbox, status is a StatusLabelIt gives me an error though, saying "Operator '=' is not defined for types 'Object' and 'System.Windows.Forms.TextBox'."Any ideas on how I can get this to work with a select case statement?
View 13 Replieshere is my code..
[Code]....
If the result is 86 and it's mod by 43 the answer is 2 Case 2 is not firing. it just goes to the end of the procedure.
i have a program using a select case to convert letters to special charaters. My question is how can I get the code to read upper and lower case letters without having to put the upper case letters in my select case statement. Example: Part of my code is
[Code]...
I have some problem doing my practice in vb .net, what im trying to do is to array or do indexes my textbox, for an example i have 5 textbox,i would like to do like vb classic version, like this:
Textbox1(1).text
Textbox1(2).text
Textbox1(3).text
[code]....
I have some problem doing my practice in vb .net, what im trying to do is to array or do indexes my textbox, for an example i have 5 textbox,i would like to do like vb classic version, like this:
Textbox1(1).text
Textbox1(2).text
Textbox1(3).text
[code].....
i'm having trouble getting indexes of found matches in array. I have array of 100,000+ entries with numbers, and some of them occur more than once in array. I'd like to get every index of found matching element in array.I'm struggling with:
Dim ID() As String 'then I ReDim Preserve this ID() to needed length, and fill it with values
[Code]...
I have an array Newstr(20) When I fill it, I need to know how many of its indexes has been filled ? and find out the values.
View 3 Repliesive got a form containing treeview on the left docked, and two panels one over the other (just as for practice), so i am using treeview to select one from the other the code contains the Case select,
If
Not e.Node
Is
Nothing
[code]....
The problem is , both panels are not visible, when i select the first node the firstpanel is visible then i select the second node both panels are not visible, i return to the first node the first panel is visible.
I dont want to have to use a case (1-9) to fill pictureboxes with images, is there any way I can reduce this to one?
For i = 0 to 8
if player = 1
picturebox(i).image = my.resources.x
else
[code]....
[code]I don't get any error messages, but the DoSomething() line is never executed. I guess this isn't possible.
View 7 RepliesI'm working on a routine that requires a significant amount of nested and daisy-chained logic. Using If-Then-Else, each logic construct would run 8-15 lines of code (quite readable) while using Select Case each construct doubles that (even with significant commentation, it gets less and less readable with each new Case).
I've read many times in this forum how Select Case is leaps and bounds ahead of If-Then-Else in runtime performance, although I can't recall any discussion of the underlying process(es) that make it so. I've also not had any luck finding good, detailed documentation on the nuts and bolts under each logic construct. What I'm working on, if the performance leap is legit, needs the performance more than the readability but if the performance is marginal then the readability is going to get the priority. how and why Select Case is supposed to process so much faster than If-Then-Else. Links to good white paper would be really nice too.
I have a macro that uses "If Then" to choose what macro to run based on the ActiveCell. I would like to use the Select Case method instead. How would I change this code?
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Application.DisplayAlerts = False
Application.ScreenUpdating = False
[Code].....
Question is, I basically wrote a Rock Paper Scissors game in VB.NET using If statements and wondered how exactly I would try and work this into a Select Case instead.Professor was pretty awful at teaching things and didn't let us know until today that it had to be Select Case(its due tomorrow
View 2 RepliesConverting an IF THAN ELSE into a select case
View 4 RepliesI am convertng vb.net to c# 2010 as my job, and none of the automatic tools I have can succeed completely. In special example, this case:
[Code]...
I am mostly java developer before this, so not great with c# and none with vb.net. I do not understand the "oaaaa to" part and this part is not converting. Can you please point me to right place to find the c# version of this?
I have an if-elseif-then setup as below:
Private Sub CommandButton1_Click()
If OptionButton1.Value = True Then
getdate
Unload glpmenu
[Code] .....
I would like to change to Select Case.
i think this is the right place to post this.so i am doing my First Vb project and have run into some problems
[Code]...
I am using visual basic in VS 2008 and trying to learn how to assign a value to a word in a combo box using case select, this is my first attempt at programing and i just can't work out what to do next. So far i have two combo boxes a label and a button, i want the word, first to = 11, second = 9, third =7, fourth = 5. All it is doing at the moment is adding the list index value and displaying that total in the label. I want it to display for eg: if (first=11) and (second=9) are selected a total of 20 in the label,and so on for what ever combination is selected.
[Code]...
I have assigned nodes in my treeview keys depending on what they are to do with and now i would like to use a select case to choose the right calculation depending on which node is selected.i have tried selecting the key like this:
Select Case tvwFCOM.Nodes.IndexOfKey(tvwFCOM.SelectedNode.Text)
Case Is = "assi06"
Call MinimumSpeeds()
but option strict on dissalows conversion from string to integer. there are more cases, but i have only shown one here. How can i code so that the key is selected from the selected node?
I had to change the given code from If Then to Select Case, and this is what I came up with. But when I run the program, it does not work and gives me zeroes instead of the correct information.
Public Class MovieInfo
Private wkndBox, screens As Integer
Private title As String
[Code].....