选项严格转换错误
选项严格转换错误
提问于 2014-11-28 19:46:00
我只是把我的项目切换到“选项严格”，以努力提高性能，因为我正在经历一些与项目速度有关的问题。
我收到了许多错误；许多错误很容易通过提供字符串转换操作数来修复，但是这个问题我不知道。
Option Strict On disallows operands of type Object for operator '='. Use the 'Is' operator to test for object identity.此错误特别针对案例目标数，如
案例
病例1
案例2
3.
4.
5
6
If utable.Rows.Count > 0 Then
pop = 0
For pop As Integer = 0 To utable.Rows.Count - 1
TempStr(0) = CStr(utable.Rows(pop)("UID"))
TempStr(1) = CStr(utable.Rows(pop)("lname"))
TempStr(2) = CStr(utable.Rows(pop)("fname"))
TempStr(3) = CStr(utable.Rows(pop)("uname"))
Select Case utable.Rows(pop)("Usertype")
Case 0
TempStr(4) = "Restricted"
Case 1
TempStr(4) = "Dispatcher"
Case 2
TempStr(4) = "Dispatch Supervisor"
Case 3
TempStr(4) = "Contract Specialist"
Case 4
TempStr(4) = "Account Billing"
Case 5
TempStr(4) = "Manager"
Case 6
TempStr(4) = "Administrator"
End Select
TempStr(5) = CStr(utable.Rows(pop)("Usertype"))
TempNode = New ListViewItem(TempStr)
Dim Add1 As ListViewItem = ListView1.Items.Add(TempNode)
Next
End If我不熟悉如何解决这个问题-谢谢你的帮助。
回答 1
Stack Overflow用户
回答已采纳
发布于 2014-11-28 19:58:55
好吧，这样就行了：
Select Case CInt(utable.Rows(pop)("Usertype"))
Case 0
...
Case 1
...
End Select页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/27195057
复制相关文章
相似问题
腾讯云开发者
