如何打开.gif,.htm文件?

ThunderLight 2003-09-09 02:49:52
曾经在自定义控件里,用UserControl.Hyperlink.NavigateTo "c:\a.gif"
UserControl.Hyperlink.NavigateTo "c:\a.htm" 打开过
现在我想写一个类,参数 filename (.gif,.htm文件)
不知道如何打开这个文件?
...全文
90 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
ThunderLight 2003-09-09
  • 打赏
  • 举报
回复
我还有一种想法,
定义一个ie对象,就象定义一个EXCEL对象一样 dim a as Excel.Application
但是我不知道该如何定义,
请教高人
ThunderLight 2003-09-09
  • 打赏
  • 举报
回复
我也曾试着使用usercontrol(还是说的在类模块中)
dim uc as usercontrol
'set uc =new usercontrol 这句话有错,因为,new 后面根本没有usercontrol
但是如果不写,后面一句代码出错,"没有SET"
uc.Hyperlink.NavigateTo "c:\a.htm"

不知道该如何解决
ThunderLight 2003-09-09
  • 打赏
  • 举报
回复
我现在是在一个类模块里写。
所以不能使用UserControl,
我就是想问如何在类模块里写代码打开文件
另外还有一中方法:
Call Shell("e:\Program Files\Internet Explorer\IEXPLORE.EXE c:\a.htm", 1)
但是此时候必须知道IEXPLORE.EXE 存在的位置,因为换到其他机器上时,ie可能就变路径了
所以如果有能够找到系统盘或者ie路径的方法也可以

不知道哪位大侠能解决,谢谢
yijiansong 2003-09-09
  • 打赏
  • 举报
回复
UserControl.Hyperlink.NavigateTo path & filename
betagain 2003-09-09
  • 打赏
  • 举报
回复
直接传递文件名啊
UserControl.Hyperlink.NavigateTo path & filename

如果是通过commondialog选择的文件,那么文件名包含路径信息,则
UserControl.Hyperlink.NavigateTo cmdialog.filename



betagain 2003-09-09
  • 打赏
  • 举报
回复
怎么个打开法?想做什么?

7,789

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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