说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

VB如何使用VB控件Commom Dialog

HTML文档下载 WORD文档下载 PDF文档下载
VB如何使用VB控件Commom Dialog

  Visual Basic是一种非常有效的Windows编程工具,是目前Windows编程工具中使用最广泛的语言。在所有资料中,大多都没有介绍Visual Basic中一个非常有用的控件——通用对话框Commom Dialog。


  在一般的程序设计中,文件操作对话框都是必不可少的。而这种对话框的设计也比较繁琐。首先,要设计一个新格式Form并设置好边框,再在上面设计一个文本框TextBox用以显示和输入文件名,一个文件列表框FileListBox,一个目录列表框DirListBox,一个驱动器列表框Drivelist, 一个小型组合框ComboBox用以显示和选择类型。而且还要编写好几个过程程序来完成总体功能。虽然整个实现过程难度并不算太大,但较为烦琐。


  现在,有了通用对话框Commom Dialog以后,事情就简单多了。Commom Dialog共有七种用法,调用语法为:[Form.]CmDialog.Action[=Setting]


  其中:


  Setting Dialog Displayed


  0 No action 不运行


  1 Open 打开文件


  2 Save as 换名存盘


  3 Color 色彩


  4 Font 字型


  5 Printer 打印


  6 Invokes WINHELP.EXE 调用帮助文件


  现在,我们以打开文件对话框Open为例予以具体说明。首先,在格式上建立一个通用对话框控件CMDialog1,设置其属性如下:


  DialogTitle=<对话框标题> :次项空缺时,对话框标题等于


  激活方式Setting。


  Filename=*.txt :缺省文件名


  Filter=<文本文件[*.txt]>|*.txt|<所有文件 [*.*]>|*.*| :文件


  选择类型为文本文件[*.txt]——通配符*.txt,或


  所有文件[*.*]——通配符*.*。注意,以上各项均


  以竖杠符“|”结束。


  LnitDiv=C:\ :文件缺省路径。


  通用对话框Commom Dialog控件被调用后,属性Filename返回用户所选文件名。如果调用失败,Commom Dialog返回VB的错误代码为Err=32755.下面为调用程序:


  Sub Command1_Click ()


  CmDialog1.action = 1


  If Err <> 32755 Then


  fname$ = CmDialog1.Filename


  Caption = fname$ :将窗口标题改为文件名


  End If


  End Sub


  现在,您已经可以调用通用对话框Commom Dialog了。
