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

VB中DOS文件名与长文件名的转换

HTML文档下载 WORD文档下载 PDF文档下载
VB中DOS文件名与长文件名的转换

  自从进入Win95时代以来,Win95的长文件名给人们带来了很多方便,但是由于原来的DOS只支持8.3格式,即8个主文件名加上3个扩展名,所以所有Win95的长文件名都有一个DOS名,具体方法为取原长文件名前6位加~num(其中num为现目录中不重名的序号)。现在的VB已完全支持了长文件名,但是有一点可能没有注意到,即当用command()接收从命令行传来的参数时,如果参数是长文件名,则被强制转换成为DOS名,即8.3格式文件名。由于这两种文件名通用,所以一般情况下不会有什么问题。但遇到特殊场合就不行了。有没有办法再把8.3格式的文件名转换为原来的长文件名呢?答案是:可以。
  让我们编程来回答这个问题:
  首先建立一个窗体,在窗体上加两个TEXT控件,其中第一个TEXT的TEXT属性为“显示命令行参数”,第二个TEXT的TEXT属性为“显示转换后文件名”,再建立一个 commandbutton 控件,其caption属性为“显示”,具体原代码如下:
  ′-------通用,声明:
  Dim dosfilename As String ′声明dos 文件名
  Dim longfilename As String ′声明长文件名
  ′------------
  Private Sub Command1_Click()
  Text1.Text = dosfilename
  Text2.Text = longfilename
  End Sub
  ′--------
  Private Sub Form_Load()
  dosfilename = Command$() ′从命令行取得参数
  longfilename = Dir(dosfilename) ′得到长文件名
  End Sub
  接着生成EXE文件,然后将一个长文件名的文件图标拖到新生成的EXE文件上去,点击EXE文件的commandbutton 就可以看到转换结果了。
  (马 麟)

