Tutorial AzisJS | Cara buat MessegesBox Multiline di VB6

Hay Gaayyy... hahaha... Untuk kali ini ijinkan saya untuk membagi tutorial seputar dunia Visual Basic / VB6.
Tutorial kali ini hanya simple saja, yaitu "Cara buat MessegesBox Multiline" kenapa begitu?
Karena MessegesBox diperlukan untuk memberitahukan informasi dari program yang anda buat, biasanya MessegesBox ini diberikan dengan coding seperti ini :

MsgBox "Terimakasih" & vbNewLine & "Anda telah membaca arikel saya", vbInformation, "Information"

& vbNewLine & = Merupakan coding untuk membuat garis baru pada MessegesBox.
vbInformation = Merupakan logo dari Informasi (i).
"Information" = Adalah judul dari MessegesBox.

Nah jika kalian tidak ingin menambahkan coding dengan rumit dan panjang, maka saya disini menggunakan TextBox untuk membuat MessegesBox supaya lebih simple dan sesuai dengan yang diinginkan.

Caranya, Buka Visual Basic 6 / VB6, Lalu buat :
1 Form
1 TextBox
1 Command Button

Gunanya
"TextBox" Untuk menyimpan text yang akan kita jadikan MessegesBox.
"Command Button" Gunanya untuk memanggil perintah MessegesBox.

Jika semua sudah dibuat, kalian ubah Properties pada TextBox (Lihat dibagian Multiline) dan kalian ubah menjadi "True" (Lihat gambar dibawah).

Dan masukan text yang kalian inginkan disana, Contoh saya menggunakan text seperti ini :

Information ===============================================
Name    : Messeges Box Multiline
Font    : Arial
Acthor    : Azis Js Setyawan
===============================================

Lalu jika sudah siap dengan text nya, kalian Klik 2(Dua) kali pada Command Button yang sudah kalian siapkan tadi, dan masukan Coding berikut :

MsgBox Text1, vbInformation, "Tutorial AzisJS"

Maka jadinya seperti ini :

Private Sub Command1_Click()
MsgBox Text1, vbInformation, "Tutorial AzisJS"
End Sub

Lalu jalankan programnya dengan menekan F5.

Sedikit tambahan dari saya, jika kalian ingin menggabungkan MessegesBox antara text1, Text2, dan Text3, Atau yang lainnya (Contoh Lihat gambar dibawah).