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

Features of user interface design, FEATURES OF USER INTERFACE DESIGN Th...

FEATURES OF USER INTERFACE DESIGN The features like how will the software's are used? Who will be the users? What will be the life of the software? During its lifetime how ofte

Runtime proggramming, i have a database i want mange it network and i want ...

i have a database i want mange it network and i want write it with vb.net so how i can do this

program that compares interest rates between two banks, 'This program comp...

'This program compares interest rates between two banks and determines the best bank PublicClassForm1 PrivateSub Button1_Click(sender AsSystem.Object, e AsSystem.EventArgs) H

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

Describe different validation controls of VB.net?

Creating an order entry and editing application , Assume you are creating a...

Assume you are creating an order entry and editing application for a book store. An order consists of a product, quantity, total price, payment type including Credit/Debit card acc

Use of wm_size message - class wizard, Use of WM_SIZE Message: Wheneve...

Use of WM_SIZE Message: Whenever the WM_SIZE message is handled and the graphical objects on the output window will also change consequently to the output window. The functi

Dialog boxes in vb, DIALOG BOXES IN VB The two dialog boxes, namely, th...

DIALOG BOXES IN VB The two dialog boxes, namely, the message box and the input box are usually used in the Visual Basic. The message box is used for displaying the messages to

Visual processing - visual interface design, Visual Processing: Our mi...

Visual Processing: Our mind groups the things into patterns and this allows us to process the visual information. Understanding and applying how the human mind processes the v

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