Question

简单的初学练习：

有一个输入框，你用你的名字分隔空格，然后从名字和姓氏中取出第一个字母，然后把它放到标签上

I.e（Joe Bob）= JB

我知道这可以用数组完成，但练习更多的是使用字符串函数，如substring，IndexOf，Remove，Replace等......

Answer 1

如果你没有指定另一个分隔符，有一个方便的字符串方法Split默认情况下会在空白处拆分一个字符串。

Dim words As String() = TextBox1.Text.Split()
Dim initials As String = ""
For Each word As String In words
    initials &= word(0)
Next

注意：可以将字符串编入索引，就像它们是Char数组一样。 word(0)是word的第一个字符。

initials &= word(0)

是

的简写

initials = initials & word(0)

Answer 2

你可以试试这个：

 dim str as String=TextBox1.Text
 Label1.Text=str.Remove(1, str.LastIndexOf(" ")).Remove(2)

如果您愿意，可以在一行中完成：

 Label1.Text = TextBox1.Text.Remove(1, TextBox1.Text.LastIndexOf(" ")).Remove(2)

Answer 3

也可以尝试这样的事情！

Dim str As String = textBox1.Text
Dim initials As String = New String(str.Split(" "c).Select(Function(f) f(0)).ToArray)

Answer 4

您可以尝试使用SubString和Split方法。

 Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
    Dim myInitials As String
    Dim myName As String = "Joe Bob"
    myInitials = myName.Substring(0, 1) & myName.Split(" ")(1).Substring(0, 1)
End Sub

简单从字符串获取首字母 - Visual Basic

4 个答案: