请问错在哪里。
这是错误提示(无法将类型为“Foxtable.WinForm.RadioButton”的对象强制转换为类型“Foxtable.WinForm.ComboBox”。)
这是查询代码Dim cmb1 As WinForm.ComboBox = e.Form.Controls("radweixian")
Dim cmb2 As WinForm.ComboBox = e.Form.Controls("raddanwei")
If e.Form.Controls("radweixian").Checked = True
Dim Filter As String = ""
With e.Form.Controls("radweixian")
If .Value IsNot Nothing Then
Filter = "危险级别= '" & .Value & "'"
End If
End With
With e.Form.Controls("Comliebie")
If .Value IsNot Nothing Then
If Filter > "" Then
Filter = Filter & " And "
End If
Filter = Filter & "bh= '" & .Value & "'"
End If
End With
ElseIf e.Form.Controls("raddanwei").Checked = True
Dim Filter As String = ""
With e.Form.Controls("Comliebie")
If .Value IsNot Nothing Then
Filter = "wzmc= '" & .Value & "'"
End If
End With
With e.Form.Controls("Comliebie")
If .Value IsNot Nothing Then
If Filter > "" Then
Filter = Filter & " And "
End If
Filter = Filter & "bh= '" & .Value & "'"
End If
End With
End If