VB转换成VB脚本

Question

如何把下面的VB转换成VB脚本 Dim str
        str = TextBox1.Text
        Dim msg() As String
        If (str.Contains(",")) Then
            msg = Split(str, ",")
        Else
            msg = Split(str, "")
        End If

Answer 1

你这是vb.net的?
Dim str 
str = TextBox1.Text 
Dim msg 
If (InStr(1,str,",") > 0) Then 
    msg = Split(str, ",") 
Else 
    msg = Split(str, "") 
End If