Cara Menampilkan Toko Kartun Yang Dapat Berbicara di Form VB6

Artikel Terkait Tutorial VB6
Cara Menampilkan Toko Kartun Yang Dapat Berbicara di Form VB6 - Tip dan trik visual basic akan membuat program sederhana yang akan langsung memunculkan tokoh kartun beserta sebuah kotak dialog yang akan kita ketikkan kata-kata didalamnya dan tokoh kartun tersebut akan menbaca dan mengucapkannya.

Tip dan trik visual basic kali ini mengahdirkan sebuah tip yang dibilang sangat unik dan menarik,kenapa dikatakan demikian karena dalam tip ini, tip dan trik visual basic akan membuat sebuah tip yaitu cara menampilkan tokoh kartun yang dapat berbicara sesuai intruksi yang kita masukan. Dengan adanya tip ini akan membuat program Anda tampil lebih menarik dan interaktif, dimana toko kartun tersebut dapat manampilkan sebuah pesan kepada penggunannya.

Untuk keperluan ini visual basic sudah menyediakan komponen yang dapat menampilkan salah satu untuk memunculkan tokoh kartun sebagai asisten program Anda yang sudah Anda buat.Nama komponen tersebut adalah Microsoft Agent Control  yang bisa Anda temukan dengan cara menekan CTRL+T kemudian menambahkan ke dalam toolbox.

Bagi Anda yang tertarik untuk membuatnya mari ikuti langkah-langkah berikut dibawah ini :

Cara Menampilkan Toko Kartun Yang Dapat Berbicara di Form VB6

1. Buka Project baru pilih Form Standard Exe VB6 Anda.
2. Tambahkan 1 buah TextBox dan 1 CommandButton

   Kemudian atur komponen-komponen dibawah ini didalamnya :

   Textbox
   Name = txtSay
   Text = (kosongkan)
   Appearance = 0 - Flat
   BorderStyle = 1 - Fixed Single
   Multiline = True

   Command Button
  Name = btnSay
  Caption = Say it!

  Agent
  Name = Agent1

3. Tambahkan  1 buah Control Agent melalui menu Project -> Components, setelah muncul kotak
   dialog Components, cari lah Microsoft Agent Control checklist check box yang ada pada
   komponen tersebut, lalu klik OK

4. Kemudian desainlah seperti gambar dibawah ini:

Form Desain

5. Lalu tekan F7 di form Anda untuk menampilkan jendela  kode, masukkan kode berikut ini di jendela kode :

Dim sAgentChar As IAgentCtlCharacterEx
Const DATAPATH = "robby.acs"

Private Sub Form_Load()
    Agent1.Characters.Load "robby", DATAPATH
    Set sAgentChar = Agent1.Characters("robby")
    sAgentChar.LanguageID = &H409
    txtSay.Text = "Hello World!"
    sAgentChar.Show
End Sub

Private Sub btnSay_Click()
    sAgentChar.Speak txtSay.Text
End Sub


6. Simpan hasil pekerjaan Anda dan Jalankan project dengan menekan F5.

Inisialisai awal yang ada pada textbox adalah kata Hello World, klik lah tombol say it dan perhatikan tokoh kartun kita akan membaca dan menyebutkan apa yang kita ketikkan plus sebuah Notes juga akan ditampilkan yang berisi kata-kata yang kita ketik

Sangat mudah bukan cara pembuatannya, bayangkan jika kita harus membuat sendiri komponen activex ini wah pasti sangat merepotkan!.Anda bisa bereksperimen dengan beberapa tokoh kartun yang lainnya.

Sekian Cara Menampilkan Toko Kartun Yang Dapat Berbicara di Form VB6. Selamat mencoba semoga sukses.


Selain Sebagai Penyedia Panduan Belajar Database dan Tutorial Pemrograman, Kami Juga Membagikan Kumpulan Source Code Program Aplikasi dan Ebook Pemrograman Terlengkap yang Bisa Anda Dapatkan Secara Gratis di Halaman :


Rekomendasi Web Hosting
  1. 20rb perbulan. Diskon hingga 40% kode kupon: MCP Daftar disini (apache).
  2. 10rb perbulan. Diskon hingga 75% kode kupon: MCP Daftar disini (litespeed).
  3. 10rb perbulan. Diskon hingga 70% kode kupon: aff-MCP Daftar disini (apache).