|
在應(yīng)用系統(tǒng)的設(shè)計(jì)中，有時(shí)要求在程序中自動(dòng)調(diào)用Ｍｉｃｒｏｓｏｆｔ 應(yīng)用程序，如Ｗｏｒｄ或Ｅｘｃｅｌ 等來創(chuàng)建文檔或制作表格。在開發(fā)一個(gè)辦公系統(tǒng)時(shí)，就采用了這種方法。
設(shè)計(jì)環(huán)境：
①ＭｉｃｒｏＳｏｆｔ Ｖｉｓｕａｌ ＦｏｘＰｒｏ ５．０中文版；
②Ｗｉｎｄｏｗｓ ９８中文操作系統(tǒng)；
③Ｍｉｃｒｏｓｏｆｔ （Ｒ）Ｗｏｒｄ ９７。
首先創(chuàng)建一個(gè)表單Ｆｏｒｍ１，在Ｆｏｒｍ１上新建一個(gè)命令按扭Ｃｏｍｍａｎｄ１，并設(shè)置Ｃｏｍｍａｎｄ１的Ｃａｐｔｉｏｎ 為“自動(dòng)創(chuàng)建Ｗｏｒｄ文檔”。Ｃｏｍｍａｎｄ１的Ｃｌｉｃｋ 過程包括下列命令
語句：ｃ ＭｅｓｓａｇｅＴｉｔｌｅ ＝＇啟動(dòng)窗＇
ｃ ＭｅｓｓａｇｅＴｅｘｔ ＝＇啟動(dòng)Ｍｉｃｒｏｓｏｆｔ （Ｒ）
Ｗｏｒｄ ９７＇ｎＤｉａｌｏｇＴｙｐｅ ＝０＋６４＋０
ｎＡｎｓｗｅｒ ＝ＭＥＳＳＡＧＥＢＯＸ
（ｃ ＭｅｓｓａｇｅＴｅｘｔ ，ｎＤｉａｌｏｇＴｙｐｅ ，ｃ ＭｅｓｓａｇｅＴｉｔｌｅ）
ｆｉｌｅｎａｍｅ ＝＇９９年工作計(jì)劃＇
ｐｕｂｌｉｃ ｏｂｊｗｄｏｃ
ｎｌｌｏｃａｌｅＩｄ ＝ｓｙｓ（３００４）
＝ｓｙｓ（３００６，１０３３）
ｏｂｊＷＤｄｏｃ ＝ｃｒｅａ（＂ｗｏｒｄ ．ｂａｓｉｃ＂）
ｏｂｊｗｄｄｏｃ ．ａｐｐｓｈｏｗ
ｏｂｊＷＤｄｏｃ ．ａｐｐｍａｘｉ ｍｉｚｅ
ｏｂｊｗｄｄｏｃ ．ｆｉｌｅｎｅｗｄｅｆａｕｌｔ
ｏｂｊｗｄｄｏｃ ．ｆｉｌｅｓａｖｅａｓ（＂＆ｆｉｌｅｎａｍｅ＂）
＝ｓｙｓ（３００６，ｖａｌ（ｎｌＬｏｃａｌｅＩｄ））
ｃ ＭｅｓｓａｇｅＴｉｔｌｅ ＝＇結(jié)束窗＇
ｃ ＭｅｓｓａｇｅＴｅｘｔ ＝＇文檔創(chuàng)建完畢＇＋ｃｈｒ（１３）＋＇退出Ｍｉ—
ｃｒｏｓｏｆｔ （Ｒ）Ｗｏｒｄ ９７＇
ｎＤｉａｌｏｇＴｙｐｅ ＝０＋６４＋０
ｎＡｎｓｗｅｒ ＝ＭＥＳＳＡＧＥＢＯＸ（ｃ ＭｅｓｓａｇｅＴｅｘｔ ，ｎＤｉａｌｏｇＴｙｐｅ ，
ｃ ＭｅｓｓａｇｅＴｉｔｌｅ）
這樣，在命令窗口中運(yùn)行上述Ｆｏｒｍ 時(shí)，單擊“自動(dòng)創(chuàng)建Ｗｏｒｄ 文檔”按扭，則自動(dòng)調(diào)用Ｗｏｒｄ ９７創(chuàng)建文檔，且文檔的名字為“９９年工作計(jì)劃”。
（海軍航空工程學(xué)院孔波２６４００１）
| 
