PRIVATE n AS integer
成都网络公司-成都网站建设公司创新互联建站十年经验成就非凡，专业从事成都网站设计、成都网站建设、外贸网站建设，成都网页设计，成都网页制作，软文营销，一元广告等。十年来已成功提供全面的成都网站建设方案，打造行业特色的成都网站建设案例，建站热线：18980820575，我们期待您的来电！
Private Sub Command6_Click()
If Text1.Text "admin" Then
MsgBox ("用户名不正确，程序退出！")
End
Else
Do While n = 3
If Text2.Text "admin" Then
Text2.Text = ""
MsgBox "密码不正确，请重新输入"
Text2.SetFocus
n = n + 1
exit sub
Else
MsgBox ("密码输入正确，欢迎登陆")
Exit Do
End
End If
Loop
End if
If n 3 Then
MsgBox ("密码输入三次均无效，程序退出")
End
End if
End Sub
你可以在Form的构造函数中加入下面的代码，属性我就不设置了： TextBox tb = new TextBox(); tb.Text = "Yes!"; this.Controls.Add(tb); 最关键的是最后一步，你要添加到窗口中去 ，当然，在Form_Load事件中加入也是一样的。
按钮的焦点是去不掉的，既然你不想有焦点，不如不要用按钮，改用Label控件就是