论坛 › 已解决问题区 › [已解决]自定义函数问题

风行者 发表于 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

参考学习 前辈

查看完整版本: [已解决]自定义函数问题