Beranda > Add-On, Ajax, Apache, Asp.net, Batch, Blog, Browser, C++, CSS, Delphi, Hack, Hacking, Html, JQuery, Mozilla Firefox, MySQL, PHP, Programming, Tips Trick, Vb.Net, VbScript > Cara Buat Spelling Check Suggestion Dari VbScript

Cara Buat Spelling Check Suggestion Dari VbScript

28/12/2010

Buka Notepad Anda
Copy Paste Code Di Bawah Ini …………..

set word = CreateObject(“Word.Application”)
word.documents.Add
checkword = IputBox(“Masukkan Sebuah Kata Dalam Bahasa Inggris;”)
set suggestions = word.GetSpellingSuggestions(checkword)
if suggestions.Count = 0 then
MsgBox “Penulisan Kata Sudah Benar”
else
list = “Peulisan Yang Di Sarankan: *** & checkword & ***:”
& vbCr
for each suggestions in suggestions
list = list & suggestions & vbCr
next
MsgBox list
end if
word.Quit

Lalu Save Dengan Format .Vbs
Contoh : Spelling Check Word.Vbs

%d blogger menyukai ini: