VB6.0循环判断TEXT控件的值为空，

显示全部楼层 · 2011-11-2 11:37:58

VB6.0循环判断TEXT控件内容是否为空，我有Text1，Text2，Text3至。。。Text10共十个控件，定义一个变量为名KONG当Text1为空时KONG=1，。。当Text10为空时KONG=10。（就是1至10循环扫描）如果Text几为空变量KONG就等于几，从小显示到大。

千问 · 2011-11-2 11:37:58

Dimkong(9)AsIntegerPrivateSubCommand1_Click()Fori=0To9IfText1(i).Text=\"\"Thenkong(i)=i1MsgBoxkong(i)EndIfNextEndSub添加10个text1数组