How can i insert dot in a number like 1.000, 2.000, 100.000 and so on ?
Here is the code i use:
If ComboBox1.Text = "Metal Mine" Then
TextBox1.Text = Val(TextBox1.Text) - 1
Label9.Text = CInt(60 * 1.5 ^ Val(TextBox1.Text))
[Code]....
How do I insert commas to numbers so I can convert 1000 to 1,000 or 1000000 to 1,000,000. FileSize = GetSize(MyFile).ToString & " KB"
the output would be "6652 KB"
i m trying to get output 6,652 KB
For my database I need to create unique numbers and insert them in the column "ID". Can I add them via a SQL query? The numbers would simply be 0001 to whatever.I'm using the "Show Table Data" gui.
View 7 RepliesWhy is my application messing up? I'm trying to make non-repeating random numbers and then insert them into a listbox. Check my code out:
Dim RandomNumber As String
Dim x As Integer
Do[code]....
I have six textboxes, and upon button press it randomly generates six numbers, one in eact text box e.g. [43] [85] [93] [1] [0] [17]..i create another six textboxes and at the same time allocate these numbers in ascending/descending numbers.I am not looking for any codes whatsoever, as i love the challenge of VB.Net.
View 2 RepliesIm trying to write a program that will do:
1.The average of the four numbers. This answer will be placed into a text box reserved for that value. This text box cannot be changed by the user.
2.The maximum and minimum values. These will be denoted by changing the color of the largest number green and the smallest number red.
3.The range of the numbers. The range is defined as the difference between the largest and smallest numbers. The range will be placed into its own text box, labeled as such. This text box cannot be changed by the user."
Im using visual studio 2008 and it has to be written in VB
So 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.
I have a program that allows a user to input numbers from an inputbox and it displays the Total numbers entered, the sum of the numbers entered, and the average of the numbers entered. What I can not seem to find it how to have it display the largest number entered. The code I have so far is,
[Code]...
how can i add two excel sheets with numbers and the equal (similar)numbers to save once
View 1 RepliesI am making a program, where the user enters 6 numbers in 6 different text boxes, and it displays the larger of those 6 numbers. But I also want to make it where if the user enters a string value (like S for instance) in the text boxes, it gives an message and says "please enter the numbers again" and the user gets to enter the 6 numbers again. But when I do try to do that, it gives an error message saying conversion from "w/e the user entered" to Double is not valid. If the user just enters the numbers, it works fine. However, I am trying to make it if the user does enter non numeric value, it gives a message window and the user can reenter the numbers again.
Here is my code Example
CODE:
This is where I am trying to use IsNumeric to show a message if a user does not enter a string so the user can renter the numbers again, but when the user does enter a string value (say in textbox 1) it gives me an error message saying conversion from "S" to 'double' is not valid.
CODE:
Then right here this is where I have my series of ifs statements, this part works fine, it displays the largest numbers of the 6 textboxes every time. Error free.
CODE:
And do this with variable number 2, 3, 4, 5.
I know there are easier ways to do these with arrays and stuff. But I am not there yet. I am still learning about ifs and stuff.
I have just about completed a .NET project to write a program to randomly select numbers for a Bingo caller. Over the last month or so Ive learned a lot about .NET but heres something that I consider to be odd and maybe one of you guys can offer an opinion.
One of the features of calling Bingo in a small local club is that callers often use little sayings to accompany certain numbers, I expect youve all heard of (say) All the sixes, clickety click for 66 or 5 and 9 the Brighton line for 59 etc. My little program gives an option to incorporate these with a prompt for the caller that can be edited outside of the program. One of these conventional sayings is used when a number is reversed 12 followed by 21 or 45 followed by 54 for example, when the caller might call (say) 1 and 2, one dozen, number 12 And the other way round 2 and 1, twenty one.
So, I programmed in a bit of code to detect this and to over-ride whatever might otherwise have been the quote with And the other way round and set about testing it. Ive been through literally dozens of full 90 calls watching for the occurrence of a reversed number, spent a few hours doing it, and not once has it occurred which is to say the least, unusual.
So, Im wondering about the Rand Function, could it be that it isnt possible for a reversed number to be selected? Just so you know, I randomly pre-select the order of all 90 numbers, I fill each of the 90 elements of an array with a random number first checking that the number selected hasnt already been stored, if it has, I just get the next random number (and check that too of course), but I cant see how that could prevent reversed numbers being selected, especially in light of the fact that frequently it's not the 'next' number that's used.
am writing an system application for a company that must generate inquiry id and order id automatically. Whenever a customer makes a new inquiry or new order by clicking the add button, an automatic number should be displayed in the text box and when it's saved, it should be saved in the database access.
View 9 RepliesHow do you sort strings with numbers when you want numbers sorted based on their dimension?
View 19 RepliesSub five()
Dim i As Integer
For i = 1 To 14[code].....
I want the numbers that I was comparing similar numbers. I get equal numbers and ELSE giving all series.I like numbers 2 4 6 8 9 10
I 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]....
I am working on an assignment that will display the forst 10 fibonacci numbers in sequence. However when my results are displayed, the numbers are all stacked on top of each other like this: 011235813213455. I have tried to play with it but i can't seem to get my numbeers to space out or even maybe have a comma "," betweeen each number.[code]
View 2 RepliesThe 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 have one more issues, and hope is the last for now. How can I limit a textboxe's input to only numerical with certain range of values (eg -10 to 10) and with that happening while I type in the values?
View 9 RepliesI'm trying to make a program that will calculate the sum of consecutive numbers between two given numbers. [code]
View 13 RepliesI'm using VB08. I've populated a listbox with numbers and I want to add all those numbers together and display the result in a Label. I've heard about using parse but I don't understand exactly how it works.
This is the code that I have that i think should work.
Dim lblTotal As Decimal
Dim sum As Double
For Each decAdded As Decimal In Me.lstRunningTotal.Items
sum += Double.Parse(decAdded)
Next
lblTotal = FormatCurrency(sum)
When I run it, nothing happens. My "For Each" statement I'm not sure if it's doing what I think it's doing. I can't believe I spent 6 hours banging my head against the wall but I finally got it figured out.
This is my revised code:
Dim sum As Decimal
For Each decAdded As Decimal In Me.lstRunningTotal.Items
sum += Decimal.Parse(decAdded)
Next
lbl_Total.Text = sum
Just some suttle changes made the difference
I just D/L VB express 8, and I'm trying to learn how to use it. what I'm trying to do is write some code that:takes a number into a text box (textbox1.text)do some simple calculations with that number when I press a button (button1)display the results in a second text box 9textbox2.textThe first problem I am having:The numbers are in the "milli" range, meaning to the power of negative three, so 10^-3 = 0.01 I do not want to enter 10^-3 or any other exponent into the textbox, I am simply entering in 10 because all my units will be in milli. I've tried using exponent and scientific notation but it doesn't calculate correctly. I've done a "work around" to get it to do what I want, but there has to be a simpler way to achieve the above results without. for example, the user enters 10 into the textbox, the button multiplies 10^-3 *30, as a crude example, and stroes that value (say, B=10^-3*30) and B is DIM B as Double.
Problem number two:Error checking. I need to validate that only numbers can be entered into the textbox, or else the program will display an error message (messagebox). I can achieve this to some degree with sample code from here and other places, but, some of the code does not take into account that some numbers have decimal places (I have foud code that does, and it does work), but if a users enters, say the letter "E", it crashes the program. If the user enters "10.3Z", it crashes the program. I cannot seem to code for the last case, a mixture of numbers and letters to get an error message box.
I have an id called "AM01". I separated them by truncating the numbers out and increase it by 1 each time I want to add a new record. Therefore before I add the record, I would have to combine them back. I managed to truncate them and combine them back. However, the results turn out to be "AM2" instead of "AM02". So, is there a way where I could make the numbers as "02" instead of just "2"?
View 6 RepliesI am very new to visual basic and was recently asked to teach a course without any formal training. I am writing a program that adds the numbers between 2 inputed numbers. I need to display the sum of the numbers between the inputed numbers and the expression used to create the sum.For example: If 10 and 15 were inputed the answer label would display the following 10+11+12+13+14+15=75..The code is properly generating the sum but I can not figure out how to display the expression used to generate the sum. [code]
View 4 RepliesBasically, 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?)
im trying to write to an sql database. im inserting an image, as well as some other information. I am using the following code which works fine, as long as i do not add an extra column/variable "LOCATION" in to the mix and leave "
'Cmd.Parameters.Add("@LOCATION", OleDb.OleDbType., 3).Value = "testing"
commented out. *this is undesireable as im trying to add extra criteria to be saved like LOCATION.
Try
Dim st As New FileStream("\serverfolder1storage" & "pdftemplate.jpg", FileMode.Open, FileAccess.Read)
Dim mbr As BinaryReader = New BinaryReader(st)
Dim buffer(st.Length) As Byte
[code]....
i am trying to store the location e.g "c:file1.jpg" in the sql db. Can anyone reccomend a solution to this using OLEDB? ideally i need to add approx 4 more variables. e,g
firstname
surname
dob
location
Im getting an error with my insert statment "Syntax Error in INSERT INTO statement". I do not understand why. Im using global variables from form 1 and using them in form2 and trying to insert them from form2 into the database.
[Code]...
could someone tell me what i am doing wrong in this codeProtected Sub insert_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Insert.Click
[Code]...
Visual Studio 2008VB.NETFramework 3.5Windows Application
I have a SQL database names TestSQLVB
In it a table called tblTest2, with a three fieldstest2id , int, pk, increment by 1field1, varchar(50)field2, varchar(50)
I have a dataset named Dataset2.xsd
A tableadapter named tblTest2TableAdapter
A insert query names InsertTest2 with fields @f1, @f2 and ExecuteMode = Scalar
When I run the following code per MSDN [URL] the database does not get updated.
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim testds As New DataSet2TableAdapters.tbltest2TableAdaptertestds.InsertTest2("One", "Dog")
End Sub
im in the middle of doing sql queries i can search my data base usingGetDateFrom (Select, from, where) Me.nameTableAdapter.FillBy(namenDataSet.descip, Me.box1TextBox.Text,Me.box1TextBox.Text, Me.box2TextBox.Text, Me.box2TextBox.Text)i have this working fine im struggling with inderting data to my databse i have made the query ..
INSERT INTO `details` (`Forename`, `Surname`, `Username`, `Password`)
VALUES (''& ForenameTextBox.Text &'', ''& SunameTextBox.Text &'', ''& UsernameTextBox &'', ''& PasswordTextBox &'')
[code]....
I have run into a problem. When I insert some data into a table with the Insert Function, I want it to return to me Id key.Say a table is like this
ProductId
Product
Quantaty
If I run
Code
Insert Into [table](Product, Quantaty)Values(Cd, 3)
I want it to return to me the value of the ProductId so that I can use it, is this possible?