Cara Mentransfer Teks dari Form ke Dokumen Word

Cara Mentransfer Teks dari Form ke Dokumen Word - Ketika Anda sedang bekerja disebuah program tertentu yang memerlukan sebuah transfer antar Dokumen kadang-kadang kita harus membuka program tesebut kemudian mencopi-nya.Hal ini tentu tidak efisien, untuk itulah perlu dicarikan solusinya yaitu dengan cara membuat form yang dapat mentransfer dokumen ke program lain misalnya Word.

Dalam tip kali ini tip dan trik akan memberikan solusinya berupa form yang dapat mentransfer dokumen di program visual basic.Teks yang Anda tuliskan pada form Visual basic dapat di transfer ke dokumen word, selain itu bisa juga Anda tambahkan untuk melihat hasil cetaknya atau Print PreView, adapun langkah-langkahnya sebagai berikut :

1. Letakan sebuah TextBox dan sebuah Commadbutton pada form
















2. Atur properti masing-masing kontrol :

   -Command1 Caption    : Transfer
   -Text1          Text1        : kosongkan                  Multiline   : True

3. Ketikan kode dibawah ini:

Private Sub Command1_Click()
Dim word
Set word = CreateObject("word.basic")
word.appshow
word.filenew
word.Insert Text1.Text
End Sub

Anda bisa saja menambahkan command 2 dengan caption "Print Preview" langkah-langkahnya sama dengan langkah diatas, hanya saja Anda perlu menambahkan kode "word.fileprintpreview" sehingga kodenya akan menjadi seperti dibawah ini :


Private Sub Command2_Click()
dim word
set word=createobject("word.basic")
word.appshow
word.filenew
word.insert text1.text
word.fileprintpreview
End sub

4. Simpanlah hasil pekerjaan Anda, dan jalankan Program.

Demikianlah tip kali ini tentang cara mentransfer teks dari form vb ke dokumen Word.Selamat mencoba semoga berhasil.

No comments: