LIPANz said....................

met datang di blog ku, n tengkyu buat kunjungannya yach....

Menambahkan Baris Baru ke TextBox

'Persiapan: 1. Buat 1 Project baru dengan 1 Form, 1 TextBox, dan 1 Commandbutton.
' 2. Set properti MultiLine textbox = True
' 3. Copy-kan coding berikut ke dalam editor form yang bertalian.
'--------------------------------------------------------------------------------

Private Sub Command1_Click()
Dim NewText As String
With Text1
'Ganti teks 'My New Text' dengan teks yang Anda inginkan ditambah
NewText = "My New Text"
.SelStart = Len(.Text)
.SelText = vbNewLine & NewText
End With
End Sub

Private Sub Form_Load()
Text1.Text = "My Initial Text"
End Sub

Tidak ada komentar:

Posting Komentar