Ads (728x90)

Latest Post

Kesehatan

Tips


Pengertian dan konsep com

COM atau Component Object Model adalah infrastruktur yang disediakan oleh Visual Basic untuk mengakses obyek-obyek atau kontrol-kontrol lain sepanjang punya antar muka yang dapat diakses oleh Visual Basic.

Untuk dapat menggunakan COM pada Visual Basic, kita dapat membuka Reference Dialog dengan cara: dari menu Project, pilih add Reference. Jendela seperti pada gambar 7.8 akan terbuka.


Pada gambar 7.8 kita memilih COM atau obyek yang ingin kita gunakan. Pada contoh ini, kita memilih "Microsoft Word 8.0 Object Library". Setelah kita klik OK, maka kita dapat menggunakan obyek yang kita pilih ini dalam kode program kita. Berikut contoh penggunaan obyek tersebut.

Contoh 7.14. Contoh penggunaan COM.

Private Sub cmdCheck_Click()
Dim text As String
Dim suggestion As Word.SpellingSuggestion
Dim colSuggestions As Word.SpellingSuggestions
'menambahkan dokumen bila belum ada dokumen yang
terbuka.
If MSWord.Documents.Count = 0 Then MSWord.Documents.Add
text = Trim$(txtWord.text)

lstSuggestions.Clear
If MSWord.CheckSpelling(text) Then
lstSuggestions.AddItem "(correct)"
Else
Set colSuggestions =
MSWord.GetSpellingSuggestions(text)
If colSuggestions.Count = 0 Then
lstSuggestions.AddItem "(no suggestions)"
Else
For Each suggestion In colSuggestions
lstSuggestions.AddItem suggestion.Name
Next
End If
End If
End Sub

Pada kode di atas kita menggunaka salah satu metode dari obyek yang kita buka sebelumnya ("Microsoft Word 8.0 Object Library"). Metode yang ingin kita gunakan adalah SpellingSuggestion (lihat kode pada bagian pendeklarasian variabel). Dengan cara yang sama, kita dapat menggunakan metode atau fungsi-fungsi yang kita inginkan dari obyek COM yang telah kita muat.

Pada jendela Reference di gambar 7.8, tersedia banyak sekali COM yang dapat kita gunakan. Cobalah untuk membuka satu persatu, dan lihat apa fungsinya.

Halaman Terkait:
| Pemrograman aplikasi dengan vb dan vb.net | Dasar-dasar visual basic | Akses dan manipulasi basis data dengan vb |

Post a Comment