<%@ Page
Inherits="System.Web.UI.MobileControls.MobilePage"
Language="VB"
%>
<%@ Register
TagPrefix="mobile"
Namespace="System.Web.UI.MobileControls"
Assembly="System.Web.Mobile"
%>
Sub OK_OnSubmit(Sender As Object, E As EventArgs)
If Page.IsValid Then
ActiveForm = FinishForm
lbl2.Text = "You entered " & txt1.Text
End If
End Sub
id="StartForm"
runat="server">
runat="server"
id="lbl1"
Text="Enter the same word twice:"
/>
runat="server"
id="txt1"
/>
runat="server"
id="txt2"
/>
id="cvCheckText"
controltovalidate="txt1"
controltocompare="txt2"
errormessage="ENTER THE SAME TEXT TWICE!!!"
runat="server"
/>
runat="server"
id="cmdOK"
OnClick="OK_OnSubmit"
Text="OK"
/>
id="FinishForm"
runat="server">
runat="server"
id="lbl2"
/>