在VBA的程序中调用子程序，当执行到call的时候，总是提示截图错误，找不到原因，求助大神！

问题不是出在那一句，而是这一答缓句调用的子过程中，只是显示在一句。

问题出在以上这句中，GetAttr 函数只有一个参数，你设了清耐模两个参数，当然出错。这句改为以下即亩誉可。

If GetAttr(s &fname) = vbDirectory Then

直接写sub过程名，或者Call sub名称即可。

如果需要传递参数：

同样可以使用Call：毁轮

例如：

Call PicInComment(1, 250)

参数写在后面，不带括号：

例如：

PicInComment 1, 250

也可以赋值纤纳信给其他变量：

例如：

result = PicInComment(1, 250)