Adding Two Numbers - Revision history

Debinbrier: /* Error Checking */

2016-11-22T16:08:47Z

Error Checking

← Older revision		Revision as of 16:08, 22 November 2016
Line 192:		Line 192:
	End If		End If

	If Not IsNumeric(txtSecondNo.value) Then		If Not IsNumeric(txtSecondNo.value) or txtSecondNo.value="" Then
	MsgBox "Second Number must be a number!",0		MsgBox "Second Number must be a number!",0
	Exit Sub		Exit Sub

Debinbrier: /* Creating the Form */

2016-11-22T16:06:21Z

Creating the Form

← Older revision		Revision as of 16:06, 22 November 2016
Line 83:		Line 83:
	* Add a text label before the first number:		* Add a text label before the first number:

	Click on the label object in the Toolbox ("A" icon). A new label object will show in the top left corner of the form.		Click on the label object in the Toolbox ("Lb" icon). This is located under Common. A new label object will show in the top left corner of the form.
	* Move it on the form before the text box. It should remain selected, shown by the red border; if not click on it to select.		* Move it on the form before the text box. It should remain selected, shown by the red border; if not click on it to select.
	* In the Properties window, change the id to "lblFirstNo" (This is optional since we will not need to refer to it in our program.)		* In the Properties window, change the id to "lblFirstNo" (This is optional since we will not need to refer to it in our program.)
Line 95:		Line 95:
	* Add a text label before the second number:		* Add a text label before the second number:

	Drag a Label object from the ToolBox to the Design Screen~~. This is located under Common~~.		Drag a Label object from the ToolBox to the Design Screen.
	* Place it on the form before the text box. It should remain selected, shown by the red border; if not click on it to select.		* Place it on the form before the text box. It should remain selected, shown by the red border; if not click on it to select.
	* In the Properties window, change the Name to "lblSecondNo" (This is optional since we will not need to refer to it in our program.)		* In the Properties window, change the Name to "lblSecondNo" (This is optional since we will not need to refer to it in our program.)

Debinbrier: /* Creating the Form */

2016-11-22T16:05:17Z

Creating the Form

← Older revision		Revision as of 16:05, 22 November 2016
Line 77:		Line 77:

	Add a text box for entering the first number.		Add a text box for entering the first number.
	* Click on the TextBox object in the Toolbox ("ab" icon). This creates a new TextBox near the top left corner of the form, surrounded by a red border.		* Click on the TextBox object in the Toolbox ("Tb" icon). This is located under JQuery Mobile. This creates a new TextBox near the top left corner of the form, surrounded by a red border.
	* In the Properties window, change the id to "txtFirstNo".		* In the Properties window, change the id to "txtFirstNo".
	* In the Properties window change the inputType to number.		* In the Properties window change the inputType to number.
Line 95:		Line 95:
	* Add a text label before the second number:		* Add a text label before the second number:

	Drag a Label object from the ToolBox to the Design Screen.		Drag a Label object from the ToolBox to the Design Screen. This is located under Common.
	* Place it on the form before the text box. It should remain selected, shown by the red border; if not click on it to select.		* Place it on the form before the text box. It should remain selected, shown by the red border; if not click on it to select.
	* In the Properties window, change the Name to "lblSecondNo" (This is optional since we will not need to refer to it in our program.)		* In the Properties window, change the Name to "lblSecondNo" (This is optional since we will not need to refer to it in our program.)

Ghenne: /* Error Checking */

2015-08-13T17:35:29Z

Error Checking

← Older revision		Revision as of 17:35, 13 August 2015
Line 182:		Line 182:

	<pre>		<pre>
	Sub ~~cmdAdd_Click~~()		Sub cmdAdd_onClick()
	Dim FirstNumber		Dim FirstNumber
	Dim SecondNumber		Dim SecondNumber

Ghenne: /* Creating the Code */

2015-05-11T20:20:02Z

Creating the Code

