• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 204
  • Last Modified:

listbox problem

Im a beginner to vb.NET and im making a program that requires the user to select an item from a list box (add, subtract, divide, multiply, random). Once the user has selected which one they want, when they click on it i would like the appropriate symbol to appear in a textbox.

If anyone can help with making the choice random work too, i would be very greatful.
0
s1555
Asked:
s1555
  • 2
1 Solution
 
Mutare99Commented:
In the OnClick event put the following code for a list namded List1:

Select Case lstCaptures.ListIndex
    Case 0: Text1.Text = "Add"
    Case 1: Text1.Text = "Subtract"
    Case 2: Text1.Text = "Multiply"
    Case 3: Text1.Text = "Divide"
    Case 4: Text1.Text = "Random"
End Select

To generate a random number between A and B use:

Randomize Timer
iRandom = Int((B - A + 1) * Rnd + A)
0
 
Mutare99Commented:
Oh, I see, you want the Random choice to pick one of the others.  You can use this for that:

Select Case lstCaptures.ListIndex
    Case 0: Text1.Text = "Add"
    Case 1: Text1.Text = "Subtract"
    Case 2: Text1.Text = "Multiply"
    Case 3: Text1.Text = "Divide"
    Case 4
        Randomize Timer
        iRandom = Int((4 - 1 + 1) * Rnd + 1)
        Select Case iRandom
            Case 1: Text1.Text = "Add"
            Case 2: Text1.Text = "Subtract"
            Case 3: Text1.Text = "Multiply"
            Case 4: Text1.Text = "Divide"
        End Select
End Select

0
 
ashooooCommented:
If you want the appropriate symbol to appear in the textbox, just change the above code to

Text1.Text = "+"
or
Text1.Text = "-"
.. etc.
0

Featured Post

Concerto Cloud for Software Providers & ISVs

Can Concerto Cloud Services help you focus on evolving your application offerings, while delivering the best cloud experience to your customers? From DevOps to revenue models and customer support, the answer is yes!

Learn how Concerto can help you.

  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now