作者在 2021-05-04 14:50:09 发布以下内容
来源：https://bbs.csdn.net/topics/340141130
作者：十豆三
* VFP8.0 Or VFP9.0
m.llExit=.T.
Try
m.Excel=Createobject("Excel.Application")
m.Excel=Null
Catch
m.llExit=.F.
Endtry
If m.llExit=.F.
Messagebox("没有安装 Excel！",48,"信息提示")
Return
Endif