如何解决；编译错误：类型不匹配“；VB6中的错误？

似乎已经有了一些答案，但我找不到适合我问题的答案

代码如下：

Private Sub Combo2_click()
Dim item_id, price As Integer
Dim item_name As String
If Combo2.Index Is 0 Then
    price = 30
ElseIf Combo2.Index Is 1 Then
    price = 40
ElseIf Combo2.Index Is 2 Then
    price = 50
ElseIf Combo2.Index Is 3 Then
    price = 60
Else
    price = 55
End If
End Sub

---

我得到的错误是“编译错误：类型不匹配”。。。我不知道为什么！它在类似的

私有子组合2\u click（）

…

上显示错误代码中有两个错误：

1-应该使用

Combo2.ListIndex

而不是

.Index

。（因为

index

用于其他对象，此时控件是数组中的一个元素）

2-您应该将

Is

替换为

=

（这就是引发

类型不匹配异常的原因）

希望有帮助：）
您的代码中有两个错误：

1-应该使用
Combo2.ListIndex
而不是
.Index
。（因为
index
用于其他对象，此时控件是数组中的一个元素）

2-您应该将
Is
替换为
=
（这就是引发
类型不匹配异常的原因）

希望有帮助：）
第2点的附加信息“是”用于“选择案例”而不是“如果”。这太神秘了：）@Jules操作符
是
不限于在
Select Case
中使用，它用于比较两个对象，是的，它可以在If语句中使用（当比较一对对象时）。是的，你是对的。我想补充一点，你可以用is来比较对象，但我的评论很隐晦。另一个注释-
Dim a，b为整数
声明a为变量。第2点的附加信息“is”在“Select Case”中使用，而不是If。这太神秘了：）@Jules操作符
是
不限于在
Select Case
中使用，它用于比较两个对象，是的，它可以在If语句中使用（当比较一对对象时）。是的，你是对的。我想补充一点，你们可以用它来比较一个不带任何东西的对象，但我的评论非常隐晦。另一个注释-
Dim a，b为整数
声明a为变量。