怎样获得焦点？？？急！！！

[nannanwang]

我想在WEB页中加入验证控件后，程序得知某个控件不合法，那么弹出控件。之后我想把光标置于不合法的控件中，请问高手们怎么实现。还有就是验证控件有弹出的属性吗？？？很急！！！

[Fortune2k1]

If (Not checkUI.IsFill(Me.txtETFCode.Text)) Then
PageMessage("txtETFCode", "", "UI004")
Exit Sub
end if
Private Sub PageMessage(ByVal CtlID As String, ByVal Column_Name As String, ByVal Msg_ID As String)

Dim msgTable As New DataTable()
msgTable = CType(Application("SysMsg"), DataSet).Tables("SysMsg")

Dim row As DataRow
row = msgTable.Rows.Find(Msg_ID)

'fPopStr = row("Msg_Desc").ToString()

Page.RegisterStartupScript("body", "<script language='javascript'>alert('" + Column_Name + fPopStr + "');document.all('" + CtlID + "').focus();</script>")

End Sub
注意:
Page.RegisterStartupScript("body", "<script language='javascript'>alert('" + Column_Name + fPopStr + "');document.all('" + CtlID + "').focus();</script>")
通过javascript实现了控件Focus,CtlID是要聚焦的控件得名称.

[citylamp]

控件名.focus();

[nannanwang]

请详细一点好吗？我这怎么没有，写完了会出错，需要继承什么类吗？