亚洲欧洲国产欧美一区精品,激情五月亚洲色五月,最新精品国偷自产在线婷婷,欧美婷婷丁香五月天社区

　　在應(yīng)用系統(tǒng)的設(shè)計(jì)中,有時要求在程序中自動調(diào)用Microsoft 應(yīng)用程序,如Word或Excel 等來創(chuàng)建文檔或制作表格.在開發(fā)一個辦公系統(tǒng)時,就采用了這種方法.

　　設(shè)計(jì)環(huán)境:

　　①M(fèi)icroSoft Visual FoxPro 5.0中文版;

　�、赪indows 98中文操作系統(tǒng);

　�、跰icrosoft (R)Word 97.

　　首先創(chuàng)建一個表單Form1,在Form1上新建一個命令按扭Command1,并設(shè)置Command1的Caption 為"自動創(chuàng)建Word文檔".��Command1的Click 過程包括下列命令

　　語句:

　　c MessageTitle =’啟動窗’

　　c MessageText =’啟動Microsoft (R)

　　Word 97’��nDialogType =0+64+0

　　nAnswer =MESSAGEBOX

　　(c MessageText ,nDialogType ,c MessageTitle)

　　filename =’99年工作計(jì)劃’

　　public objwdoc

　　nllocaleId =sys(3004)

　　=sys(3006,1033)

　　objWDdoc =crea("word .basic")

　　objwddoc .appshow

　　objWDdoc .appmaxi mize

　　objwddoc .filenewdefault

　　objwddoc .filesaveas("&filename")

　　=sys(3006,val(nlLocaleId))

　　c MessageTitle =’結(jié)束窗’

　　c MessageText =’文檔創(chuàng)建完畢’+chr(13)+’退出Mi-

　　crosoft (R)Word 97’

　　nDialogType =0+64+0

　　nAnswer =MESSAGEBOX(c MessageText ,nDialogType ,

　　c MessageTitle)

　　這樣,在命令窗口中運(yùn)行上述Form 時,單擊"自動創(chuàng)建Word 文檔"按扭,則自動調(diào)用Word 97創(chuàng)建文檔,且文檔的名字為"99年工作計(jì)劃".