此代碼在下面指定的行拋出ArgumentNullException,我不知道爲什麼。ArgumentNullException未處理 - 幫助
Private Sub ShaftLoad()
Dim newShaft As New Shaft
Dim shaftlist As New List(Of Shaft)
shaftlist = DBShaft.GetShaftList
Dim shaftArray(shaftlist.Count) As String
For i As Integer = 0 To shaftlist.Count - 1
shaftArray(i) = (shaftlist(i).ShaftName)
Next
ShaftComboBox.Items.AddRange(shaftArray) 'Exception is thrown here.
End Sub
我認爲我做了第5行? – 2011-04-06 02:28:42
@John,他的確如此。 'Dim shaftArray(shaftlist.Count)As String'等於'string [] shaftArray = new string [shaftlist.Count + 1];' – 2011-04-06 02:29:14
@John,它在[initial version](http:// stackoverflow。 com/revisions/9a2a05ca-40b5-497a-b2f0-ab09a90278ec/view-source),格式不好。 – 2011-04-06 14:17:50