Keeping only the first character in a textBox string

[dabezine]

Hello there,

I want to keep the first character in a string. I have this is what I tried :

If AevionRadioButton2.Checked Then
RichTextBox1.Rtf = "{\rtf1\ansi\deff0 {\fonttbl{\f0 Times New Roman;}} " &
vbNewLine &
"- " & TextBox1.Text.Substring(2, 5) & "," &
TextBox2.Text & ", " &
"\i " & TextBox5.Text & ". " & "\i0 " &
TextBox9.Text & ", " &
TextBox10.Text & ". "
'Last, F. M. (Year Published) Book. City, State: Publisher.
End If

I am talking about the first character in textBox1.text, <g class="gr_ gr_24 gr-alert gr_tiny gr_spell gr_inline_cards gr_run_anim ContextualSpelling multiReplace" data-gr-id="24" id="24">i</g> want to keep only the first character, regardless <g class="gr_ gr_23 gr-alert gr_gramm gr_inline_cards gr_run_anim Grammar multiReplace" data-gr-id="23" id="23">to</g> the number of characters.

thank you.

Continue reading...