1:在module里定义一个全局:Public m1 As Integer但问题是怎么初始化呢?总有个错误提示我其实是想达成这样的效果:某click:
m3 = m3 + 2
MsgBox CStr(m3)
每次点后都增加2。变量具有记忆效果。还有别的办法吗?static变量也不知道怎么赋初值2:在一个form的load事件里写:Text1.Text = form2.Text1.Text
Text2.SetFocus这样会出错,注掉第二句就好了。但怎么做这样的效果,即:Text1里文本反亮,同时光标要闪烁在Text2里?

解决方案 »

  1.   

    1/FORM_LOAD中赋值
    2/好象不可能实现
      

  2.   

    第二条语句可以写在Form_Resize里
      

  3.   

    Text1里文本反亮,同时光标要闪烁在Text2里?
    那不是要2个控件同时获得焦点了?好像实现不了吧
      

  4.   

    1、m3的定义写在最上面作为全局变量
    2、画面先要显示出来才能设焦点
    Text1.Text = form2.Text1.Text
    Me.Show
    Text2.SetFocus
      

  5.   

    Static变量可以在form的load事件里赋值,获得焦点事件不可以在窗体的登录事件里面,可以通过把Text2的TabIndex设置为0来实现窗体登录后默认焦点在Text2上面。