Wie verwenden Sie Split() auf einen Bindestrich?

Question

Ich habe eine Zeichenfolge, die "-" am Ende enthält. Ich möchte alles links von diesem Bindestrich zurückgeben.

Ich weiß nicht, wie man Split() oder Regex() verwendet, um das zu tun.

Answer 1

Zwei Methoden, die den Bindestrich Griff zu entfernen und ein Nicht-Bindestrich

Sub Test1() 
    Dim StrTest As String 
    StrTest = "I have a hypen-somewhere" 
    If InStr(StrTest, "-") > 0 Then 
     MsgBox Left$(StrTest, InStr(StrTest, "-") - 1) 
    Else 
     MsgBox "Not found" 
    End If 
End Sub 

Sub Test2() 
    Dim StrTest As String 
    Dim vString 
    StrTest = "I have a hypen-somewhere" 
    vString = Split(StrTest, "-") 
    If UBound(vString) > 0 Then 
     MsgBox vString(0) 
    Else 
     MsgBox "Not found" 
    End If 
End Sub 

Answer 2

Verwenden Sie eine Kombination aus Instr(), Mid() und Len()here

Answer 3

Sie könnten versuchen, so etwas wie:

Dim hyphenString As String = "hello-world" 
Dim leftSide As String = Left(hyphenString, InStr(hyphenString, "-")) 

leftSide sollte nun "Hallo"