簡単な初心者演習:
スペースで区切られた名前を入力する入力ボックスがあり、姓と名の最初の文字を取得してラベルに出力します
Ie (ジョー・ボブ) = JB
これは配列で実行できることは知っていますが、演習は、substring、IndexOf、Remove、Replace などの文字列関数を使用することに重点を置いています...
簡単な初心者演習:
スペースで区切られた名前を入力する入力ボックスがあり、姓と名の最初の文字を取得してラベルに出力します
Ie (ジョー・ボブ) = JB
これは配列で実行できることは知っていますが、演習は、substring、IndexOf、Remove、Replace などの文字列関数を使用することに重点を置いています...
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)
あなたはこれを試すことができます:
dim str as String=TextBox1.Text
Label1.Text=str.Remove(1, str.LastIndexOf(" ")).Remove(2)
必要に応じて、1行で実行できます。
Label1.Text = TextBox1.Text.Remove(1, TextBox1.Text.LastIndexOf(" ")).Remove(2)
このようなものも試すことができます!
Dim str As String = textBox1.Text
Dim initials As String = New String(str.Split(" "c).Select(Function(f) f(0)).ToArray)