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 meneampilkan 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.
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
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 tip Cara Menampilkan Toko Kartun Yang Dapat Berbicara di Form VB6.Selamat mencoba semoga sukses.
No comments:
Post a Comment