Dim Permission As String
Dim chk As String = "p"
Permission = (ds.Tables("privilege").Rows(0).Item(0)).ToString
MessageBox.Show(Permission)
Dim PermissionArray() As String = Split(Permission, ":")
For i As Integer = 0 To 36
If PermissionArray(i) = 1 Then
Try
Dim chkBox As CheckBox = CType(Me.Controls(chk & i), CheckBox)
chkBox.Checked = True
Catch ex As Exception
MessageBox.Show(ex.ToString)
End Try
End If
Next
此代碼爲我提供了捕獲以下錯誤的情況下,我用Google搜索,但沒有什麼工作System.NullReferenceException:對象未設置爲一個對象
這是錯誤:System.NullReferenceException – Object reference not set to an instance of an object.
它也應該給你一個發生的地方。 – user7116
@sixlettervariables它給了我錯誤'chkBox.Checked = True' –
然後你顯然沒有控制其中的一個名字(參見'chk&i')。 – user7116