vb编译提示入口函数不唯一
A. vb编译错误:缺少变量或过程,不是模块
编译错误:
缺少变量或过程,不是模块。
'这个是模块中的代码,(不在窗体的代码区内,在一个模块文件中)
Public Sub SEND_SERINFO(IP As String, Text As String)
main.wsk1.RemoteHost = IP
main.wsk1.SendData "SER_INFO " + Text
End Sub
'然后在窗体代码模块中调用
call send_serinfo(ip,text)
然后进行调试
B. VB6 中函数声明错误编译不通过,如何解决
语法没错误,不应该在不同语言条件下就不成立,VB不会有这种问题。可能的问题更多是你在繁体中文系统中代码中存在一些编译器不认识的中文字符
C. vb提示编译错误,语法错误 求指教
PublicSub产品出库()
DimiAsLong
DimjAsInteger
Sheets("出库记录表").Select'选择工作表"出库记录表"
IfCells(4,1).Value=""Then'判断"产品名称"项是否为空
MsgBox"""产品名称""项请勿置空!",vbOKOnly&vbExclamation,"信息提示"
ExitSub
EndIf
i=Val(Sheets("出库记录表").Cells(1,2).Value)
Forj=1To6
Cells(i+8,j).Value=Cells(4,j).Value
Nextj'在"出库记录表"的末尾添加新记录
EndSub
vb里面 字符串要用两个 " 来表示"","产品名称" 要这样写""产品名称""。
你的写法:
MsgBox ""产品名称" 项请勿置空!", vb会认为字符串在产字前就结束了,所有出错。
D. VB 编译错误:无效外部过程
是把代码写在子过程、函数过程或属性过程外而发生的错误。
在过程外无效:
该语句必须发生在子过程、函数过程或属性过程(Property Get、Property Let 和
Property Set)内部。这个错误的起因与解决方法如下所示:
*一个可执行的语句,如 Static 或 ReDim,出现在模块级别中。
在模块级中 Static 是不需要的,因为所有的模块级变量都是静态的。在模块级中用 Dim 来代替
ReDim。想要在模块级中创建动态数组,请用
Dim 加空括号来声明它。
注意 在模块级只能使用注释与声明性语句,例如
Const、Declare、Deftype、Dim、Option Base、Option
Compare、Option Explicit、Option
Private、Private、Public 和
Type。子过程、函数过程和属性过程语句发生在它们的过程体之外,但在过程内声明。
E. 怎样用VB编写标准dll
1、首先创建一个DLL工程,如图: