Private Sub Command1_Click()
Dim a() As StringOn Error GoTo ArrayIsNull If UBound(a) < 0 Then
End If
GoTo NextProcess
ArrayIsNull:
MsgBox "is NULL"
NextProcess:End Sub
Dim a() As StringOn Error GoTo ArrayIsNull If UBound(a) < 0 Then
End If
GoTo NextProcess
ArrayIsNull:
MsgBox "is NULL"
NextProcess:End Sub
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货