CommonDialog控件
'要先单击“工程-部件”,显示“部件”对话框,将“Microsoft Common Dialog control 6.0(SP6)”选中,在工具栏就多出了一个CommonDialog控件图标,将其添加到窗体上 Private Sub Command1_Click() CommonDialog1.CancelError = True CommonDialog1.DialogTitle = "选定要打开的Excel文件" CommonDialog1.InitDir = App.Path CommonDialog1.Filter = "Xls文件(*.Xls)|*.Xls|所有文件(*.*)|*.*" CommonDialog1.InitDir = App.Path CommonDialog1.ShowOpen If Err <> cdlCancel ThenTxtFileName = CommonDialog1.FileName ElseExit Sub End If Set xlApp = CreateObject("Excel.Application") '创建EXCEL对象 xlApp.Visible = True Set xlBook = xlApp.Workbooks.Open(TxtFileName) End Sub 注意最后要关闭 On Error Resume Next xlBook.Save xlBook.Close (True) '关闭工作簿............................................. xlApp.Quit '结束EXCEL对象.................................................... Set xlApp = Nothing '释放xlApp对象.............................................!!!
转载于:https://www.cnblogs.com/lbnnbs/p/4784835.html
CommonDialog控件相关推荐
- VB的CommonDialog控件的使用
vb的CommonDialog控件的使用 使用CommonDialog控件 CommonDialog控件提供诸如打开和保存文件.设置打印选项.选择颜色和字体等操作的一组标准对话框.运行 Windo ...
- [转载]VB中CommonDialog控件的使用
CommonDialog控件 1.添加到工具箱 执行菜单命令:工程 | 部件| 使Microsoft CommonDialog Contral 6.0复选框有效. 在工具箱中双击CommonDialo ...
- VB高效导入Excel2003和Excel2007文件到MSHFlexGrid控件显示
1.VB高效导入Excel2003和Excel2007文件到MSHFlexGrid控件显示 2.以前也有Excel导入通用功能,但速度有些慢一会把两种实现方式都提供出为参考对比. 一.原通用导入exc ...
- VB6.0 怎样启用控件comdlg32.ocx
VB6.0 怎样启用控件comdlg32.ocx 怎样启用控件comdlg32.ocx 2008-10-08 09:32 提问者: nefu_20061617 |浏览次数:1502次 vbs文件中有代 ...
- 【引用】窗口处理技巧大全 vb(窗体控件)
Vb提供了API函数SetWindowLong和GetWindowLong,可以让我们很容易取得对窗口的操作:通过对窗口属性的操作,可以更改窗口的显示风格.有些看来是正常情况下无法实现的窗口,现在你可 ...
- 在vb中实现真正锁定的带自定义菜单的文本控件
在vb中实现真正锁定的带自定义菜单的文本控件 /// ///这个东西的出台,是由于一个网友的帖子,太气人,我才写的,很匆忙,又什么问题,请指出!谢谢 //QQ:9181729/mail:shawfil ...
- 【沧海拾昧】C# .Net 基本控件介绍
#C0201 沧海茫茫千钟粟,且拾吾昧一微尘 --<沧海拾昧集>@CuPhoenix [阅前敬告] 沧海拾昧集仅做个人学习笔记之用,所述内容不专业不严谨不成体系 如有问题必是本集记录有谬, ...
- C#利用Picturebox控件显示图片
源文章:https://blog.csdn.net/liyuqian199695/article/details/54098938 C#利用Picturebox控件显示图片 1.Picturebox控 ...
- CH3-Android常见界面控件
目标 掌握简单控件的使用,能够独立搭建一个注册界面 掌握ListView控件与RecyclerView控件的使用,能独立搭建列表界面 掌握自定义控件的定义方式,能够自定义一个简单的控件 几乎每一个 ...
最新文章
- php 面向对象学习
- Ubuntu16.04 下python2 | python3
- 三次样条插值三弯矩matlab_三次样条(cubic spline)插值
- 12. 定义类 【连载 12】
- html图片滚动红点_html2canvas生成的图片偏移问题
- es6 Map、Set和Array.from()
- facenet + Mtcnn 实现人脸识别(实现步骤)
- 一种新的图像清晰度评价函数,数字图像清晰度评价函数的研究与改进
- volatile双重锁实现单例
- typora下载安装步骤
- 组装一台工作游戏两用机
- 园区网核心交换机与出口路由器如何配置才能通信?
- SQL - 多字段组合升序ASC降序DESC
- linux下mkisofs制作光盘映像cdrecord刻录光盘
- 字蛛font-spider报错,web font not found,碰到的最新问题及解决方法
- 视觉显著性python_OpenCV中的显著性检测(Saliency Detection)
- excel怎样修改表格时间和计算机一制,Excel表格中如何自动生成记录数据的日期和时间...
- 单片机遥控开关系统设计(结构原理、电路、程序)
- postgres 判断null_PostgreSQL空值null参与运算的处理方法
- python小游戏:像素鸟