在VB中怎样比较两个变量

If tmp = tmp1 Then 'If是“如果”的意思。
a = "相"
Else: '别以为它很奇怪。
a = "不"
End If

Msgbox "数据" & a & "同"

不能简单比较,要考虑两个变量类型是否相同

VB.Net代码如下

Dim a As Integer = 1
Dim b As String = 1
If a.GetType.Name.ToString = b.GetType.Name.ToString Then
If a = b Then
Response.Write("一致")
Else
Response.Write("不一致")
End If
Else
Response.Write("数据不一致,试图简单转换为字符类型后比较.....<br >")
Dim a_a As String = ""
Dim b_b As String = ""
Try
a_a = a.ToString
Catch ex As Exception
End Try
Try
b_b = b.To