Question

我有一个文本框，可用作控制台（在表单应用程序中）。

我想在用户输入时运行某个子：

broadcast blabla

sub将广播字符串blabla。该计划将如何识别第一个单词？

这样的事情会起作用吗？

If ConsoleInput.Text = "broadcast " & command Then
BroadcastMessage(command)
End If

Answer 1

您可以使用String.Split：

Dim words As String() = ConsoleInput.Text.Split({" "c}, StringSplitOptions.RemoveEmptyEntries)
If words.Length > 1 AndAlso words(0).ToLower() = "broadcast" Then
    BroadcastMessage(words(1))
End If

修改：如果您想广播所有字词，最好使用String.Substring：

Dim spaceIndex = ConsoleInput.Text.IndexOf(" "c)
If spaceIndex > -1 Then
    Dim firstWord = ConsoleInput.Text.Substring(0, spaceIndex)
    If firstWord.ToLower = "broadcast" Then
        broadcast(ConsoleInput.Text.Substring(spaceIndex + 1))
    End If
End If

从文本框中读取未知字符串

1 个答案: