msgbox "Author :  Cowok Cakep"+vbcrlf+"Contact :  Cakep_banget@Jomblo.COM",64,"Jomblo Software"

Pesan dengan msgbox

Masih pakai cara diatas untuk menampilkan pesan? Bagaimana jika sekarang kita coba untuk menggunakan User Agent:

Pesan dengan Useragent

Naah.. pasti animasi si Merlin bakalan membuat software anda tampak lebih menarik. Bagaimana cara memanggil sang penyihir bawaan windows ini?

1. Buka aplikasi Visual Basic 6.0. Kemudian pilih Standard EXE pada jendela New Project yang muncul.
2. Pilih menu Project –> Components… Kemudian beri tanda centang pada Microsoft Agent Control 2.0 dan klik OK
3. Pada panel daftar component di sebelah kiri jendela anda akan bertambah satu buah component bernama Agent. Klik sekali lalu tambahkan pada form anda.
4. Buka jendela code dan salinlah code berikut ini:

   Dim merlin As IAgentCtlCharacterEx
   Const DATAPATH = "merlin.acs"
   Private Sub Form_Load()
   Agent1.Characters.Load "merlin.acs", DATAPATH
       Set merlin = Agent1.Characters("merlin.acs")
       merlin.LanguageID = &H409
       merlin.Show
       merlin.MoveTo 700, 10
       merlin.MoveTo 700, 500
       merlin.MoveTo 100, 500
       merlin.MoveTo 400, 300
       merlin.Speak "Author    : Cowok Cakep. . . .   Contact : Cakep_banget@Jomblo.COM . . . . .  "
       merlin.Hide
   End Sub

5. Sekarang, simpan hasil pekerjaan anda dan klik tombol Run >>. Merlin akan tampil, terbang kesana-kemari, lalu menampilkan pesan anda dan menghilang layaknya seorang tukang sihir

Selamat mencoba