Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/drupal/3.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
为什么在子vb6上传递参数时检索错误?_Vb6_Arguments - Fatal编程技术网

为什么在子vb6上传递参数时检索错误?

为什么在子vb6上传递参数时检索错误?,vb6,arguments,Vb6,Arguments,我写了这段代码: Sub Insert_Pic_From_File2(PicPath As String, ByVal row As Integer, ByVal col As Integer) Dim Pic As Picture, Sh As Shape, Rng As Range Set Rng = Range.Cells(row, col) Set Rng = Rng.MergeArea With Rng Set Sh = ActiveSheet.Shapes.AddPi

我写了这段代码:

Sub Insert_Pic_From_File2(PicPath As String, ByVal row As Integer, ByVal col As Integer)


Dim Pic As Picture, Sh As Shape, Rng As Range

Set Rng = Range.Cells(row, col)
Set Rng = Rng.MergeArea

With Rng
    Set Sh = ActiveSheet.Shapes.AddPicture(Filename:=PicPath, linkToFile:=msoFalse, SaveWithDocument:=msoTrue, Left:=.Left, Top:=.Top, Width:=.Width, Height:=.Height)
    Sh.LockAspectRatio = msoFalse
End With

Set Sh = Nothing
Set Rng = Nothing

End Sub
我用这句话来称呼它:

Insert_Pic_From_File2 ("D:\Area Open\ok.png", y, col_result)
y和col_结果都是整数

当我按enter键时,程序会给出此错误(意大利语)

一个错误: 普雷维斯托:=

我用英语思考:

编译错误: 需要:=

为什么会这样? 如果我删除参数y和col_,结果似乎没有问题,但没有参数


非常感谢。

不要在参数周围使用括号!它们仅在使用冗余的“Call”语句或返回值的函数时使用

Insert_Pic_From_File2 "D:\Area Open\ok.png", y, col_result

应该可以

不要在参数周围使用括号!它们仅在使用冗余的“Call”语句或返回值的函数时使用

Insert_Pic_From_File2 "D:\Area Open\ok.png", y, col_result
应该没问题