如何使一个TextBox永远不丢失焦点

解决方案 »

  1.   

    吖!!!这有什么用处??永远不丢失焦点,那你怎么退出form吖?你所谓的不丢失焦点是选定某个TEXTBOX所有TEXT吧?
      

  2.   

    在TextBox的LostFocus写Text1.SetFocus
      

  3.   

    Private Sub Text1_LostFocus()
             Text1.SetFocus
    End Sub
      

  4.   

    加一句:  
    Text1.SetFocus
      

  5.   

    MSTOP(陈建华(东莞立晨企资))
    答对了。您还可以前往“http://b4018.xici.net”提问,
    提供:VB、VBA、Office二次开发免费技术支持;
    承接:各类项目开发,如MIS系统,WEB网站,中小型应用软件等等;CO.:Vansoft Workroom
    MSN:[email protected]
    Email:[email protected]
           [email protected]
    TEL:025-86685867(范,24H)
      

  6.   

    Private Sub Text1_Validate(Cancel As Boolean)
        Cancel = True
    End Sub
      

  7.   

    Private Sub Text1_LostFocus()
             Text1.SetFocus
    End Sub
      

  8.   

    Private Sub Text1_LostFocus()
             Text1.SetFocus
    End Sub
    这样写理论上可以,但是经常失去焦点又得到焦点会有冲突导致程序退出的
      

  9.   


    Private Sub Text1_LostFocus()
    Text1.SetFocus
    End Sub
      

  10.   

    没大必要.这个TEXT是做什么用的.如果只是接受普通输入的话可以把代码写进Form_KeyPress里面,再决定是否加入TextBox.如果直接写SetFocus容易出问题.