Próbować to
Społeczeństwo Klasowy Form1
Intymny Oznajmiać Funkcja SendMessage _
Wyzwolenie "user32" Pseudonim "SendMessageA" _
(ByVal rękojeść Jako IntPtr, ByVal wMsg Jako Integer, ByVal wParam Jako Integer, ByRef lParam Jako Integer) Jako Integer
Const EM_SETTABSTOPS = &HCB
Intymny Okręt podwodny Form1_Load (ByVal nadawca Jako System.Object, ByVal e Jako System.EventArgs) Obchodzić się MyBase.Load
Ciemnawy tabsSize () Jako Integer = {16, 32, 48} '4*pos
SendMessage (TextBox1.Handle, EM_SETTABSTOPS, tabsSize.Length, tabsSize ((0)))
Końcówka Okręt podwodny
Końcówka Klasa