VB出现过程声明与同名事件或过程的描述不匹配问题

来源:百度知道 编辑:UC知道 时间:2024/06/04 19:21:11
我刚才开发了一个聊天室程序,这是其中的一部分
Private Sub a_DataArrival(ByValbytesTotal As Long)
Dim i As String
a.GetData i
Label3.Caption = "连接成功!"
Comm2.MousePointer = 0
Form1.MousePointer = 0
timer1.Enabled = False
If i = Chr(0) Then
Text2.Text = "你是今天第一个进入本聊天室的客户。"
Chr (13)
Chr (10)
Else
Text2.Text = Text2.Text
i
End If
Text2.SelStart = Len(Text2.Text)
send.MousePointer = 0
Combo1.Enabled = False
Comm2.Caption = "断开连接"
Text1.SetFocus
End Sub
编译时出现“过程声明与同名事件或过程的描述不匹配”,这个问题,请问该怎么改?

至少Private Sub a_DataArrival(ByValbytesTotal As Long) 少了一个空格,应为Private Sub a_DataArrival(ByVal bytesTotal As Long)

比如说你声明"A as Integer"及A的数据类型是长整型,而你却在事件过程中把A赋值为字符串或非长整型