不看会后悔的Windows XP之经验谈	简单快捷DIY实用家庭影院

在线急等:有什么办法可以把过程赋给一个变量.再调用变量即为调用过程.

楼主xuhaoran（）2003-09-02 00:03:15 在 VB / 基础类提问

如有一个按扭的过程,
private sub Command1_click()
..........
end sub

一般调用过程为:
call command1_click
即可.

但我现在想问有没有办法可以把command1_click赋值给一个变量.如
dim a
a="command1_click"
call a
但这样出错了,有谁能帮我解决这个问题吗? 问题点数：20、回复次数：10Top

1 楼rainstormmaster（暴风雨 v2.0）回复于 2003-09-02 00:34:34 得分 0

有什么用途？？？Top

2 楼matchchen（）回复于 2003-09-02 00:47:27 得分 0

不可以call 变量。Top

3 楼yiph（逸飘寒）回复于 2003-09-02 00:49:00 得分 0

怎么会这么想？Top

4 楼xuhaoran（）回复于 2003-09-02 00:55:49 得分 0

因为我在form中有许多菜单.分别为a1,a2,a3.那么单击菜单的事件为
private sub a1_click
........
sub

private sub a2_click
........
sub

在form中我加入了一个按扭数组.
所以我想在控件数组中加入
private sub command1_click(index)
call a & index & _click '这样写是不对的.但我希望能达到调用菜单事件
sub
如果能这样宏替换的话.那就好了.不知有没有高手指导.谢谢.Top

5 楼xuhaoran（）回复于 2003-09-03 16:55:07 得分 0

有没有高手指导我啊.我很急啊,已等了二天了.是不是这种调过程是必须写的不能用值取的啊?
Top

6 楼matchchen（）回复于 2003-09-03 20:01:05 得分 0

是啊！Top

7 楼kissoflife（明月高楼休独倚，酒入愁肠，化作相思泪！）回复于 2003-09-03 20:33:18 得分 2

呵呵，有很多帖子讨论这个问题，好像没什么好的方法，建议楼主使用

select case index
case 0
a1_click
case 1
a2_click
case 2
.
.
.
end selectTop

8 楼matchchen（）回复于 2003-09-03 20:39:12 得分 1

完全同意楼上。Top

9 楼goodname008（卢培培，充电中．．．．．．）回复于 2003-09-03 20:42:46 得分 16

CallByName函数，在msdn中查查用法。

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
private sub Command1_click()
..........
end sub

一般调用过程为:
call command1_click
即可.

但我现在想问有没有办法可以把command1_click赋值给一个变量.如
dim a
a="command1_click"
CallByName a
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

楼主试试，我现在没VB，也没调试，你试试看。Top

10 楼5653325（等待开刃的刀）回复于 2003-09-03 20:44:48 得分 1

用select很方便啊
何必做那么麻烦呢？Top