vb中如何获得调用函数的过程的名字？

为calc()函数增加一个参数，在调用的时候填入一个参数判断调用者，在calc()的内部就可以直接知道是谁调用了。

例如：
Private Sub Form_Load()
Calc "Form_Load"
End Sub

'-------------------------------
Private Sub Command1_Click()
Calc "Command1_Click"
End Sub

'-------------------------------
Private Sub Command2_Click()
Calc "Command2_Click"
End Sub

'-------------------------------
Private Sub Calc(CallName As String)
'.......
MsgBox "调用过程名称是" & CallName
'.......
End Sub

不知道你这个calc()函数是什么样的函数

类？过程？还是dll？

一个比较好的方法就是为calc()函数添加一个参数，调用的时候填入一个参数判断调用者，比如可以填入窗体名，句柄，或者自定义的参数值等