VB初心者質問スレPart2

荒らされている所恐縮なのですが

Private Sub Command1_Click()
　Dim Strs() As String

　Strs = Split("", "A")

　MsgBox UBound(Strs)
End Sub

これって-1が表示されるのですが
この現象はなんですか？