初学者问题，怎么文本框的text属性找不到？如何指定焦点顺序？（结） - 编程论坛

#2

sblisb2018-04-25 11:02

原来是一个数组文本框，要加入序号，
焦点转移有什么好办法，继续求助中

#3

风吹过b2018-04-25 11:28

按件数组元素按你所需要排列顺序排列好来。

if 按键=13 then            '等于回车键
  if index<txt.count-1 then
      txt(index+1)   给焦点
  else
      txt(0)    给焦点
  end if
end if

大体上描述就是这样的，自己替换成代码。

#4

wmf20142018-04-25 11:30

D1.text编译错误是因为D1是控件数组，改成a = Form1.D1(Index)就没问题了。
至于按焦点顺序输入很容易做到，我一般通过sendkeys发tab键消息。

#5

ZHRXJR2018-04-25 19:36

D1-D30均是单独的文本框，搞不清为什么要设置下标？你的意图是什么？
如果你需要数组控件，那么D1-D30的名称必须要一致，比如均修改为 D1，这样就按数组控件处理：
    For I = 0 To 29
        D1(I).Text = (I + 1) * 2
    Next I
如果不需要数组控件，将下标删除(因为这个下标没有任何意义)，那么文本框赋值必须是一个一个赋值：
     D1.Text = 2
     D2.Text = 4
     D3.Text = 8
.......................
     D30.Text = 8192

#6

sblisb2018-04-27 11:03

谢谢大家，没用过数组控件，所以卡壳了