← Older revision		Revision as of 20:20, 11 May 2015
Line 140:		Line 140:
	We are now ready to add code to our form to make it actually do some work. We will use the same variables we declared in our first example but read their values from the fields entered by the user. Reading the user's input and adding the numbers will be performed when the user clicks on the Add button.		We are now ready to add code to our form to make it actually do some work. We will use the same variables we declared in our first example but read their values from the fields entered by the user. Reading the user's input and adding the numbers will be performed when the user clicks on the Add button.

	App Studio will automatically open the Code Window and generate the Add button subroutine when you select the drop down box ~~onclick~~ in the properties window of the button. You can also open the Code Window by clicking on Code under Form1 in the Project Explorer.		App Studio will automatically open the Code Window and generate the Add button subroutine when you select the Events drop down box in the properties window of the button and choose 'onclick'. You can also open the Code Window by clicking on Code under Form1 in the Project Explorer.

	Enter the code so it looks like the following screen.		Enter the code so it looks like the following screen.

Ghenne at 21:30, 13 January 2015

2015-01-13T21:30:29Z

← Older revision		Revision as of 21:30, 13 January 2015
Line 158:		Line 158:

	[[File:TT03.6.png]]<br>		[[File:TT03.6.png]]<br>
	The ~~CSng~~ function is used to convert the ~~number~~ string the user enters into a ~~single precision~~ number.		The Number function is used to convert the string the user enters into a number.

	Note: The code uses variables to hold the user's numbers and the total. You could also eliminate all the variables by directly accessing the fields and not storing anything.		Note: The code uses variables to hold the user's numbers and the total. You could also eliminate all the variables by directly accessing the fields and not storing anything.
	<pre>		<pre>
	txtTotal.value = ~~CSng~~(txtFirstNo.value) + ~~CSng~~(txtSecondNo.value)		txtTotal.value = Number(txtFirstNo.value) + Number(txtSecondNo.value)
	</pre>		</pre>

Line 197:		Line 197:
	End If		End If

	FirstNumber = ~~CSng~~(txtFirstNo.value)		FirstNumber = Number(txtFirstNo.value)
	SecondNumber = ~~CSng~~(txtSecondNo.value)		SecondNumber = Number(txtSecondNo.value)

	Total = FirstNumber + SecondNumber		Total = FirstNumber + SecondNumber

Ghenne: /* Creating the Code */

2015-01-13T21:28:19Z

Creating the Code

← Older revision		Revision as of 21:28, 13 January 2015
Line 33:		Line 33:
	We then add the two numbers and store the result in ''Total''.		We then add the two numbers and store the result in ''Total''.

	Finally, we display the result in a MsgBox ~~using the CStr function to convert the number into a string we can display~~.		Finally, we display the result in a MsgBox.

	Your code should look like the following:		Your code should look like the following:
Line 47:		Line 47:
	Total = FirstNumber + SecondNumber		Total = FirstNumber + SecondNumber

	MsgBox "And the total is: " ~~+ CStr(~~Total)		MsgBox "And the total is: " & Total

	End Sub		End Sub

Ghenne: /* Creating the Code */

2015-01-13T21:27:29Z

Creating the Code

← Older revision		Revision as of 21:27, 13 January 2015
Line 149:		Line 149:
	Dim Total		Dim Total

	FirstNumber = ~~CSng~~(txtFirstNo.value)		FirstNumber = Number(txtFirstNo.value)
	SecondNumber = ~~CSng~~(txtSecondNo.value)		SecondNumber = Number(txtSecondNo.value)
	Total = FirstNumber + SecondNumber		Total = FirstNumber + SecondNumber

Ghenne: /* Testing the Form */

2014-04-03T19:46:27Z

Testing the Form

← Older revision		Revision as of 19:46, 3 April 2014
Line 132:		Line 132:
	* Select Start in Desktop Browser from the Run menu, or click on the Start in Desktop Browser button, the rightmost symbol in the toolbar.		* Select Start in Desktop Browser from the Run menu, or click on the Start in Desktop Browser button, the rightmost symbol in the toolbar.
	* As a shortcut, you can use F5 to Start the program.		* As a shortcut, you can use F5 to Start the program.
	* If you deploy this program to an iPhone, it will look like this:

	[[File:TT03.5.png]]<br>		[[File:TT03.5.png]]<br>

	=== Creating the Code ===		=== Creating the Code ===

Ghenne: /* Adding Two Numbers Using MsgBox */

2014-04-03T19:35:24Z

Adding Two Numbers Using MsgBox

← Older revision		Revision as of 19:35, 3 April 2014
Line 51:		Line 51:
	End Sub		End Sub
	</pre>		</pre>

	~~Now, click on the run button. You should see this:~~



	[[File:TT03.2.png]]<br>		[[File:TT03.2.png]]<br>