当前位置：首页 - 正文

VB子程序或函数未定义

发布网友发布时间：2022-05-01 09:58

共2个回答

热心网友时间：2023-10-06 04:51

FindPic
是一个自定义函数。
样子大约是：
Dim
intX
As
Integer
Dim
intY
As
Integer
Private
Sub
开始_Click()
'应该事先对intX,
intY
赋值
FindPic
0,
0,
1024,
768,
"C:\Documents
and
Settings\Administrator\桌面
intX,
intY"
'"C:\Documents
and
Settings\Administrator\桌面
intX,
intY"
这个很奇特，可能不合语法
If
intX
>
0
And
intY
>
0
Then
MoveTo
intX,
intY
End
If
End
Sub
Function
FindPic(x
As
Long,
y
As
Long,
width
As
Long,
height
As
Long,
path
As
String)
'这里面应该是功能代码
End
Function

热心网友时间：2023-10-06 04:51

FindPic，MoveTo这2个是函数
估计你没定义。报错了。你这些代码应该是你复制哪个地方的。你再去找找这2个函数。复制过来直接使用就可以了。

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。
E-MAIL:11247931@qq.com

焦点

VB子程序或函数未定义

最新推荐

猜你喜欢

热门推荐