Develop a web page for accepting information regarding stock, Visual Basic Programming

Assignment Help:

Develop a web page that is used for accepting information regarding stocks. Make sure the form carry out the possible validations. The simple instance code below merely illustrates the form & accepts input however does not store the data or perform any action.

<HTML>

<HEAD>

<SCRIPT LANGUAGE="VBScript">

<!--

Sub cmd_submit_OnClick

'To continue the flow if any error take place on Error Resume Next

If document.form1.TxtName.Value = "" or document.form1.TxtEMail.Value = ""

Then

Dim MyMessage

MyMessage = "Please enter your name & id." MsgBox MyMessage, 0, "Incomplete Form Error"

document.form1.TxtName.focus() End If

'Check to make out if the user entered anything.

If (Len (document.form1.txtAge.value) = 0) Then

MsgBox "Before submitting you have to inscribe your  age." Exit Sub

document.form1.txtAge.focus()

End If

If (Not (Is Numeric (document.form1.txtAge.value))) Then

MsgBox "You must enter a numeral for age." Exit sub

End If

'Check to make out if the age entered is valid.

If (document.form1.txtAge.value  < 0) Or  (document.form1.txtAge.value  > 100)

 Then

' MsgBox "The age you entered is wrong." Err.clear

Err.Raise 6

Err.description = "Error - The age you entered is wrong." msgbox Err.description

Exit Sub

End If

' Data looks okay thus submit it.

MsgBox "Thanks for your valuable advice." document.form1.submit

End Sub

-->

</SCRIPT>

</HEAD>

<BODY bgColor="#ffffcc" Text="#000099" Link="#ff0000" VLink="#ff0000" ALink="#009900">

<!--ENDOFADD -->

<FORM name = "form1" >

<CENTER>

<TABLE BORDER=8 CELLSPACING=1 CELLPADDING=0

WIDTH="600"><TR><TD>

<TABLE BORDER=5 CELLSPACING=1 CELLPADDING=0

WIDTH=100%><TR><TD>

<FONT SIZE=""FACE="Arial"><B><CENTER><H2>Sample Stock

Survey</H2></CENTER></B></FONT></TD>

<A NAME="ItemAnchor1"></A>

</TR></TABLE>

<HR>

<TABLE BORDER=5 CELLSPACING=1 CELLPADDING=0 WIDTH=100%>

<TR>

<TD ALIGN=RIGHT>*Name:</TD>

<TD><INPUT TYPE="TEXT" NAME="TxtName">

</TD>

<TD ALIGN=RIGHT>*E-Mail:</TD>

<TD><INPUT TYPE="TEXT" NAME="TxtEMail"></TD>

</TR>

<TR><TD ALIGN=RIGHT>Address:</TD>

<TD><INPUT TYPE="TEXT" NAME="TxtAddress"></TD>

<TD ALIGN=RIGHT>Age:</TD>

<TD><INPUT TYPE="TEXT" NAME="txtAge"></TD>

<A NAME="ItemAnchor1"></A>

</TR></TABLE>

<TABLE BORDER=0 CELLSPACING=1 CELLPADDING=0

WIDTH=100%><TR><TD>

<CENTER>

<FONT SIZE="" FACE="Arial">

<CENTER>

<TABLE BORDER="0" CELLPADDING="0" CELLSPACING="0" WIDTH="75%">

<BR></CENTER>

</FONT></CENTER></TD>

<TD>

<FONT SIZE=""  FACE="Arial">

</TR>

</TABLE>

<TABLE BORDER=0 CELLSPACING=1 CELLPADDING=0>

<TR>

<TD>

<TABLE BORDER=0><TR><TD  VALIGN="TOP">

<FONT SIZE="2" FACE="Arial" >

<B>Define your investment experience</B>

</FONT>

</TD>

</TR>

</TABLE>

<TABLE BORDER=0>

<TR>

