Vraag : Hoe ruilt u de lusjeeinden voor een tekstvakje in VB.NET 2010?

Hoe ruilt u de lusjeeinden voor een tekstvakje in VB.NET 2010? />By gebrek

If mijn tekstvakje TextBox1, hoe ik vertelt Vensters wordt genoemd dat de lusjeeinden elke 4 karakters in plaats van 8 zouden moeten zijn?

My het tekstvakje heeft „AcceptsTab“ en „AcceptsReturn“ aan true.

Thanks. wordt geplaatst die

Antwoord : Hoe ruilt u de lusjeeinden voor een tekstvakje in VB.NET 2010?

Probeer dit

Openbare Klasse Form1
      Privé verklaar Functie SendMessage _
       De Lib „user32“ alias „SendMessageA“ _
       (ByVal handvat als IntPtr, ByVal wMsg als Geheel, ByVal wParam als Geheel, ByRef lParam als Geheel) als Geheel
      Const EM_SETTABSTOPS = &HCB

      Privé SubForm1_Load (ByVal afzender als System.Object, ByVal e als System.EventArgs) behandelt MyBase.Load
            Schemerig tabsSize () als Geheel = {16, 32, 48} '4*pos
            SendMessage (TextBox1.Handle, EM_SETTABSTOPS, tabsSize.Length, tabsSize (0))
      Sub van het eind

De Klasse van het eind