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

VB判断是否在VB5环境下运行

HTML文档下载 WORD文档下载 PDF文档下载
VB判断是否在VB5环境下运行
声明:
Private Declare Function GetModuleFileName Lib "kernel32" Alias _ "GetModuleFileNameA" (ByVal hModule As Long, ByVal lpFileName As _ String, ByVal nSize As Long) As Long
函数:
' True 表示在 VB5 环境下运行
Function IsRunUnderVB5() As Boolean
Dim S As String, Length
Length = 256
S = String(Length, 0)
Call GetModuleFileName(0, S, Length)
S = Left(S, InStr(S, Chr(0)) - 1)
IsRunUnderVB5 = UCase(Right(S, 7)) = "VB5.EXE"
End Function

深度分析:腾讯3.3亿美元收购Epic股份值吗? 传下一代iOS或将推行扁平化设计 iOS开发者注意:苹果将拒绝访问UDID的应用上架 领先Google、Amazon、Dropbox,Apple云存储用户最多 传IBM重新设计晶体管 预计五至七年内成熟 快讯:云计算大会6月召开 云计算概念企业股票飙升 集成开发环境:Qt Creator 2.7.0发布 移动周报:“今日头条”CEO,爱冒险的技术宅 从China Daily的iPad版,看中国纸媒如何摆脱“旧情结” 天睿推出大数据探索平台:“开箱即用”的数据分析 Basho开源Riak CS,与AWS S3兼容的云存储架构 MongoDB Days北京杂记 VMware携手亿阳信通 铺垫混合服务 行业应用,移动优先:移动难七大痛点剖析 HTML5开发必备:游戏开发资源合集 老而弥坚:65岁传奇Android工程师谈开发 2013中国云计算有奖大调查,每周大奖等你拿! Google Reader之死另一个不为人知的原因 小团队谈推广:豆果、金山、微博易、面包旅行 敏捷实战:如何让团队迭代交付周期缩短一半 移动设备管理初创公司AirWatch:首轮融资2亿美元 New Relic:不等应用崩溃,实时监控你的App! Zynga力挽狂澜三步棋:移动+授权+自有网络 巧用MapReduce+HDFS,海量数据去重的五大策略 革自己的命?为带来一致体验 IE11伪装FireFox 最古老的Linux发行版Slackware以及Arch Linux齐弃MySQL JEECG v2.3 发布,基于代码生成器的智能开发框架 Mozilla将设应用工场 Firefox OS瞄准欧洲南美 Summly创始人:12岁开始编程 17岁公司卖了3000万美元 因SaaS与NoSQL,Oracle雄风不在? 那些年云计算领域的大牛们 最初linux使用什么编译开发的? 离开 论坛 散分【八】 关于字符串截取问题 谁有FASTREPORT的注册版本 我急用!在线等待!谢谢! 离开 论坛 散分【九】 Application.messagebox和messagebox有什么区别呢? 水晶报表的两个小问题? 怎样向Foxpro表中添加float型数据? 离开 论坛 散分【十】 问一个和Session有关的问题,达人请进 在宏里把ie关闭。非常感谢 如何让window.showModalDialog的page提交数据到原来的父页面? 合租住房!! 有没有一个命令直接解开iso文件或提取里面的一个文件或文件夹 请给看看程序:AVI视频的读取和重建 如何显示出电脑内已经注册的dll文件列表? 中程浮点数问题! solaris下CC编译器的问题? UML的书籍和软件? 那里有vs.net2003的vss6.0d版本? 有时候exe文件不能运行? 自己准备写一个工资发放和发布的程序,欢迎探讨. 襄儿妹妹还在吗?幸好偶这个马甲还有点分,全给你吧,这个ID密码她不知道呵呵~~~ 关于linux WEB服务器名的问题? 请教ATL中CBindStatusCallback的问题 我的IE不能打开新窗口?用鼠标左键点击超链接没有反应? 我的项目改变目录后打不开,怎么办? 多CPU机器,同时可有几个线程处于运行状态? 高分求高效高斯模糊算法。。 如何判断软件是否过期 是不是运行ASP.Net应用的服务器必须安装.Net FrameWork呢?还是只要有Win2000 Server和IIS就行。 谈情说爱 清除内存中用call调用的脚本文件? 一个很老的问题,如何避免CListCtrl闪烁。 请大家给看看程序:avi视频读取和重建 研究数字图像处理应该那些知识? 图片上传并显示实例(VB+SqlServer2000) SQL语言中 怎样将CHAR型转换成INT型? 級連更新... 怎么实现回车自动跳到下一个位置 如何在光标处插入字符? CSSCLASS高手关注,我想把ListBox、DropDownList样式改为平面,而且颜色边框为1颜色不为灰色,用CssClass具体怎么写呢?越详细越好?多谢 求一招:::怎么对付那些那了代码就不给钱的家伙???? =========发誓:远离csdn!================ phpmyadmin为何安装不成功? 谁有crystal reports的电子书。 这个radio的返回值是什么? 离开csdn,公布密码!!!!!!!!! 新手!求界面问题的答案! javascript面相对象的编程 IMail邮件系统的问题 在三角形abc中,ab=5,ac=4,中线ad=2,则bc等于多少如题 什么叫做“大国沙文主义”啊?中国有大国沙文主义吗? 大国沙文主义、民族沙文主义、沙文主义都是什么意思?请介绍一下"沙文"这个名称的来源 英语翻译1.Sunshine is always after stormy rain 2.Sunshine always appears after the storm 3.Sunshine always comes after a rainy and windy day.after 后面用 the rain /rains 4.Sunshine after the rain.(阳光总在风雨后) 第四句完全错 大国沙文主义是什么? 汉武帝为什么能打败匈奴 什么是大国沙文主义 Do you wish to cotinue是什么意思 三国演义读后感600字以内.急用,最好是自己写的 distributor用法:“XX是XX公司的XX产品经销商”,这句话该怎么翻译? 分销商 翻译成distributor可以麽? 安徽宁国民政局长否认叫停网友募捐 自日媒:解密文件显示日本曾试图阻止中美杭州一对匝道一段快速路两条断头路年底法国总统会见中国外长王毅 谴责北京暴东莞某校2个月开除21学生 乱扔垃圾四川宜宾一火葬场休息区变茶馆 想要坐17岁少年贩毒只为给爷爷办寿宴 从小杭州孩儿巷取消52个泊位后道路通行明收费站立闯关扎胎警告牌 回应称出于安杭州:拒绝工资集体协商 最高罚款3万杭州凤起东路将继续往东延伸 唐家村桥安理会延长联索援助团和联几建和办任期安理会延长联索援助团和联几建和办任期史蒂芬森吹气防守詹皇神图 被球迷恶搞美国4月份旧房销售签约指数继续回升乌国民近卫军称东部特别行动实施至今共贵州一水泥厂发生事故3人死亡路忧族师生情深北京中广传播带您拨开迷雾,看真正的“御史台内有“探头”名博堂
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