<TD VALIGN="TOP">

<FONT SIZE="2" FACE="Arial" >

<INPUT TYPE="RADIO" NAME="RESULT_RadioButton-3" VALUE="Radio-

0">beginner

</FONT>

</TD>

<TD VALIGN="TOP">

<FONT SIZE="2" FACE="Arial" >

<INPUT TYPE="RADIO" NAME="RESULT_RadioButton-3" VALUE="Radio- 1">intermediate

</FONT>

</TD>

<TD VALIGN="TOP">

<FONT SIZE="2" FACE="Arial" >

<INPUT TYPE="RADIO" NAME="RESULT_RadioButton-3" VALUE="Radio-

2">expert

</FONT>

</TD>

<TD VALIGN="TOP">

<FONT SIZE="2" FACE="Arial" >

</FONT>

</TD>

</TR>

</TABLE>

</TD>

<A NAME="ItemAnchor4"></A>

</TR>

</TABLE>

<TABLE BORDER=0 CELLSPACING=1 CELLPADDING=0>

<TR>

<TD>

<TABLE BORDER=0>

<TR>

<TD>

<FONT SIZE="2" FACE="Arial" >

<B>Types of Investments you make</B>

</FONT>

</TD>

</TR>

</TABLE>

<TABLE BORDER=0><TR><TD VALIGN="TOP">

<FONT SIZE="2" FACE="Arial" >

<INPUT TYPE="CHECKBOX" NAME="RESULT_CheckBox-4" VALUE="CheckBox-0">Individual Stocks<BR>

<INPUT TYPE="CHECKBOX" NAME="RESULT_CheckBox-4" VALUE="CheckBox-1">Options<BR>

<INPUT TYPE="CHECKBOX" NAME="RESULT_CheckBox-4" VALUE="CheckBox-2">Mutual Funds<BR>

<INPUT TYPE="CHECKBOX" NAME="RESULT_CheckBox-4" VALUE="CheckBox-3">Real Estate

</FONT>

</TD>

</TR>

</TABLE>

</TD>

<A NAME="ItemAnchor5"></A>

</TR>

</TABLE>

<TABLE BORDER=0 CELLSPACING=1 CELLPADDING=0>

<TR>

<TD>

<TABLE BORDER=0>

<TR>

<TD VALIGN="TOP">

<FONT SIZE="2" FACE="Arial" >

<B>How do you buy your stocks?</B>

</FONT>

</TD>

</TR>

</TABLE>

<TABLE BORDER=0><TR><TD VALIGN="TOP">

<FONT SIZE="2" FACE="Arial" >

<!--DROP_DOWN_TYPE -->

<SELECT NAME="RESULT_RadioButton-5">

<OPTION>

</OPTION>

<!--DROP_DOWN_TYPE NAME="RESULT_RadioButton-5" VALUE="Radio-0" -

-><OPTION>1) On-Line</OPTION>

<!--DROP_DOWN_TYPE NAME="RESULT_RadioButton-5" VALUE="Radio-1" -

-><OPTION>2) Touch Tone Trading

</OPTION>

<!--DROP_DOWN_TYPE NAME="RESULT_RadioButton-5" VALUE="Radio-2" -

-><OPTION>3) Brokers Assisted

</OPTION>

<!--DROP_DOWN_TYPE NAME="RESULT_RadioButton-5" VALUE="Radio-3" -

-><OPTION>4) Other</OPTION>

</SELECT>

</FONT>

</TD>

</TR>

</TABLE>

</TD>

<A NAME="ItemAnchor6"></A>

</TR>

</TABLE>

<TABLE BORDER=0 CELLSPACING=1 CELLPADDING=0>

<TR><TD>

<TABLE BORDER=0 CELLSPACING=1 CELLPADDING=0>

<TR><TD>

<FONT SIZE="2"  FACE="Arial" >

<B>What is your hot stock pick for this year? </B>

