简单的得到的字符串缩写 - Visual Basic中

Question

简单初学者练习：

还有的地方，你把你的名字，以空格分隔一个输入框，然后从第一个和最后一个名字的第一个字母，出来把它放到一个标签

IE（乔鲍勃）= JB

---

我知道这可能是与阵列中完成，但锻炼更多的是使用类似的子字符串函数的IndexOf，删除，替换等..

Answer 1

您可以尝试使用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 

Answer 2

还有就是便利的字符串方法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 3

你可以试试这个：

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 4

可以试试也是这样的！

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