使用callbyname函数样调用全局模块中的函数？

Question

在模块module1中有一个函数：
public sub a(p as string)
  msgbox pend sub在窗体form1中有个按钮
Private Sub Command1_Click()
        CallByName Module1, "a", VbMethod,"fff"
        
End Sub调用会报错，请问怎么解决？

Answer 1

Private Sub Command1_Click()
call a("fff")
End Sub

Answer 2

楼上的老兄，我是想问callbyname调用模块函数的用法

Answer 3

一定要用模块吗?我试过了,模块好像不行哦,它不是一个对象,用类就可以,具体就是,新建一个类Class1
里面写个方法.
Public Sub a()
  MsgBox "dddddddddddd"End Sub然后再在FORM1里写
Option Explicit
Dim gC As New Class1
Private Sub Command1_Click()
    CallByName gC, "a", VbMethod
End Sub