怎么 讀取 textbox 中 關鍵字 前的所有字符

如何 讀取 textbox 中 關鍵字 前的所有字符?
例子是變動的
例子1 
hello
hihihihi 在

例子2
hello
world 在

想要讀取 line2 "在" 前面的所有 字符

那麼 程序 運行 出來的結果分別是 hihihihi 和 world

[解决办法]
T1="hihihihi 在"
Left(T1,instr(1,T1,"在")-1)
[解决办法]
试试这个
content 是要处理的字符串, signal就是那个"在"

VB.NET code

Private Function ProcessText(content As String, signal As String) As String        Return content.Substring(0, content.IndexOf(signal))End Function
[解决办法]
探讨


還是不明白呢~

[解决办法]
Dim s, ss() As String
Dim i, k, m As Integer

ss = Split(Textbox1.Text, vbCrLf)
k = UBound(ss)
For i = 0 To k
   m = InStr(ss(i), "在")
   If m Then
       s = Mid(ss(i), 1, m - 1)
   End If
Next
MsgBox s