VB模块路径！！！！！急。。。

来源：百度知道 编辑：UC知道 时间：2024/06/20 19:05:35
我建了一个Command1 按钮 我想通过按钮启动 模块，请各位高手指点一下 谢谢了
代码如下
Private Sub Command1_Click()
Shell "Module1"
End Sub

你的意思是调用模块的代码吧?
其实很简单.
我给你举了个例子.下面分析给你听
form1里面的command代码:
Private Sub Command1_Click()
Dim a As Integer
Call cd(a) '调用模块里面的cd函数
Print a '输出值
End Sub

Module1里面的代码
Sub cd(i As Integer)
i = Rnd * 10000 + 1
End Sub
'模块的功能:随机产生一个1-10000之间的数