VB 编程出现子程序或函数未定义
Set Glb_MyWkSp = Workspaces(0) set是个函数不要和后面的变量连起来
VB中子程序或函数未定义怎么办啊?
Sub s2(i%)
Dim a%, c(20) As String, sum%
a = Len(Str(i))
For j = 1 To a
c(j) = Mid(Str(i), j, 1)
sum = sum ◆ Val(c(j))
Next j
If sum = 10 Then
Print i
End If
End Sub
Private Sub Form_Click()
Dim x%, y%, i%
x = 100
y = 999
For i = x To y
Call s2(i%)
Next i
VB子程序或函数未定义
解决方法很多!网友们,你的"子程序或函数未定义"的问题出在最末两行：
clearstartNowWidth,NowHeight,TotMine
WriteNumberNowWidth,NowHeigh
这是因为这两行中出现了VB无法识别的语句：clearstart和WriteNumber,我查了很多关于VB的资料,都为找到clearstart和WriteNumber的说明.你想用这两行干嘛?把这两行去掉,问题就解决了.
VB 子程序或函数未定义
VB字程序或函数未定义说明代码中引用的过程或函数没有定义或名称写错.
给出的代码msg不是VB的内部函数,代码中也没有自定义的msg过程存在.而正确的消息框函数名是MsgBox.
Sub, Function, 或 Property 未定义（错误 35）
调用 Sub、Function 或 Property 的过程必须定义.此错误有以下的原因和解决方法：
过程名称拼错.
检查拼写并改正.
试图从另一个工程调用过程,但并没有在"引用"
对话框中将该引用添加到该工程.
添加引用
①显示"引用" 对话框. ②查找包含要调用过程的工程名.如果"引用" 对话框中没有所要的工程名,请按"浏览"按钮来搜寻它. ③选取工程名左边的复选框. ④单击"确定".正确的代码：
Private Sub Command1_Click()
If Text1.Text = "" Then
MsgBox ("注意,你的1号框里没有任何内空请加入.")
Else
Text2.Text = Text1.Text
MsgBox 函数
在对话框中显示消息,等待用户单击按钮,并返回一个 Integer 告诉用户单击哪一个按钮.
以上就是土嘎嘎小编大虾米为大家整理的相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用，就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦！！