Page Calculator - Converting Input To Numeric Variables
May 16, 2009
Description of Program/Events. I would like to come up with a number generator that takes the Total number (for this example I'll say 20), divides it by 2, and does alternating additions so the end result will generate a list like this:
1, 11, 2, 12, 3, 13, 4, 14, 5, 15, 6, 16, 7, 17, 8, 18, 9, 19, 10, 20.
I can understand the arithmetic, just can't work out how to express this in code. The end result would be save in a .Txt file (I have added a SaveFileDialog1 control, but figure I need to get the result before I work on the export).
Dim StartValue As Integer
Dim EndValue As Integer
Dim TotalValue As Integer
' Convert input to numeric variables.
StartValue = Val(StartNumTextBox.Text)
[Code] .....
View 3 Replies
ADVERTISEMENT
May 10, 2010
I am writing a calculator app in VB Express 2008. I'm trying to get the app to accept numeric and operator input while ignoring all the alpha input. In other words taking input from the numeric keypad and the top of the keyboard and ignoring all the letters.
Here's the block of code I have so far:
Private Sub TextBox1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
If (e.KeyCode >= Keys.D0 OrElse e.KeyCode >= Keys.NumPad0) And (e.KeyCode <= Keys.D9 OrElse e.KeyCode <= Keys.NumPad9) Then
Select Case e.KeyCode
[code]....
I can't get vb to recognize the above code it seems to skip right over it. BTW, is 'Keys.Crsel' the same as the caret '^' symbol?
View 7 Replies
May 11, 2010
I am having trouble getting the numeric keypad on my keyboard to work with my calculator. btn0 - btn9 are working, but the numeric keys +,_,*,/ are not working. They input the sign into the text box instead of clicking the button associated with the function on the calculator. I would like to be able to use the calculator as a 10 key adding machine of sorts. [Code]
View 5 Replies
May 2, 2010
I am trying to create a calculator, which can accept numeric keyboard imput, as well as button clicks, and display the number in a label.
Why does the numeric keyboard input work in this instance
Public Class Form1
Sub Form1_KeyPress(ByVal sender As Object, _
ByVal e As KeyPressEventArgs) Handles Me.KeyPress
[Code].....
Even if I press a keyboard number before pressing the button(so there is no need to clear the label if the button is pressed first etc), the number is not displayed in the label. And even if I completely comment out the code for the button-click, the keypress event still does not display the number in the label. It is as if just having the code for the button completely disables the keypress.
View 4 Replies
Jun 12, 2011
I have a text input in textbox1 in tab page 1 and i want that text from textbox1 will be displayed in textbox2 in tab page 2.
View 3 Replies
Sep 25, 2009
I have been trying to do a try catch for a calculator I am building. I need to do some error handling. Since the calculator is for converting temperature, the number entered for Fahrenheit can't be below -459.4 as that is absolute zero. However, when trying to make the code to check to see that that value is not below -459.4, it doesn't seem to respond in anyway.
Here is the code I have so far, it includes other errors I am checking for:
CODE:
The code in Red is where I am having problems. I need to know how to get a Try...Catch to work for a less than statement. Please someone help me.
Also another problem I am having is that I need to also check to make sure the textbox_fahrenheittemp is not empty and doing so using Try...Catch. What would be the exception for that?
View 2 Replies
May 11, 2009
I need to write a simpe calc. program to add, mutiply, subtract and divide. I want to have two textboxes that I enter numbers in and when I click a button, +,-,/ or * a third text box will display the result.Rather than declaring my variables inside each instance of a click event I would like to declare them globally so I just need to perfom the calculation on them and display result. However declaring them globally doesn't work for me. I;ve tried the variables inside the btnAdd click event which works, but as I said I'd prefer to declare them onece globally.
Public Class Form1
Dim number1 As Double = CDbl(txtNum1.Text)
Dim number2 As Double = CDbl(txtNum2.Text)[code]...
View 1 Replies
Feb 26, 2012
I used the following statement for a parameter.[code]...
View 1 Replies
Apr 6, 2010
I'm having an issue with my base conversion program. It seems to have a problem converting from base36 to base10 properly. After debugging all night, I've found that it's one certain function that's not working properly. The function seems to convert every last test number correctly, until I start getting into 11-digit numbers in base36. I have the max digits allowable for base36 set to 12 (so as not to exceed the base10 18-quintillion or so that an unsigned long can hold). I'm starting to think the issue is with VB and not with my code.The function as I've written it is below (DIGITS is a global const string ="0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ", and itr is a global integer used throughout the code for iteration):
'-----------------
Public Function FromBase10(ByVal iValue As ULong, ByVal cBase As ULong) As String
Dim remaining As ULong = iValue
[code].....
View 14 Replies
Sep 25, 2009
I need the create a function with two variables Price1 and Price2 and the following rule:
if Price1 > Price2 at time t and not (Price1>Price2) at time t-1 Then
result=true
else
result=false
I should be able to use a loop to store the time t and t-1 Price1 and Price2 values.How can I do this in VB.net
View 11 Replies
Nov 4, 2009
I am making a calculator at the moment and the plus works and so does the minus well the minus does the FIRST time but not the time after that.you would normaly get 2, but instead it says that the answer is -3.I have attached the calculator so that you can have a look.
View 3 Replies
Dec 7, 2009
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
End Class
I haven't got the code, however I got the physical part of the program done with a label called Numeric Number and another called Roman Numeral, with text boxs next to each label. I also have a button called "convert" so when you enter a numeric number in, it'll convert it to a roman numeral. I need it to only convert from 1 to 10, but not accept a number less than 1 or more than 10.
View 5 Replies
May 19, 2011
I've got an unusual error regarding converting a varchar to numeric. I have code which goes through and adds the data to the database. When the code attempts to add the new data to the database, an error message appears highlighting the following line of code:
check = cmdCDQAssets.ExecuteReader.RecordsAffected
View 7 Replies
Feb 23, 2009
I am working with SQL and Vb.net. When I run the following function (shown below) an error is highlighted "Error converting varchar to numeric". Whats wrong with the coding that triggers the error..
Dim query As String
Dim cmd As New SqlCommand
Dim irow As Integer
[code].....
View 1 Replies
Mar 11, 2010
can anyone look at this and see why it doesn't work? When I test and enter a numeric value in the text box it still gives the error I have placed in the code, same if I put in a letter etc.
Private Sub valueDouble(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtTestscore1.TextChanged, txtTestscore2.TextChanged, txtTestscore3.TextChanged
[code].....
View 6 Replies
Apr 29, 2010
When I try to close my form it gives me the following error; Error converting data type varchar to numeric. I have only one field which is numeric - ProjectID, and when I close this form sometimes this txtProjectID is empty and this calls the error. But if there is a number in the txtProjectID it closes fine.
View 3 Replies
Aug 12, 2010
I am getting the error Error converting data type varchar to numeri when trying to save some of the information that is entered in a textbox to my sql server 2005 database. HEre is the code for my insert statement.
'declare your variables
Dim FirstName, LastName, Comments, MRN
Dim sConnString, connection, sSQL [code]......
View 1 Replies
Oct 18, 2011
1. My input box does not prompt
2. Then a loop should be used to display in a list box the distance the vehicle has traveled for each hour of that time period.
[Code]...
View 5 Replies
Mar 31, 2010
The object of this project is to create code for a 4 function calculator that takes a character string like: 5 + 123 + 6 = and generates a new string: 134 There are multiple tasks to be done. First the string must be broken into tokens; in this case, there are 6 tokens:
5, +, 123, +, 6, and =
Dim input As String = (txtIn.Text)
Dim x() As String = input ?????
[Code]....
View 1 Replies
Jun 2, 2009
How do I suppress all data except numeric?
This is not working on KeyDown():
If e.KeyData < Keys.D0 Or e.KeyData > Keys.D9 Then
e.Handled = True
End If
View 4 Replies
Sep 29, 2010
I am writing a small program here and this i=code is straight out a book and it doesn't seem to work. Its supposed to ensure that the users input is numeric and not contain letters.
Module Module1
Sub Main()
Dim user_Input As Single
Dim H As Single
Do
Console.Write("Enter you'r Height in Meters: ")
user_Input = Console.ReadLine
Loop Until IsNumeric(user_Input)
H = CSng(user_Input)
Console.WriteLine("You are {0} meters tall", H)
End Sub
End Module
View 4 Replies
May 10, 2010
i have finished my code and the program works but i need setup a few error messages incase a user inputs invalid data (non numeric, and negative numbers)i keep getting both errors at the same time when i input a negative or non numeric data. My program allows a user to calculate cell phone bill
[Code]...
View 5 Replies
Jun 9, 2011
I have a function in my textbox1 with the got focus event. I have a 40 textbox in my goupbox1.[code]I want that when the textbox1 gotFocus, all my textbox in groupbox1 under the for loop event will declare that only numbers are allowed to be entered in all the textbox. I manage to work with it but only in a single textbox. Here is my code for it.[code]Is there a way or would it be posibble to put this code # 2 into the code # 1? So that I don't have to declare 40 TEXTBOX which is not good.
View 5 Replies
Nov 5, 2010
I'm working on a program that requires the user to input an integer. How do I prevent the user from entering a non-numeric value? I tried using the IsNumeric() function but I get an error before I can use it. I get the error at the console.read, before I can call the IsNumeric() function. [code]...
View 5 Replies
Aug 25, 2009
Is it possible that a user input to a textbox like '12500', but vb shows it
'12,500' at the time of input.
But at the saving time vb should to read the '12,500' as '12500'.
View 1 Replies
Mar 11, 2009
I am writing an calculator application and i dont know what datatype to use. i mean should the variables be single, double, decimal...?
View 1 Replies
Jul 18, 2012
How can i check whether the text box is numeric or not? Because i want to do validation. but i tried many style still cannot work.
View 6 Replies
Mar 24, 2010
I currently have a subroutine that generates a file with specific parameters, and it relies on user input in 2 fields. Now I also have a numericupdown control. What I'm looking for is a way that if Numericupdown.Value = 3 then it will generate 6 textboxes and once the parameters are filled out completely it will generate subroutine times(numericupdown.value) and output it to a single file.
View 3 Replies
Jan 14, 2012
I'm trying to validate input boxes for numeric value and range value. If I validate for either numeric value OR range value there is no error (for example, comment out one of the validation statements), but if both statements are present and I enter "a" I get an error "Conversion from string "a" to type 'Double' is not valid." Can anyone tell me what I'm doing wrong?
[Code]...
View 10 Replies
Apr 29, 2010
i am use vb 2003 windows app with access 2003 database i want this code to check for numeric input only in the last text box CompanyProdPriceTxBx.Text
this is my
Private Sub SaveCompanyProdbtn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SaveCompanyProdbtn.Click
Dim rep As Integer
If CompanyProdNameTxBx.Text = "" Then
rep = MsgBox("Please Input Product Name", MsgBoxStyle.Critical)
[code]....
View 5 Replies