如何判断Appword是否为空

needanothercoder 2015-10-16 04:19:14
程序用
Appword=CreateObject("word.application")
建立一个Appword指向一个Word对象
程序又有一个按钮中代码如下:
Appword.Quit(0)
thisform.Release
QUIT
问题:如何判断Appword是否已经赋值?
...全文
74 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
十豆三 2015-10-16
  • 打赏
  • 举报
回复
Try loWordApp=Newobject("Word.Application") && 产生Word对象 llSuccess=.T. Catch To oErr Messagebox(oErr.Message,16,'信息提示') llSuccess=.F. Endtry If llSuccess If Not Type("loWordApp")="O" Messagebox("创建 Word 对象失败!"+Space(3),48,"信息提示") Return Endif Else Messagebox("创建 Word 对象失败,确认本机是否已经安装了 Word ?"+Space(3),48,"信息提示") Return Endif

2,717

社区成员

发帖
与我相关
我的任务
社区描述
VFP,是Microsoft公司推出的数据库开发软件,用它来开发数据库,既简单又方便。
社区管理员
  • VFP社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