应用开发利器FXForms:iOS上实现各种Form View Firefox 30正式版:支持GStreamer 1.0技术、内置全新Gecko 30内核 从阿里、UC联姻 看移动互联网“入口”之争 AppCode发布3.0.1更新,支持Xcode 6和Swift 智能家居持续升温:苹果HomeKit合作伙伴Honeywell发布恒温器 欲与谷歌、亚马逊抗衡,苹果推CloudKit拥抱云服务 针对新一代物联网应用 Atmel推全新32位微控制器 实时计算,流数据处理系统简介与简单分析 Cue:秒杀HealthKit,打造自己的家庭医生 新iPhone要来:4.7就够了么?我们还有更大的 Docker迈入云(DockerHub)+端(Docker引擎)时代 《近匠》壹枱智能钢琴:改造音乐行业的新“玩”家 圣何塞Hadoop Summit 2014看点 唯快不破!90后大学生9天完成近670页的Swift语言文档翻译 一周消息树:Java、.NET、Web技术应用特点 苹果生态格局:软硬件之后,iLifestyle才是王道 小米互娱总经理尚进:独立游戏当为发烧而生 哪些编程语言、框架/平台最受企业青睐? 高德LBS应用大赛:百万大奖、千万基金等你来拿! Gartner:有数据有真相 从浪潮看服务器市场走势 PhoneGap 3.5.0发布,不再支持iOS 5和ARM64 “中美青年创客大赛”之“创客·教育论坛” 以创客教育支持创新人才培养 授之以渔,谷歌发布开源秘密武器Kubernetes 炫耀分数已经out!ShareSDK发布游戏内视频录制SDK Android开发者必知的5个开源库 UCloud完成B轮融资5000万美元 Git远程操作详解 《近匠》iMAG:移动应用快速跨平台开发工具 Facebook斥资30亿美元购Snapchat遭拒后,推Slingshot 全球开发者报告:程序媛崛起,企业应用更赚钱! 土豪经济 E人E本发布首款4G安全手机 请各位大侠尽快指点! 怎么让StringGrid的行数随数据的多少改变? 一个关于线程的问题 怎么拖动无标题栏窗体? 使用FTP碰到的问题 windows下的网络编程的c库函数有什么?怎么用? 为什么我的机器加入域的时候会出现“提供的凭据与已存在的凭据集冲突”的错误? 一个简单但很迷惑地问题!请指教! 分发高手睇过来 请求帮助 [转帖·放分]恶毒女人的情书 如果自己创建一个类,在这个类中想调用当前CXXVIEW类中的函数该如何办? P:Pointer? 数据库连接问题? 如何在菜单中显示图片?谢谢! 在线等待!急,tomcat中文问题 工作很非常特别烦心,散分 如何监控网络中的打印 请问在COMCAT中如何更改根目录的路径 java 中的double类型,在Oracle数据库中应该对应的是什么类型? 怎样作才能不让用户随意更改系统时间和日期? 关于单击和双击的问题 请问一个关于GB要转换成日文的Shift-JIS内码的问题 请问一下这个字符串什么意思? 在ASP.NET中怎樣讀取通過用XMLHTTP Send過來的XML數據包(一個問題50) 关于IrDA在WINDOWS/NT/XP下的编程实现 一定给分啊,快点进来看看阿 ! 帮忙写个SQL语句。 静态文本框里的文字如何调整其大小? store procedure类型 数据窗口问题 编译器参数,在线等待 求sql 如何用BUTTON按钮,将一个窗体文件关闭? 非常简单的付值问题.火急,再线等待,马上送份 调用RasDia();第一次拨号成功断线后再拨就返回错误字符终止连接为何代码如下: 怎样能编写用于用ie注册邮箱、论坛账号时自动填表的软件 资源文件的问题! 一个挑战斑竹的问题!!50分 如何把压缩文件(*.rar或则*.zip)和word文档存到Acess数据库啊??? 如何可以知道访问我的网站的用户来自哪里? 关于SQL的问题 这对话框我如何去掉 asp.net 能否运行在Solaris系统下,参与者有分 c#请求援助 int a 除以 int b 取他们的余数用C#该怎么写啊?谢谢 求救!显示后台数据,在线等待!等…… jsp中的数据库问题,求教!!急 刚学数据库,弱智问题,高分赠送! 这个查询怎么写? 关于表生成文本文件遇到的事情,急 InstallShield Professional Standard Edition 6.30 英文版的下载(高分:200) 一张纸(无论大小)为什么最多只能对折7次? 一种运动鞋每双售价48元,比进价高5分之1,这种运动鞋每双进价多少元? 加工一批零件,甲独做20天完成,乙独做15天完成,乙每天比甲每天多加工零件12个,这批零件有多少个?有心人来帮帮 如果每个书包的进价是40元,仍按进价提高50%后标价,若商场想获得14元利润,每个书包打几折 一家鞋垫出售两种运动鞋,一种款式新疑,每双售价48元,可赚20%,另一种样式陈旧,是、、、、、、(急)一家鞋垫出售两种运动鞋,一种款式新疑,每双售价48元,可赚20%,另一种样式陈旧,是处理品, 一批零件,甲单独做要12天完成,乙独做要15天完成,丙独做要20天完成.(1)三人合作一天完成这批零件的( )(2)三人合作3天完成这批零件的( )(3)三人合作( )天可以完成任务(4)三 一张纸为什么最多只能对折九次? 为什么沿着同一条经线或经线圈不可以回到原点 母爱细节描写,要简洁,越简洁越好.300字足够. 为什么一张纸最多对折9次?问一下,不知有谁知道.折完9次后会怎么样? 沿任何一条经线北行,都能回到原点为什么这句话错了? 与人的基因相同的动物是什么?老鼠 钱是万恶之源吗赞成! 小明和爸爸现在年龄的和是34岁,3年后爸爸比小明大24岁.今年小明和爸爸多少岁?(写算式) 细节描写母爱的一个瞬间200字,一定要一个瞬间,瞬间起码要100字(回答的好, 一盒彩笔4元,如果李红买了这盒彩笔,那李红与玉兰的钱数比是4:5,如果玉兰买了这盒彩笔,那么李红与玉兰钱数之比是13:14.求两人原来各有多少钱? 如一个人从0度经线一直向北走,最后能回到原点吗?为什么? 有没有好的推荐,哪种空气加湿器好用? 人类通过对某种动物的遗传基因进行改造,使这些动物可以产生和分泌出人们所需的某些物质,这种动物就是____ 写出两位有梅花一样气节的人 空气加湿器哪种好 一盒彩笔4元,如果李红买这盒彩笔,那么李红与王兰的钱数比是四比五;如果王兰买这盒彩笔,那么两人的钱数比是十三比十四.两人原来多少元? 请大家帮忙修改下我的作文,写离别母校的.离别母校“小小少年,很少烦恼,眼望四周阳光照.小小少年,很少烦恼,但愿永远这样好.”眨眼间,小学六年级的生活也即将结束了.我们也由小小少年变 人的基因主要存在于1.下列关于常染色体和性染色体的叙述,不正确的是:A 性染色体与性别决定有关 B 性染色体只存于性细胞中 C 常染色体与性别决定无关 D 常染色体也存在于性细胞中2.下 将动物身上的基因转到人类身上会如何? 像梅花一样有气节的中国人 人火化后,基因还存在吗? 在口算竞赛中,李宏与王明正确题的比是3:4,王明与张杰正确题的比是2:3.李红、王明、张杰三人正确题的比是多少? 里面带铁丝,这个发带怎么扎 关于感恩党 感恩祖国的诗歌 要独创 不要太多! 现在白海豚有多少只?现在世界上白海豚有多少只?中国有多少只白海豚? 在一个底面半径是10厘米的圆柱形杯中装水,水里浸没了一个底面半径是5厘米的圆锥体铅锤,当铅锤从杯中取出后,杯里的水面下降0.5厘米.铅锤的高是多少?(用算式的)快点! 我还有两个月就要摘牙套了,不知道牙套摘后是不是都要带戴铁丝保持器,那要戴多久 白海豚是什么 在一个底面半径是10厘米的圆柱形杯中装水,水里浸没一个底面半径为5厘米的圆锥体铅锤,当铅锤从杯中取出后,杯里的水上升1厘米而不溢出.铅垂的高是多少? 一双运动鞋的进价是200元,标价400元,商场要获得不低于120元的利润最低可以打几折 不管多大的纸,最多只能对折9次对吗? 一批零件,甲单独做15天完成,乙单独做20天完成,现由甲乙合作12天就完成,在这段时间里,乙做多可以休息几天? 跪求中外名人轶事.200——300字,急. Mathematica 如何生成这个排列表?如何生成这个排列表?在一个表中,每取连续n个元素,向后移动k个位.例如下式是每取4个元素向后移动1个位.输入:s1={a1,a2,a3,a4,a5,a6,a7,a8};输出:s2={{a1,a2,a3,a4},{a2,a3,a4,a 加工一批零件,甲单独做15天完成,乙单独做20天完成,现在甲乙两人合作,12天完成快 刺绳就是铁丝刺绳吗? 怎么用Mathematica画出一列点 就是画出的点是竖着排列的 最好是Mathematica 5.0实现的怎么用Mathematica画出一列点 就是画出的点是竖着排列的 最好是Mathematica 5.0实现的 A4纸的规格是多大?对折后是多大? 店庆期间,所有的商品一律打6折,这款运动鞋商品打出的广告是 直降200元,但没有直接标出价格,请你来算算原价. 为什么每张纸对折超不过9次? 介绍一种家用电器250字 车带里面的铁丝怎么好弄出来啊较快的办法 剑桥雅思口语精讲好还是雅思口语胜经好 离别母校的作文? 和家人分离的作文摆脱 教育 总朝一个方向走,不改变方向,最后能回到原点的是( ) A.0°经线 B.40°N C.20°W D.160°E 原 写一句有关梅花的诗句.写出两位像梅花一样有气节的中国人 人和动物细胞中dna存在叶绿体吗 一张纸,无论有多大.为什么最多对折三次? 再离别校园之际,想为母校做些什么作文 哪款加湿器比较好?有谁用过么? 某商场把一个双肩背的书包按进价提高50%标价,然后再按8折(标价的80%)出售,这样商场每卖出一个书包就可...某商场把一个双肩背的书包按进价提高50%标价,然后再按8折(标价的80%)出售,这样商场 中,怎样的梅花代表了中国人的气节 加湿器是什么 好用吗 新加坡办第四届“亚洲群英会” 特邀名澳大利亚借调英国电信精英助力国际宽带韩军警独岛防御联合演习 抵御外敌“入韩国前科技官员称福岛土壤污染可通过微克里称美国最大威胁非对手 而是内部机日民主党前干事长年内成立新团体 被疑巴西总统批美国监听默克尔 称美反恐理吉议会否决吉加金矿开采合作备忘录 股马达加斯加大选民众盼稳定 中国应邀派逾2.8万人白宫网站请愿 “杀光中国联合国继续准备销毁叙化武 瑞典提供运默克尔打破沉默亲评美监听事件:朋友间韩军警在韩日争议岛演练登陆 旨在抵御贝卢斯科尼女友否认系同性恋 索赔千万伊核问题引美以分歧 美同意合法保留以俄外交官被指在美国招募间谍 美联邦调沙特表态将与美国保持距离 美官员:这奥巴马敦促国会通过移民改革法 称有利日媒:五艘中国军舰穿过日本冲绳本岛与韩媒称韩高官暗示将引进美国“萨德”反奥斯卡影后赞与查尔斯王子跳舞比“亲热患者主动帮捶背 医生感动落了泪冯树勇:很高兴看到亚奥理事会取消对张楚天都市报讯 图为:昨日,亿成公司已西安姑娘郑赛赛夺冠游客过河了旅行社还在摸石头图文:CBD楚世家示范区盛大开放 打数学老师自创投注法玩“快3”一周中奖华农学生吐槽校园食堂“变相涨价”虚拟绑架 骗子钓出两女孩父母慌忙汇赎奶奶与街坊热聊孙子走丢浑不觉设赌局做笼子强行索取赌债图文:英国名校争抢纺大“全能女神”图文:新华路建设大道新增四路口禁左我省计划招募1250名大学生湖北:司机挂假武警车牌被武警省警备司楚天都市报讯 图为:林青霞小工头为讨工程款 爬上20多米高塔吊武汉要求专车公司清理私家车自来水凌晨灌进屋夫妻俩排渍到天亮2万多货款误汇给同名同姓人图文:一路跑到拉萨的励志狗“三岁”了
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