g = 1
Do Until EOF(2)
Line Input #2, e
If Mid(e, 1, 1) = ch(d) Then
f = Mid(e, 2, 3)
h = InputBox(ch(d) & " 的第" & g & "個編碼為", , f)
g = g + 1
If h <> "" Then
dh(d, g) = f
Print dh(d, g)
End If
End If
问题是怎样连续调用这一过程,就是在按下输入框的“确认”之后,马上弹出下一个输入框供输入,我用了for 或者loop循环都奴能实现这一操作,所以向高人请教还有什么方法
| 更多同济资讯请访问同济大学论坛 | 直接去论坛查看 举报不良信息 广告投放联系 |
最新回复
estellayuan (2008-7-08 22:37:46)
刚学第二天的人飘过~
绝对次要 (2008-7-08 22:39:02)
Ms.Nik (2008-7-08 22:40:00)
Jaedong (2008-7-08 22:44:15)
最真的模样 (2008-7-08 23:11:27)
天草___流 (2008-7-08 23:20:30)
gigilover (2008-7-08 23:26:27)
TJ小五哥 (2008-7-09 09:24:57)
QUOTE:
其实,我个人觉得,AV更好一点appreciate (2008-7-09 09:35:53)
大家好 (2008-7-09 11:56:49)
大家好 (2008-7-09 12:04:34)
第五号情人 (2008-7-09 12:09:09)
xiaowufeidao (2008-7-09 12:17:15)
while循环啥的应该是可以实现的。
hallway.wang (2008-7-09 12:23:55)
hallway.wang (2008-7-09 12:26:05)
chentianyu1 (2008-7-09 12:34:17)