[已解决]自定义函数问题

风行者 · 发表于 2010-9-1 10:34:11

本帖最后由风行者于 2010-9-1 11:04 编辑

问题是这样的
创建了100个函数，用reg1,reg2。。。编号
如果变量$a=1 ，就运行reg1，如果$a=2,就运行reg2......

现改用循环
for $i = 1 to 100
if $a = 1 then reg&$i() ;这样就运行不了，问题就在这里
next

afan · 发表于 2010-9-1 10:40:14

For $i = 1 To 100
        If $a = 1 Then Call('reg' & $i)
Next

netegg · 发表于 2010-9-1 10:42:40

func reg（$i）
swich $i
  case 1
reg1()
  case 2
  reg2()
endswitch
endfunc
你什么时候见过函数名可以用变量的

republican · 发表于 2010-9-1 11:00:39

本帖最后由 republican 于 2010-9-1 11:03 编辑

For $i = 1 To 2 
         Execute("_Reg"&$i&"()")  
Next    

Func _Reg1()
          MsgBox(0,"","I 'm One")
 EndFunc

Func _Reg2()
          MsgBox(0,"","I 'm Two")  
EndFunc

话说，论坛的AU3代码太难编辑了。

风行者 · 发表于 2010-9-1 11:03:00

call还真没用过，谢谢了

vason1019 · 发表于 2012-3-20 16:25:50

参考学习前辈

		自动登录	找回密码
密码			加入

[AU3基础] [已解决]自定义函数问题

评分

相关帖子

评分

评分

评分