Question

如何让我的程序从输入的字符串中取出第一个和最后一个字母？

示例：＆＃34;我被告知我是菜鸟！＆＃34;

输出：＆＃34; IebntdIaman！＆＃34;

我试图使用Split而没有运气。

Answer 1

尝试这样的事情。因为你有几个单字符单词我使用条件来获得你想要的输出。我也使用String.Split方法删除空条目以防止零长度项，然后我将结果并使用String.Substring方法来解析您的起始和结束字符。

Sub Main()
    Dim splitChar As String() = {" "}
    Dim example As String = " I've been told I am a noob!"
    Dim output As String = ""
    Dim result As String() = example.Split(splitChar, StringSplitOptions.RemoveEmptyEntries)
    For Each item In result
        If item.Length > 1 Then
            output += item.Substring(0, 1) & item.Substring(item.Length - 1, 1)
        Else
            output += item.Substring(0, 1)
        End If
    Next
    Console.WriteLine(output)
    Console.ReadLine()

End Sub

Answer 2

这很好用：

Dim example As String = "I've been told I am a noob!"

Dim result = New String( _
    example _
        .Split(" "c) _
        .SelectMany(Function (w) _
            If(w.Count() = 1, _
                new Char() { w(0) }, _
                New Char() { w.First(), w.Last() })) _
        .ToArray())
'IebntdIaman!

我如何从字符串中获取第一个和最后一个字母？

2 个答案: