您所在位置：主题：Vb类型不匹配
yxzpla
[专家分：0] 发布于 2009-07-17 11:44:00
Private Sub Command1_Click()
Dim sn As String, code As Integer
sn = Text1.Text
If sn = "" Then
MsgBox "机器码不能为空!", 16, "提示"
End If
code = 8631202577- sn - 1202
Text2.Text = code
End Sub
提示类型不匹配，应该怎么修改。
Dim sn As String, code As Integer
sn = Text1.Text
If sn = "" Then
MsgBox "机器码不能为空!", 16, "提示"
End If
code = 8631202577- sn - 1202
Text2.Text = code
End Sub
提示类型不匹配，应该怎么修改。
