<%@ Page Language=VB Debug=true %>
<script runat=server>
Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)
End Sub
Sub SubmitBtn_Click(Sender As Object, E As EventArgs)
lblDataEntered.Text = "You entered:<BR>" _
& txtName.Text & "<BR>" _
& txtEmail.Text & "<BR>" _
& txtPhone.Text
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>Creating a Basic TextBox Control</TITLE>
</HEAD>
<form runat="server">
<asp:Label
id="lblDataEntered"
runat="server"
/>
<BR><BR>
Enter your Name:<BR>
<asp:TextBox
id="txtName"
Columns="25"
MaxLength="30"
Text="Your Name Here"
runat=server
/>
<BR><BR>
Enter your Email Address:<BR>
<asp:TextBox
id="txtEmail"
Columns="35"
MaxLength="50"
Text="@mycompany.com"
BackColor="LightYellow"
Font-Name="Comic Sans MS"
Font-Size="9pt"
Font-Bold="True"
ToolTip="Remember to include your full email address!"
runat=server
/>
<BR><BR>
Enter your Phone Number:<BR>
<asp:TextBox
id="txtPhone"
Columns="15"
MaxLength="15"
Text="() -"
AccessKey="P"
BackColor="DarkRed"
BorderWidth="3"
BorderColor="DarkBlue"
BorderStyle="Dashed"
ForeColor="Yellow"
ToolTip="No Extensions!"
runat=server
/>
<BR><BR>
<asp:button
id="butOK"
text="OK"
Type="Submit"
OnClick="SubmitBtn_Click"
runat="server"
/>
</Form>
</BODY>
</HTML>
|