Old VB6er trying to get the new syntax of the .net world. Just to get things up and running, I wrote the following:
Dim RandomNumber As Integer
RandomNumber = GetRandom(0, 13)
If RandomNumber = 0 Then
Try
bass00.Play()
[Code] .....
What's the proper syntax for plugging in the random number instead of hard coding the bass02.Play() lines? VS 2010
The class Random is out right defective. It always produces the same random numbers in the same sequence. Things I have tried so far is every kind of seed you can think of as well as Randomize. The result is that I always get the same random numbers in exactly the same sequence.
View 4 RepliesSo how would I use .next (random numbers) to randomly select something from a list of numbers but it can't repeat the number?I could do:
dim num as integer
dim r as new random
num = r.next(1,5)
if num = 1 then
elseif num = 2 then
etc.
That wouldn't work because it would repeat.If I donwload someone's game can I disect it in VS? :0 I tried going to open project, then I went to the folder and clicked open. It brought me inside of the folder so I tried to open the game but there is no form1 there. It says the games name then .exe in the explorer-like thing in the top right?Also, how would I have a value or something in a label and access it from a button.
Example:This is in a label.
Dim number as Integer
number = 0
Then in the button do
Label.number = 0
How would I do something like that? I want to use that a lot as I did in a different language.
The program must generate 6 unique random numbers but when I click display numbers sometimes it gives me 6 unique numbers and sometimes I get duplicate numbers. I will add the code I have so far.
Public Class frmMain
Private Sub btnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnExit.Click
[CODE]...
I am checking for empty string values, but how do i see for the Quantity text box if the user chose only numerical values after the empty string. For example...
[Code]...
I don't take programming lessons at school or anything, and I'm starting to (try to) teach myself about random things.Currently I'm making an app that has 3 functions:
-Random Integer (1 to 100)
-Random Answer (Yes or No, similar to a coin flip)
-Random Dice Roll (1 to 6)
How would I go about doing this?At the moment all I know about random numbers etc. is that I will need to do something along the lines of Dim dice As New Random or something like that, but, like I mentioned, I have no idea.I am well aware of the DIC rules that you won't write the code for me/do my "homework(?)" for me, and that's not what I'm asking.
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles [code]...
Im getting "overload resolution failed because no access "getobject" accepts this number of arguments. "
Im trying to generate 7 different images in a group box out of 26 images when the form loads.
Basically, I want to divide two numbers together and they should be 2 random numbers from 1-12 (I have done that part) but, the answer should be a whole number (i.e. Integer, so no decimal points etc) So, I did the following:
' Initialize the random-number generator.
Randomize()
' Generate random value between 1 and 12.
Dim value5 As Integer = CInt(Int((12 * Rnd()) + 1))
[code]....
but the problem here is that the program crashes after only a few clicks on the button. So I guess the question is: How can I make the program generate two numbers (from 1-12) that when divided become a whole number?(Is there any code that may tell the random generator that I want the numbers to be even?-so all even numbers from 1-12?)
i am creating a maths program that works out five number summarys of a range of data. i am having trouble working out the smallest number in a group of numbers. i have used a bunch of if then statements to work out the maximum and i figured that by exchanging a few variables and swapping greater than signs for less than i could use the same code to work out the minimum, but all i get is zero, no matter what i input into my textboxes. below is the code i have used to work out the maximum number
If CheckBox1.Checked = True And CheckBox6.Checked = True Then
max = 0
min = 1000
[Code]......
I am currently trying to create a program to list a large group of numbers for me. My final goal is to have every 2, 3, 4, ..., and 9 digit number containing only "1" "2" and "3". I thought I would go about this by using the following VB.NET program and then copying it into a text editor, and using find & replace to eliminate all other numbers.
Public Class Form1
Dim Start As Integer = 333333333
Dim Counter As Integer = 333333333
[Code].....
it fails due to the massive amount of processing that needs to take place. However, adding the intervals requires a great deal of time for each number to be displayed without any crashes.
Is there some way (in VB.NEt or another language) to get the number list I want in a short (an hour or less) amount of time?
Say for instance, I gave you the numbers
1, 2, 3, 4, 4, 6, 9, 1, 3, 4, 5, 5, 2, 4, 7, 9, 1, 5, 3, 6, 6, 8, 1, 1, 4, 7, 7, 8, 2, 4, 2, 1, 9, 1, 0, 1, 6, 3, 2, 1, 8, 8, 9, 8, 1, 5, 3, 2, 3, 4, 7, 9, 0, 1, 2, 4, 7, 4, 3, 9, 7, 2, 0, 1, 6, 3, 8, 1, 2, 4
What number appears more than any other number?This is very important to me, ...I need to find the MODE, of those group of numbers, ...the way that I did it before, I would make 10 TextBoxes, and have another text box to enter the number, and when the number gets entered it would increment the value of which ever textbox the number was in the main textbox, so if I entered a 1 into the main textbox, then the zero in textbox (1), would be incremented to 1, and if another 1 was enered and the button was clicked, the 1 in the Textbox for 1, would be incremented to 2, because 1 has a popularity of 2 now and has apeared 2 times..
Here's some code, to show what I've come up with by myself.
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ONE.Text = ONE.Text + 1
End If
[code]....
I have a group of 3 numbers:
-SideA
-SideB
-SideC
I need a way to detect which one is the largest, and which is the smallest, and assign them to a variable.If SideA is the largest, then it is variable C, and SideB is the smallest, so its variable A, leaving SideC as variable B
I'm trying to load a group of pictures into my form so the user can click a button to view the next picture. I am trying to use List to gather the pictures.
When I debug, the List is always empty thus giving me an index error.
Code:
Public Class frmChildrenToySel
Private list As New List(Of String), index As Integer
Private Sub PictureBox1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
[Code].....
i want to know how to generate 7 "differents" random numbers.
I need to use a tab() with 7 entries and verify(with a loop?) if the generated number is or not present in the the table, if not then increment a counter by 1 and add the number in the table and increment the table position by 1 for the next randomized number.
Im not sure how to do the verification, so far all i have is a function i made for the random number between min and max:
Private Function randGen(ByVal min As Integer, ByVal max As Integer)
Dim random As New Random()
Dim i As Integer
[Code]....
I want to get random numbers between 0 to 100..But i do not want the random number to be repeated.
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim objRand As New Random
objRand.Next(0, 100)
End Sub
Suppose first time random numb generated is 10..Next time if same random number is generated,den i want to get the other random number..I want to get all the numbers b/w 1 to 100..but only one time
I want to get random numbers between 0 to 100..But i do not want the random number to be repeated.
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim objRand As New Random
objRand.Next(0, 100)
End Sub
Suppose first time random numb generated is 10..Next time if same random number is generated,den i want to get the other random number. I want to get all the numbers b/w 1 to 100..but only one time
I want to random a numbers about 20 second. how to write the code
[Code]...
i need to add random numbers in list box like
0
2
1
3
i am trying to create a messagebox which brings up four random percentages which add unto 100%, i can create the messagebox with[code]messagebox.show ("") {icode]
View 3 RepliesI am writing an application that needs several random numbers. Each time I use the Rnd() function, do I need to precede it with the Randomize() initializer?Or can I just use Randomize() once at the beginning of the code?Examples: Do I need to do it this way?
[Code]...
'm attempting a program and need to generate 10 random numbers between 1 and 52. However all the numbers must be different. I'm trying this in a For Loop. I'm not terribly amazing at this so all I have so far is:
Dim B, I, J, max, min, card() As Interger
max = 52
min = 1
Randomise()
[Code].....
What am I doing wrong and what is the ultimately simple solution I know the internet can provide for me?
This code is in VB6.0I have 28 numbers in sequence (eg 1-28), they are randomly generated and displayed in a label. I dont want a duplicate number displayed in the label. Pls how do I do this. Below is how I generate numbers at random. Now I want to make sure there is no duplicate number displayed in the label.[code]
View 12 Repliesi have a few questions about generating random numbers:1) is it possible for the programme to generate a random number that it has previously generated (i.e could it produce the same number more than once?)2) can you specify what numbers to generate? e.g only whole numbers up to 1000?
View 4 RepliesI have a problem regarding the generation of random numbers in vb.net..I have code like this!!it generates the random number but both the numbers are same for my program the should not be same!![code]
View 3 RepliesSo if you have one button and one textbox; whats the code so when you press the button the textbox comes up with a random number?
View 13 RepliesHow can i do a random numbers?.i'm using 3 listbox when i click button generate the result will show into the 3 listbox??
View 10 RepliesI'm working on a Bingo game that generates a random letter and number.
Dim RandN As New Random()
Dim randnumber = RandN.Next(1, 30)
Dim RandL As New Random()
Dim randletter = RandL.Next(1, 5)
All that works, but I'd like it not to repeat a combination. Any tips on how to do that?
Also the random numbers tend to be repetitive and the random letter is never 5. I think the random number has been 30 before but I can't be sure. Is there a way to fix that or just a better way to do the random numbers?
Dim intNumber As Integer
Dim arrNumber(0 To 51) As Integer
Dim i, x, y As Integer
[code]....
I have a random number generator, an upper bound and a lower bound. I need to use the random number generator to get that many numbers between the upper and lower and then calculate the perecentages of how many are odd, even, etc.
View 14 RepliesIve got 16 cards to make 8 pairs (simple) ive got it to detect a pair by piccard1.image.TAG what i need to do is though, make the 'tag' part random, 0-15 so i can give each card a tag, but it has to be unique and i cant make it give 16 different number.
View 2 Replies
