# 还是很感谢你! 因Form上规定,不能用Text 阵列 So ...,希望能有方法解决

Posted by Jonny on May 31, 1999 at 21:51:11:

In Reply to: 有问题 posted by 小翰 on May 31, 1999 at 04:31:25:

:
: : 有二个TextBox => Text1,Text2

: : Private Sub Text1_LostFocus()
: : If screen.ActiveControl.text = "" then <== 判断上一个TextBox.text 若是空值时,便将Focus设回前一个TextBox
: : screen.ActiveControl(Index -1).setfocus
: : End if
: : End Sub
: : 我想写的如上,不知正确的写法为何,请指教...

: 上面的程式是绝对有问题的
: 在 Text1_LostFocus里写 screen.ActiveControl.text 是绝对会出错,因为Text1已经LostFocus
: 此时的screen.ActiveControl是使用者点到的下一个能接收驻点的控制项,除非你的form上的控制项都有text属性
: 不然那个程式一定错
: 这种问题不要再想了, 不要什么Text1,Text2
: 应该用 TextBox 阵列

Follow Ups: