I'm designing a program to display 6 random numbers using labels. I know I'll need an array to accomplish this. I am trying to put the integers into the array and displaying them on 6 different labels
View 3 Replies[code] I am trying to place random numbers into labels, but the process that i am doing is taking way to long, just wondering if there is an easy way around this? I also need to know the answer to the sums that get placed into the labels and then check that against the answer in the text box.I have looked all over the DIC forums and nothing meets my queries.Please help, this is just a quick program for my son so that he can get some sums into him.
View 14 RepliesAs a brief summary, I have an issue writing a program. A part of the program has a While loop that is supposed to change some labels to random numbers every iteration of the loop. But, instead of all that, the labels just turn blank until the end of the loop is achieved, and only then is the random number written.
While (o < 3000)
r1 = Rnd()
str1 = CStr(r1)
Label1.Text = str1
o = o + 1
End While
I have attached the form in initial state. What you don't see in the initial state is 10 hidden labels. I want the loop(which I am calling as a function??) to compute the numbers and display in the labels. Example, if I input 1 for the first term, 3 for the second term and 4 for the total terms, the first 4 labels should become visible and have in them one solution each:
1 - 1
2 - 3
3 - 4
4 - 7
Am I way off with what I want to do? Cannot use arrays, must be a loop.This is the compute button:
Private Sub BtnComp_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles BtnComp.Click
Try
[code]....
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 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.
I'm having some problems with a program I'm making in vb.net. I have two forms: one containing a datagrid with basic details of orders (date received, total value of the order, customer who placed it, date it was sent out). The second form contains a datagrid with more details (the stock code and quantity of each product purchased) on each indivual order. The second form also has a label containing the total value of the order. All this information is stored in a database.
By clicking on a row in the datagrid in form 1, I capture the OrderID of this row and use that to look up the information form 2 requires in my database. I only want to show the details of the order that was clicked. I'm having no problems filling the datagrid with the information I want but I'm unsure of how to get the label working.
I figure I might need to do something invloving a datatable, like this:
Dim table As DataTable
Dim row As DataRow
table = orders.Tables("Orders")
row = table.Select("Total", "OrderID = '" _passedText "'")
Label1.Text = "'row'"
Where Total is the column I want it to display and Label1 where I want it; _passedText the variable containing the OrderID of the record that the user clicked on form 1.
My textboxes and labels are fine in design view, but when I switch over to Debug or Build, a couple of the textboxes are pushed together and the labels aren't in their original spots.Haven't seen this before and was wondering if anyone has any suggestions as to why and how to fix?
View 12 RepliesI want to display the labels at the left axis and bottom axis of a line graph to the right and top axis instead of the left and the bottom axis.
View 1 RepliesI've nearly finished my latest project (VB 2008 Express Edition) I built the project and ran the .exe from inRelease and it appears and works exactly as it did in Visual Basic
When I carry this .exe to any other computer, it displays differently. The biggest difference is the font size in labels (grows on other machines) and the size of the tabcontrol is a bit larger on other machines. see the links below for comparison (coding machine vs other machine) [URL]
note that both machines were set at the same screen resolution, both were using the default Windows XP "Theme" and display fonts appear to be set the same on both machines. I've tried this on about 3 other XP machines with the same result (only looks correct on the machine I coded on)
I've specifically used Microsoft Sans Serif font, size 8 (VB seems to display this as 8.25pt in the properties window) I have also tried making all labels "UseCompatibleTextRendering" both true and false with the same result. Perhaps something on the original (programming) machine is different that is throwing this off? Am I missing a step when building this project? If other encounter this problem often, what steps do you take (when programming) to avoid this and allow the form(s) to display correct regardless of the user's settings?
Edit: One difference can be found in (Right Click on Desktop -> Properties -> Settings Tab -> Advanced Button) the DPI Setting on the coding machine is Normal Size (96 DPI) The DPI on the other computers is Large Size (120 DPI)
The application will be used by roughly 100 folks on various systems (some Windows ME, most XP). How can I prevent things from going crazy with different user settings?
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 new to the forum and I was wondering if anyone would know how to display data from the tables of a MS Access database on labels on a form. The code underneath is my code for saving inputted data from textboxes.
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSave.Click
objDA = New OleDbDataAdapter("SELECT * FROM CDetails", "Provider=Microsoft.Jet.OLEDB.4.0;Password=;" & "User ID=Admin;Data Source =" & Application.StartupPath & "CustomerDetails.mdb")
objDS = New Data.DataSet()
objCB = New OleDbCommandBuilder(objDA)
[Code] .....
I would like to show these saved details onto another form. Is there a way to select rows and cells in the database and fetch the data in them to display them onto labels?
I was wondering how I could randomize a number between a given min/max and have it displayed in a label. And after it's been randomized in 2 different labels, I want to add these 2 integers (labels).
View 5 RepliesI have been coding an application for a LeaderBoard for a game. I have all the Login sorted using Mysql and even have all the Account infomation displaying in lables etc. for account info form. Now I am trying to UPDATE information and this is how I was trying to do this...
Dim UpdateInfo As New MySqlDataAdapter
Dim mycommand As New MySqlCommand()
Dim mydata As MySqlDataReader
Dim query = "UPDATE Login SET Pword = '" + UpdateTxtBox.Text + "' WHERE Uname = " + Login.Uname
mycommand.Connection = conn
mycommand.CommandText = query
UpdateInfo.SelectCommand = mycommand
mydata = mycommand.ExecuteReader()
But comes back with an Error saying... Unknown column 'username here' in 'where clause'. Now the username is in the database as I have just logged in with it and I am taking it I have the Query wrong somewhere.
I've made a thing that has several labels that gives a number on each label. And if you press a button next to the label it adds one to the number. But enough about that. I wanna be able to save the numbers in a file. And when I press open and select the file I've saved in the numbers should appear on the same place they were before. To make this easy, lets say I have 5 labels with numbers that's needed to be saved.
View 12 RepliesI would like to know how I can have an enumeration that has multiple values and can be passed to a function.
Example:
Public
Enum
ActionEnum
NoAction = 0
[code]....
Each time my application opens, how can i display a random number in a textbox? and i can only be between 1-100?
View 7 Repliesi 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 am suppose to write a program using if statements and loops: Create an application that reads an integer number from the user and then displays in the List Box all prime numbers (for this project we are going to violate "positive" rule and make our prime numbers be negative as well) between user's number and zero 5 numbers in one row. The application also displays how many prime numbers there are between user's number and zero, and the total sum of all these prime numbers.
View 1 RepliesI'm having a serious brain fart over this but I need a looping statement that will display all prime number from 6 to 10000.
View 3 Repliesi 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 Replies