Dim ccbCols As WinForm.CheckedComboBox = e.Form.Controls("ccbCols")
If ccbCols.Text > "" Then
Functions.Execute("AppendFromExecl",0,e.Form.Controls("ncbIndex").Value,e.Form.Controls("ncbLength").Value(这里我要改成最大行数),ccbCols.Text.Split(","),False)
Else
Functions.Execute("AppendFromExecl",0,e.Form.Controls("ncbIndex").Value,e.Form.Controls("ncbLength").Value(这里我要改成最大行数),Nothing)
End If