VB.NET在标签中互相显示一个单词的字母

Question

Dim intLength，intTeller As Integer         Dim strBack，strText As String

    strText = txtInvoer.Text
    intLength = txtInvoer.Text.Length



    For intLength = 1 To intLength

        lblLetterPerLetter.Text &= strText.Substring(0, intLength) & vbCrLf
    Next

    For intTeller = 0 To strText.Length - 1
        lblOnderMekaar.Text &= strText.Chars(intTeller).ToString
    Next

我如何显示让我们在每个人的名字下说出我的名字？ 实施例

取值

ħ

A

w ^

<磷>氮

Answer 1

您可以使用String.Join：

lblLetterPerLetter.Text = String.Join(Environment.NewLine, "SHAWN".AsEnumerable())

您需要使用AsEnumerable()将String视为IEnumerable(Of Char)，否则将其视为单String。您也可以在第一时间将其声明为IEnumerable(Of Char)：

Dim nameChars As IEnumerable(Of Char) = "SHAWN"
lblLetterPerLetter.Text = String.Join(Environment.NewLine, nameChars)