VB 子程序或函数未定义

Private Sub Command1_Click()
If Text1.Text = "" Then
msg ("注意,你的1号框里没有任何内空请加入.")
Else
Text2.Text = Text1.Text
End If
End Sub

请问高手错哪里了?要怎样做才能对.我是新手请你们细心的回答下..谢谢..

VB 子程序或函数未定义是设置错误造成的,解决方法为:

1、先绘制一个命令按钮,双击命令按钮进入代码窗口。

2、首先定义一个变体变量。

3、输入一个数字,并使用ABS函数。

4、然后写输出Print语句。

5、然后点击按钮测试。

温馨提示:答案为网友推荐,仅供参考
第1个回答  推荐于2017-09-06

VB字程序或函数未定义说明代码中引用的过程或函数没有定义或名称写错。

给出的代码msg不是VB的内部函数,代码中也没有自定义的msg过程存在。而正确的消息框函数名是MsgBox。

Sub, Function, 或 Property 未定义(错误 35)

调用 Sub、Function 或 Property 的过程必须定义。此错误有以下的原因和解决方法:

    过程名称拼错。

    检查拼写并改正。

    试图从另一个工程调用过程,但并没有在“引用”
    对话框中将该引用添加到该工程。

    添加引用

    1.显示“引用” 对话框。
    2.查找包含要调用过程的工程名。如果“引用” 对话框中没有所要的工程名,请按“浏览”按钮来搜寻它。

    3.选取工程名左边的复选框。

    4.单击“确定”。

    正确的代码:

    Private Sub Command1_Click()
        If Text1.Text = "" Then
            MsgBox ("注意,你的1号框里没有任何内空请加入.")
        Else
            Text2.Text = Text1.Text
        End If
    End Sub

    MsgBox 函数

    在对话框中显示消息,等待用户单击按钮,并返回一个 Integer 告诉用户单击哪一个按钮。

第2个回答  2019-11-28
ClsOpenDataBase
LoadName
可能是别人封装好的方法,这写都不是系统自带的函数,你要解决这问题,要没自己封装该方法,要么弄到该方法的源码加在自己的工程里。
第3个回答  2008-08-15
msg ("注意,你的1号框里没有任何内空请加入.")
改为
msgbox "注意,你的1号框里没有任何内空请加入."
第4个回答  2019-02-19
Position
VB没有这个函数吧?
你以前用的
是不是有模块定义了公有函数或者子程序

相关了解……

你可能感兴趣的内容

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 非常风气网