微软IE浏览器5大动向 加速吸引开发者 开源的简繁转换库OpenCC支持Node.js 继Opera之后,Adobe表示将支持Google Blink 提高大型软件项目质量的一些实用型技术分享 谷歌推出Mirror API,开发者可为Google Glass开发应用 无需999,也不要499,99美元Linux超级计算机带回家 微软反击AWS:推出EC2并大幅降价,“价格战”正酣 Operation InVersion:拯救了LinkedIn的大修项目 五步走战略——Avocado在最初几周内迅速扩大30倍 NoSQL产品测评:Cassandra、MongoDB、Couchbase和Aerospike 谷歌眼镜开箱评测:比想象更精致 Pinterest谈实战经验:如何在两年内实现零到数百亿的月访问 初创公司Instart Logic:专为电子出版商和网站站长解决“痛点” 未来即卖芯片又卖服务!Intel收购软件厂商Mashery 继MSN之后,微软又开始整合Skype与Lync服务 阿里将推AMOS智能机 斥资10亿鼓励开发App AMPLab开发重构的Hadoop版本Tachyon:吞吐量要比HDFS高300多倍 一名理科生的创业路 十大界面原型与布局工具 Google产品经理Kenneth Norton:如何与工程师共事 如何创建自适应系统来增强用户体验 Jolla下月展示首款Sailfish手机 将重点发展中国区 海外1GB大容量游戏,国内渠道如何分发? 真正的能源大户是WiFi网络 数据中心只是“伪军” CloudFlare创始人传奇人生:7岁编程,法学博士,获哈佛商学院最高荣誉 2013云计算深入实践 jQuery 2.0发布 不再支持IE 6/7/8 Google再发力,更新Dart M4! 【多图】鼠标、光驱等13个即将消失的PC技术 直击OpenStack美国峰会:分享五大经验收获 Project Savanna:让Hadoop运行在OpenStack之上 如何用window.open弹出一个屏幕居中的窗口? 大侠们,在线求word200文件密码破解,急!!!!!!!!!!! ccnet(苦海放歌) tdl982324(石井坚) ( ) wanghr100(灰豆宝宝.net) possible_Y(◎)(◎)←(这是眼镜,不要想歪了)请接分 ccnet(苦海放歌)yaoxuefeng(锋雨者)brainf(后街)请接分 配置节的type的第二个参数的含义 报表问题。 最近在找个网站管理系统,各位能否给个建议 windows2000的奇怪问题 关于如何自定义组件问题 有关windows 98自动重起问题。 ListBox问题 VFP8.0中的数组问题,高手和用过的人来看看! 数据库的移植问题? 重新开机时常常变成"大图标",怎样设置使WIN2K所有磁盘(c,d,e盘)上的所有文件夹和文件以"列表"显示,就是让"查看"->"列表"固定? oracle9i的安装文件都有什么?望高之!急! 哪位有没有SCJP培训的录音或其他教学的好东西阿 MSComm控件在设计时运行没问题,但打包后装到别的机子老是出现“没有注册类”,求救? delphi 做的数据库应用程序如何移植?? copysign怎么用啊? 如何将一个网页的所有链接均自动加为绝对链接? 技术与数学的问题 本人写了一个设置纸张方向和大小的函数,其中MyDevMode.dmPaperSize = psize '若vbPRPSA3 设置纸大小为A3,但在VB对象库中找不A2张对应值 tomcat4.1.24中的sevlet问题 我下载了linux的iso文件,可怎么安装啊!! 我想问一下,有关于计数器的相关的信息? 救急:是否可以在两个页面(两个单独打开得ie浏览器页面)传递参数,如何实现啊? JDBC相关的两个问题 Oracle8.1.6怎样连接SQL SERVER2000 ?(在线等待) inserted表问题 急!!!关于FileSystemObject问题,在线等 dll 编译问题 请教 请教关于iterator与container? 谁有mixerAPI的中文资料,如(mixerGetLineInfo)我需要弄懂原理(不需要MSDN) 请问“怎么样才能修改以有的flash文件”,拜托,在线等待 如何使相同的子窗口显示一个? ?请教高手有关Align的问题。 高手帮我谢谢注释~~高分相赠~~~~谢谢高手~~~~ 各位大牛们,小弟想请教大家对FlowMIS这个平台有多少了解,用此平台进行二次开发(企业信息系统)好不好。 SQL SERVER2000 怎样连接Oracle8.1.6(在线等待) C语言程序设计 如何在英文字符集的客户端访问服务器为中文的数据库? 那4M是不是让诺基亚给偷了?! 如何调用ResetPrinter函数设置默认打印机 listview使用的问题 delphi的打包问题 请大家推荐一个短信网关 调查:当你身边响起神圣的国歌时,你会不会不由自主站起来,手放到胸前,跟着节奏一起唱起来?(有感而发) 请问如何调用.chm的帮助文件? 如何调用系统默认打印机的属性! 请教新手问题~~~麻烦哪为大侠给解释解释~谢~ 如何用struts实现阴阳色列表? 望梅止渴主要内容 新文化运动前期的根本目的是( )新文化运动前期的根本目的是( )A、改造传统的儒家思想 B、倡导西方文化,促进社会进步C、倡导新文学和白话文 D、反对思想领域的尊孔复古我知道是B, 人们走进放菜的地窖时,有时会发生晕倒现象,这是因为地窖里的大白菜,番薯等也再呼吸,它们跟人一样,也是呼进二氧化碳.日长月久,它们呼出的二氧化碳就像滚雪球一样越积越多.问(1)你能 表示“扔”的词语?暗暗暗暗暗暗暗暗 新文化运动的目标是什么?要考中国中国近现代史纲要了,有一个这个题,书上没翻到,囧. 地窖内存放的红薯为什么长白毛?还有点发软的现象.这是什么原因,温度从没超过15度. 抛的词语是什么 新文化运动的目的 红薯地窖中硫化氢气体怎么分解 核糖体大小亚基为什么要分离 新文化运动的目的是什么 有谁知道这是什么虫子. 原核细胞的核糖体两个亚基分别是多大? 怎么写课题 这种昆虫是什么?有谁知道? 两小儿辩斗对你有啥启发?孔子不能决也 说明啥? 与初中有关的所有物理公式(越详细越好) 高一物理第七题.谢谢.求解! 欧姆定律的应用题,越详细越好..1、(2007•宁波)如图,电源电压保持不变,表①、②、③是电流表或电压表,滑动变阻器R2的滑片P在中点,闭合开关S,三只电表均有示数.当滑片P向左移动时, 单细胞生物有没有线粒体? 课题怎么写啊? 适用简易程序有哪些条件? 好的,但是我想先看一下电视节目.的英语怎么说求大神 桃树接桃子是什么生殖方式 界门纲目科属种的门有哪些门脊索动物门之类的, 早期城市的基本特征有..六个 什么是相对误差?测定一块氯化钠中含有的碳酸氢钠杂质的含量,用氢氧化钙来算生成的碳酸钙的质量为什么说将氢氧化钠换成氢氧化钡会更好 我打错了,是氢氧化钙换成氢氧化钡 the only way i could do this was. 这里省去的是什么单词the only way i could do this was.这里省去的是什么单词作什么语先行词被什么词在从句中代替填术语 求问城市与广大农村相比,具有哪些基本特征? 生物里的NADP是什么意思? 《独立宣言》,《人权宣言》,《权利法案》的启示. 为什么说密集性是城市基本特征之一 一架飞机以加速度a从地面由静止开始竖直向上起飞,每秒耗油量V=pa+q(p,q为常数).若飞机飞到某一高度,耗油量最小,则其加速度大小为多少. ONE SHOT什么意思 Helicopters have only been worked on by man since 1940.怎么翻译这句话,主要是only 我不解 一个多边形的内角和等于外角和的n倍,则这个多边形的边数是 对丁克家族的看法?我是80年后的一代,父母辈的人的观念是:结婚就应该生孩子,这是种幸福.可是我不认为是这样.也许是价值观不同吧.我认为生孩子是项弊大于利的投资.想到生孩子,我就联想 A man has been arrested____the murder of the teenager.A in connection withB to connect 已知X为第二象限角,问X/2为第几象限角?我想问的是 用直角坐标系 解题的那个简便做法,我就记得 是X为第二象限,就把什么分为两部分 这两个小孩哪个说的有道理?意思是什么!简介一点!好的话+100分!别长篇大论! Hardware changes might not have been detected 市场调研方案怎么写? 对丁克家族应持有什么态度 英语原型填空 send 还是 sendsPeople in western countries ____ e-cards to each other at Christmas.这里改用 send 还是第三人称 sends.这里的people 貌似是作单数的吧,今天老师说的时候我没听清楚. 调研方案怎么写?就是调查一个市场的具体的文书.有什么格式呢?最好能给份例子啊! 核糖体大小亚基在合成蛋白质前是分开的还是在一起的 NADP+怎么念 怎么写 交通调查方案? spare part怎么读 Do you expect _to be any possibility that he will be elected chairman?A .it B.there 2.The information on the Internet gets around much more rapidly than _in the newspaper.A.it B.that3.I intended to compare notes with a friend,but unfortunately _cound 英语翻译 android 手机spare part 里面有挂载/系统有只读和读写到底有什么用—什么区别—选择的话选择哪个呢? 请问 you expect to have that person to yourself 发光的不一定是金子.这句话怎么理解最好举例 12month and 1% spare 这实在出口产品保修期的一种说法,我只是不明白的1%spare 一生物题,答案为B 请写出解释一道生物题;对某植物进行以下处理:(甲)持续光照10分钟;(乙)光照5秒钟后再黑暗5秒钟,连续交替进行20分钟.如其他条件不变,则在甲、乙两种情况下植物 计划进度与实际进度匀速进行是什么意思 Spare part of flue gas 吉普顿服装怎么样 法布尔是怎样看待昆虫世界的 国际新闻早报:欧洲政界谴责美国窃听行日媒:日英拟开国安热线“牵制中国”美刊盘点中国继续购买美债四大理由日本台风灾区官员与女子欢饮引民愤 或欧盟针对美监控拟推新法规 科技企业或港媒:监控丑闻令美众叛亲离 “去美国军演引发澳大利亚山火肆虐 一名灭火飞日议员质疑安倍 称应给首相出席国会次三名驻阿富汗英军官涉嫌私刑处决塔利班美国国安局被指30天收集1240亿份雄性鱼深夜发奇怪求偶声 扰乱英国居民穷母为喂子行窃 女警感动放人送百美元秘鲁前印加遗址发现两具保存完好的千年联合国继续准备销毁叙化武 瑞典提供运澳大利亚调查山火原因 中国卫星提供监美国600万年轻人赋闲 纽约芝加哥均美国一军事基地附近发生枪击案 造成两埃及政府拟于11月中旬终止紧急状态秘鲁前印加遗址惊现两具保存完好千年木英《卫报》指美国安局监听35位外国领安倍批小泉纯一郎零核电政策非长远之策奥迪停一宿 开门多个男婴一姐不耍酷 要做定心丸中秋铁路 加开临客19.5对高铁巨贪当庭认罪面向国内高中生 多伦多大学“绿色通道北京电视台(9月10日)赶紧交出化武 免得挨打新政策启动 新思路显现住上云端Viaggio菲翔周年纪念版发布“男童挖眼案” 警方应继续追凶王府半岛降价 提升客房入住率路面布“陷坑” 拖底找谁说?男子冲撞盘查交警被刑拘超市袋装鲜奶 最近总缺货王家瑞会见越南客人美国911后遗症:数千人吸入有毒物质印度法庭宣判新德里轮奸案中4名嫌犯犯外交小灵通微访谈:中亚各国有哪些知名全运礼仪每天练笑4小时变女汉子 需露驻多伦多总领馆与加华社联手 保护中国
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