i need to check whether a demical is 0 through 49.99 or 50 through 99.99 or 100 through 199.99 or greater than 200. i am trying to do this with select case, but i am not sure of the syntax.
View 7 RepliesI have a question about Select Case. My code (psuedocode) is this
[Select Case name
Case number
name=Remove(num, 1, " ") ]
What this needs to do is to remove spaces at the end of a number and lets say that the number would look like this "C12345" but what I want is for the number to look like this "12345". I have it as a hyperlike but for some reason when at the link in the code it had added some spaces at the end of the number and I do not know why. What I want to have happen is when the hyperlink is click that it will go right to that number but it does not. When you click it you have to go to the top of the page (where the http is at) to to the end of the link and back space. Once you have done that it will go to the page that you want.
I'm using the following code to read values, from a parallel port. Can I check for multiple cases by using 'and'? [Code]
View 10 RepliesI need to create a Select Case statement to assign the per check processing fee:user inputs number of cks into textbox that i need to validate the input if user puts in a negative amount.
10 cents for <=20 cks written ea month
8 cents <= 20 to 39 cks written ea mo
6 cents <= 40 to 59 cks written ea mo
4 cents for 60 or more cks written ea mo.
Also, I have a label programmed to display the $10 monthly fee thats has to be included into the: Total monthly fees.
Here's the coding I have so far:
Const decSERVICE_FEE As Decimal = 10D
Const decTWENTY_OR_LESS_CHECKS As Decimal = 0.1D
Const decTWENTY_THRU_THIRTYNINE_CHECKS As Decimal = 0.08D
[code].....
I have an app that adds ammount to gether and i am trrying to do some error checking. This is the code i Have so far
CODE:
I would like to turn this into a select case so that it calls all the code need to check before running. I have tried to do it my self but has been ages since i coded and even then it was in VB6. I know there is a way to do the case in a module and then call it into the form where i need it. i have 3 radio buttons that if they are not selected it pops up a message to say so.
I have class representing a unit of measure with a Decimal as the numeric. Just to simplify things for this example, let's say I'm representing centimeters. I'd like to implement a ToString() method for this class. The thing is, if the numeric value is a whole number I'd like to just display the decimal as an integer. Otherwise, I'd like to keep it as a decimal. So, for example, 10.5D centimeters would display as "10.5cm", but 7.0D centimeters should display as "7cm". I'd like this to be fast and simple to read. I have a working solution, but it seems like there should be a better way.Here's a contrived example showing my first crack at it:
Public Property Units As String = "cm"
Public Property NumericValue As Decimal = 10.5D
Public Overrides Function ToString()
[code].....
How to write a if else statement to check if the number user enter follow within a range.
View 5 RepliesWhat is the cleanest, most readable way to String.Format a decimal with the following criteria
start with a sign symbol (+ or -)
a fixed number of fraction digits
no decimal separator
right aligned
pre-padded with "0"'s
format number to hower many number on left of decimal and 1 decimal without rounding
View 2 RepliesI am trying to do a select case to see if a variable contains a list of the most common words in the English language.[CODE]....
Right now I get the hateful blue squiggly under b.contains with a message that overload resolution failed because no accessible 'contains' accepts this number of arguments. Any suggestions? Also this is my fourth thread is it better to make new threads as new questions come up or just role from one topic to the next during a project in one thread? I just don't want to make anyone mad for starting too many threads.
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 am using the following code in the Load method of a VB form to generate random numbers in the range 1 to 8. Without fail after enough loops the range is exceeded and 9 is the random number returned every time. The line using the Rnd function is from: Rnd Function (Visual Basic)
[Code]...
ive 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 want to convert numbers from 0 to 15 like that
[Code]...
Problem is that when we convert 2 to binary number it gives only 10 in binary, but i want to convert 2 to 4 bit binary number 0010.
I am calling the function below from an Excel spreadsheet and the conversion from hex to decimal using the VAL function in the "manufacturer" variable below is coming back with a negative value. The VBA edition is 6.5.
Public Function decMEID(ByVal sKey As String) As String
Dim manufacturer As String
Dim serial As String
[code].....
im having trouble understanding this question for a homework assignment. I need to write the PSEUDOCODE for the following scenario, but i got no idea about how to convert a hexadecimal number to a decimal number..You are required to input a two digit hexadecimal number eg. 3f (digits can be entered separately) and calculate the equivalent decimal number. (note the decimal number will be between 0 and 255) . output the decimal number
View 1 RepliesTo allow a textbox to contain "15" or 15.5" as numbers nothing else...I figured that ^\d+$ works for numbers but can't get decimals to work also?
View 1 Replies[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].....