</FONT></TD>

</TR><TR>

<TD>

  <FONT  SIZE="2"  FACE="Arial" >

<INPUT TYPE="TEXT" NAME="RESULT_TextField-6"  SIZE="30" MAXLENGTH="30">

</FONT>

</TD></TR>

</TABLE>

</TD>

<A NAME="ItemAnchor7"></A>

<TD>

<TABLE BORDER=0 CELLSPACING=1 CELLPADDING=0><TR><TD>

<FONT SIZE="2" FACE="Arial" >

<B>Stock Symbol if you know it</B>

</FONT>

</TD>

</TR><TR>

<TD>

<FONT SIZE="2"  FACE="Arial" >

<INPUT TYPE="TEXT" NAME="RESULT_TextField-7" SIZE="4" MAXLENGTH="4">

</FONT>

</TD></TR>

</TABLE>

</TD>

<A NAME="ItemAnchor8"></A>

</TR>

</TABLE>

<TABLE BORDER=0 CELLSPACING=1 CELLPADDING=0>

<TR><TD>

<TABLE BORDER=0 CELLSPACING=1 CELLPADDING=0>

<TR><TD VALIGN="BOTTOM">

<FONT SIZE="2"  FACE="Arial" >

<B>Any Investment recommendation for others?</B>

</FONT>

</TD>

</TR><TR>

<TD>

<FONT SIZE="2"  FACE="Arial" >

<TEXTAREA NAME="RESULT_TextArea-8" ROWS="7" COLS="35" WRAP="SOFT"></TEXTAREA>

</FONT></TD></TR>

</TABLE>

</TD>

<A NAME="ItemAnchor9"></A>

</TD></TR><TR><TD>

</CENTER>

</TD></TR>

</TABLE>

</TD></TR>

</TABLE>

</CENTER>

<BR>

<CENTER>

<INPUT TYPE="SUBMIT" NAME="cmd_submit" VALUE="Submit">

</CENTER>

</FORM>

</BODY>

</HTML>


Related Discussions:- Develop a web page for accepting information regarding stock

Adding handlers with class wizard, Adding Handlers With Class Wizard: ...

Adding Handlers With Class Wizard: Whenever a handler is added, the class wizard places the prototype for the message handler in the header (.H) file. It gives a skeleton hand

External application window position, I have an external application I open...

I have an external application I open from visual studio (excel). I want to reposition where that opens (top, left).. How do I do that?

Validation controls, Describe different validation controls of VB.net?

Describe different validation controls of VB.net?

Input box - dialogue box in visual basic , Input Box: To demonstrate t...

Input Box: To demonstrate the use of the Input Box as shown in figure. Now consider the illustration shown below: 1. Initiate a new project 2. Select the standard exe

Properties - intrinsic control, Properties: Every control has a defaul...

Properties: Every control has a default property related with it. The default property does not require to be named when you are functioning. The control Check box as value

John Galt requests a program to double-check his Gas Bill, John''s gas supp...

John''s gas supply is read from a 4-digit meter each month that shows the current total gas used in cubic meters. The amount of gas used that month is determined by subtracting t

Very Very Boards, This is from the book Programming in Visual Basic 2010 by...

This is from the book Programming in Visual Basic 2010 by Julia Case Bradley and Anita C. Millspaugh. The assignment is located in Chapter 3 on page 154. Before I type it in, I wou

Vb script, We will discuss scripting language; called VB Script. VBScript i...

We will discuss scripting language; called VB Script. VBScript is Microsoft's scripting language. It enables us to write programs which enhance the power of Web pages by letting us

Write Your Message!

Captcha
Free Assignment Quote

Assured A++ Grade

Get guaranteed satisfaction & time on delivery in every assignment order you paid with us! We ensure premium quality solution document along with free turntin report!

All rights reserved! Copyrights ©2019-2020 ExpertsMind IT Educational Pvt Ltd