请教高手，将VB中的一个窗体程序变为一个应用程序

yifang · 发表于 2005-4-5 11:06

各位高手，求救.

偶有一个小程序，是检查当前活动文档中的字体的，偶想把它变成一个应用程序，让它不依赖于word，用时只要将word文档拖进这个小程序就可以了。

　请参附件。现在要这样才可运行它，请帮忙啊，谢谢啦。 Usage: 1) Open the word file 2) "Alt+F11" 3) Import the "Helpform" 4) Run it.

P4l6aTb1.zip (8.07 KB, 下载次数: 29)

yifang · 发表于 2005-4-5 11:10

自己顶一下，具体东东可以发麦尔给偶，yifanghui@sohu.com

热切盼望高手回复，这个问题困扰偶好久了，偶对编程没什么感觉，希望高手指条大道。

yifang · 发表于 2005-4-5 13:02

[em06][em06][em06]

希望守老师给与帮助，看来这个问题一般的人是解决不了了，

[em08] 请大家一定要帮忙啊，偶心急死了，交不了差，偶可要惨了，谢谢了，偶自己再顶一下[em08][em08]

ykhy · 发表于 2005-4-5 19:52

你所付的FORM代码好象是VBA的，VBA与VB有很大不同，VBA的较多代码不能在VB中直接运行。

VB直接控制WORD，可使用CreateObject()函数。以下代码，供参考。

VB中（非VBA中）：

Dim OBJWDDOC AS Object '定义一个对象

Set OBJWDDOC=CreateObject("Application.Word") '建立对象,这里为打开WORD

......

with OBJWDDOC.selection 'WITH块设定文字为宋体,11号字

.font="宋体"

.size=11

endwith

同理也可以控制Excel。当然，也可以在用VB打开WORD时，运行宏代码，但这好象又不符合你的初衷。

守柔 · 发表于 2005-4-6 05:37

以下是引用yifang在2005-4-5 13:02:00的发言：
[em06][em06][em06]

希望守老师给与帮助，看来这个问题一般的人是解决不了了，
[em08] 请大家一定要帮忙啊，偶心急死了，交不了差，偶可要惨了，谢谢了，偶自己再顶一下[em08][em08]

我得只有打退堂鼓的份，这是WORD论坛，说WORD，我还凑合，封装成DLL还行，做成EXE，没做过，我还想学呢？ [em04]

yifang · 发表于 2005-4-6 10:51

那么请问这个VBA 的程序能否可以做成应用程序呢。要是不能，要把它改造成ＶＢ的应用程序是不是很麻烦呢，欧也是在别人的基础上进行改进的，所以对这些不是很清楚啊。

[em06][em06]谢谢四楼的大侠。

守斑竹，你要是脸红偶要钻地缝了，呵呵，不过还是要谢谢你的指点。

stanleypan · 发表于 2005-4-6 16:08

这种功能性的作品,最好是做成WORD加载宏.

ykhy · 发表于 2005-4-6 20:33

这个作品本身做得不错，但要改成VB的需要三方知识，WORD、VBA、VB，要修改为VB不是不可能，但并非易事。另一种可能就是楼主搞错了，不妨把目的说说看。

yifang · 发表于 2005-4-7 10:09

因为欧们部门开发的小工具都是保存为应用程序形式的，所以偶想实现统一。实在不行偶就这样用了，就是这样用起来麻烦了一点。

谢谢楼上的大侠给与的帮助

		自动登录	找回密码
密码			免费注册