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

VB获取程序工作路径的方法

HTML文档下载 WORD文档下载 PDF文档下载
VB获取程序工作路径的方法
(作者:段炼)

Visual Basic(VB)
  VB中通过App关键字来实现的对程序全局对象的访问,App对象的Path属性直接指出了应用程序的工作路径。

  例如,下面的代码实现在程序运行中PictureBox控件动态加载位于工作目录的image子目录下的图像文件picture1.gif :

FilePosition = App.Path & "\image\picture1.gif"

Picture1.Picture = LoadPicture(FilePosition)



Visual C++ (VC)
  MFC似乎并没有直接提供取得应用程序工作路径的方法,但在VC中可以简单使用C语言中的getcwd函数(在中说明)来取工作路径。

  例如:

char buffer[_MAX_PATH];

if(_getcwd(buffer,_MAX_PATH)==NULL)

cout<< "_getcwd error"<<"\n";

else

cout<
  输出为工作路径:

     E:\PathInfo\Debug



Delphi
  在Delphi中,调用函数ParamStr(0)可以取得可执行文件的完整路径信息(工作路径加可执行文件名),再调用ExtractFileDir或ExtractFilePath函数即可提取出应用程序工作目录或路径。例如:

   label1.caption:=ExtractFileDir(ParamStr(0));

   label2.caption:=ExtractFilePath(ParamStr(0));

  其显示结果分别为:

   E:\PathInfo

   E:\PathInfo\



C++Builder(BCB)
  C++Builder完全兼容ANSI C、C++,因而同VC一样,我们也可以调用C语言中的getcwd函数来取工作路径。此外,BCB语言还提供了如ParamStr()、ExtractFilePath等与Delphi一致的函数,我们只需将Delphi中的"."改为BCB中的"->"即可同样使用。例如,在Label1中显示工作路径:

  Label1->Caption=ExtractFilePath(ParamStr(0));

  需注意的只是BCB区别大小写而Delphi不区别大小写。



Java (JDK、VJ++、JBuilder等)
  在跨平台语言Java中,有关Application的全局信息放置在一个Properties(Hashtable类的一个子类)对象中,键"user.dir"所对应的值即工作路径。通过System.getProperty("user.dir")即可取得Application工作路径字符串。

  例如:

  public class Class1

  {

  public static void main (String[] args)

  {

  System.out.println(System.getProperty("user.dir") );

  }

  }

  控制台输出:

   E:\PathInfo
Linux将会统治桌面端的7个原因 Intel首席科学家Randolph Wang:详解Edison AMD Mantle再添新作,引发下代GPU架构猜想 谈DAM决策,自建还是SaaS 证据显示:Linux战争已经转移到OpenStack RestKit:iOS开发必备,告别众多无聊代码 技术新突破:手机和平板可远程控制PC,Chrome Remote Desktop亮相 物联网高速公路上,快数据如何驱动分析 苹果或将使用雅虎的搜索引擎,抛弃谷歌 百万用户规模的系统如何扩展 大数据需要软件定义存储 倒计36小时!2014中国Spark技术峰会即将召开! 设计师专宠,Startup强大的UI设计框架 走进金山云:从技术走向服务 Qt Creator 3.1.0发布,全面支持iOS、Android、WP Google大中华区总裁石博盟与中国大学生畅谈科技与创新 阿里云:从防到攻,深入浅出DDoS 大数据处理分析的六大最好工具 微软:Windows Phone开发者可回复用户评价 不断缩水后的微博上市首日大涨19% 曾一度涨超40% Snapdragon LLVM编译器全新升级 支持骁龙64位处理器 EDP:基于Node.JS与NPM的企业级开发平台 想改变世界,先改变自己——知名Hacker、发明家Mitch Altman专访 《近匠》iHealth,健康大数据助力硬件“破壳” 一周消息树:如何做到每天写代码? 一周热点:微软SQL Server 2014三大新特性 《Make》创始人Dale Dougherty:全民创客 DevOps正在扼杀程序员? OpenStack新版本:新增近350个功能,修复Bug超2900个 【走近讲师】易欢欢:数据对接和后台是互联网金融的技术最难点 最火HTML5 JavaScript游戏引擎:国外篇(二) 这个关于树的问题我越想越想不通,请手指点指点:) 用winsock控件设置client/server程序时,server端应怎样设置,请各位大虾帮帮小弟!!谢了! 从MIDI文件转换成简谱的问题? 请问谁有高招??????? SOS ,谁能帮帮我? 如何在一个程序中得知另一个指定的程序是否运行? 很急!!请教高手,这样的思路是否正确?(数据库方面)内有非常详细的说明,谢谢!! 我是处学者 这个关于树的问题我越想越想不通,请手指点指点:) 50小分征集C++的类和VBS的类的区别? hg0001(CoolFish) ,分已给!请发给我! 电脑上的时钟在关机之后就停止走动,下次开机时仍是上次的时间,是怎么回事?请教大家! 如何使用 WRITEFILE 函数将二进制数据写入文件? 我装的是XP,JDK1.3,无法编译程序 电脑上的时钟在关机之后就停止走动,下次开机时仍是上次的时间,是怎么回事?请教大家! 如下的演示光盘要实现的功能用什么软件开发比较好一个新手完成要多长时间? windows如何实现禁用状态文字? 输入不回显 你没有权限删除贴子!!!奇怪 Tc 那为用的是win XP,请进! 我输入的PYTHON怎么编译不出来? 问一个很弱的问题 为什么我的工具栏成了这个样子 哪里有讲MFC的书,Linux下GCC的书? 到底是什么问题啊?昏~~~(一定给分) 若干问题,请解惑。。。。。。 我这里的局域网是用win2000+sygate共享上网的,如何设置才能禁止局域网中其他计算机上OICQ或聊天室之类的网站? 如何遍历select下拉菜单中的内容,并显示在另一个select菜单中? 如何编写文档? 同样的程序连接SQLServer为什么比Access慢了几十倍 sybase12.5 odbc 中文问题 谢谢吃素的狼,但好象没用(FOXBASE问题) 同样的程序连接SQLServer为什么比Access慢了几十倍 htm和html 有什么不同,哪一个好一些,cfm是什么类型的文件? 请问怎么写mciSendString的play,close,open等的参数?如果是想打开wav文件的话。。。 回复数老是不对 谁能给我发一个类似windows资源管理器的例子!及拥有treeview和listview的sdi! delphi的query为什么不能查询nvarchar和ntext的sqlserver数据 win98开始菜单中的“运行”不见了,怎么找回来? 怎样使下载的文件支持中文名?为什么我的下载文件用中文就出错? 谁知道jbuilder5的jDataStore注册码? 很奇怪的问题 asp.net中是否还有RegExp类?? 有什么工具可以把.rm文件合并? 一段关于winsock控件的代码,请各位大虾帮忙找一下错误!! 请问:关于临时文件? 我现在有一个应用要用到很多树形视图,但我从前没有用过,大家能不能给讲解一下,谢谢了。 关于在win2000下实现透明窗口 某男征婚(非完全搞笑) vmware 中redhat7.2上网问题 染色都用那些化学材料?皮毛的加工 染色? 设1,2,3三台车床加工同一种零件,加工出来的零件混放在一起.已知三台车床加工的零件分别占全部的35%,40%和25%,三台车床的次品率依次为4%,3%和2%.现在从全部零件中任取一件,(1)求它是次品的 下面竖式中字母a,b,c,d各代表什么数字 过了几天,竟然冒出一截小瓜苗.冒可以换成什么字? 两台车床加工同样的零件,第一台·、第二台出现废品的概率依次为0.03,0.02.它们加工出的零件放在一起,又一台加工的零件数是第二台加工的零件数的两倍.现任取一个零件,发现它是废品,求它 若关于x的不等式组{2x-1>3(x-2),x-a 铜化学热着色技术就是在铜雕塑表面可以着各种颜色.并且颜色自然,和铜融为一体,颜色好像从铜内部透出来的效果. 我想问一下(右)乳腺浸润性导管癌(II-III) 免疫组化:ER(+++)PR(+++)C-erbB-2(2+)ki67(+)>40% p53(+++) 这是什么植物啊?结的小瓜像西瓜似的,绿色的. 墙角的砖缝中掉进一粒香瓜子过了几天竟然冒出一截小瓜苗为什么用冒字 什么样的西瓜才是算是好瓜? 谁知道这是什么瓜!西瓜是错的! 铜化学着色,绿色,兰色,红色,黑色技术 已知二次函数的图像与x轴交于A(-2,0)和B(3,0)2点,且函数有最大值2(1) 求二次函数的函数关系式(2) 设此二次函数图像的顶点为P,求三角形ABP的面积 这是什么瓜,有一点像西瓜 生命,生命 中的“竟然冒出一截小瓜苗”里的“竟然”起什么总用 已知二次函数的图像与x轴交于A(-2,0),B(3,0)两点,且函数有最大值是2求(1)解析式(2)设二次函数的顶点为P,求△ABP的面积 下面竖式中的字母各代表什么数字 A.B.C.D.E.F ×下面竖式中的字母各代表什么数字 A.B.C.D.E.F × 3 --------------------------------------------------- B.C.D.E.F.A 墙角的砖缝中掉进一粒香瓜子,过了几天,竟然冒出一截小瓜苗.伸、钻、探……为什么没“冒”这个字,用得好?= =别说它长得快、、 已知二次函数的图像与x轴交于A(-2,0)B(3,0)两点,且函数有最大值为2,求二次函数的解析式.一定要给过程 v在汉语拼音字母表中读什么音?如题. 不等式|x-2| 已知二次函数的图像与x轴交于A(-2,0),B(3,0)两点,且函数有最大值2(1)求二次函数的解析式 (2)设此二次函数图像顶点为P,求△ABP的面积 拼音字母V怎么读? 做了特殊染色及酶组织化学染色检查,医生说结果不太好,又做血细胞簇分化抗原的17个项目,可能是什么病结果还没出来 急 西瓜的瓜蒂是屁股还是头带把儿那边是屁股还是头 在EXCEL2003中,怎么用公式找出三个数中从大到小位于中间数的?最大数?最小数? 不等式3分之1(x-m)>2-m的解集为x>2,则m的值为? H.264 CIF、H.263 CIF 在Excel2003中怎样用公式把A列大于0的数字显示在B列,在Excel2003中怎样用公式把A列大于0的数字显示在B列(公式越简单越好),如下所示: 图中每个字母代表一个数,任何三个相连格中的3个数之和是19,那么A+B+C+D等于几?图 A 9 B C D E 7 长的和西瓜一样的是什么瓜生长方式和西瓜也是一样的,放西瓜地里你认不出来.我家乡有这种瓜.做菜非常好吃.我老家叫他南瓜,也叫洋冬瓜.求解学名叫什么 请问:在EXCEL2003中,怎么用公式来计算出最多的数,第二多的数,第三多的数.3.在EXCEL2003中,怎么用公式来计算出最多的数,第二多的数,第三多的数,第四多的数,第五多的数……? 拼音aoeiuü里面的ü见到jqx会变成u,那为什么ü和y在一起的时候也去了两点变成了yu H.264/H.263/MEPG-4什么意思 在Excel2003中怎样用公式把A列最下面的大于1的数字的下面连续出现(0除外)的1的个数,显示在B1,在Excel2003中怎样用公式把A列最下面的大于1的数字的下面连续出现(0除外)的1的个数,显示在B1, 汉语拼音有句顺口溜:小ü小ü有礼貌,见到jqx就脱帽.可是比如:音乐(yuè)、鱼(yú) 为什么ü也脱帽了希望得到阁下确定的答案.难道说这两个例子里用的都是u(屋)而不是ü吗?正确的解释是什么? 请教各位高手:西瓜裂瓜是缺什么元素!? 燕麦 拼音 中 燕是读作yàn还是yān 用不等式表示x除以2的商加上2至多为5 excel2003中一列数字挨个递增1怎么操作 汉语拼音中,“不”和“一”有变音规律.请问:“不一般”是读作“bú yì bān”还是“ bù yí bān”? 解不等式组 x-2.≥1 2(x-1) excel2003编辑完第一行公式后,下拉时底下每一行的公式也对,但是数据却跟第一行相同,比如E5=A5+B5+C5,如果下拉E6然后应该E6的数值结果会变,但公式为E6=A6+B6+C6,数值结果却同E5一样 瓜肉是黄色的西瓜叫什么名 大瓜苗怎样就可以结很多很多的瓜那 麗拼音怎么读?求大神帮助 瓜肉是黄色的,是什么瓜?外表和西瓜差不多的. 已知二次函数F(x),当x=1/2时,有最大值25.当 F(X)=0时,两实数根的立方和为19,求F(X) 英语翻译mmwxn yjqlshzjgzjfn了.byqfn nbndxsdd nyjjdjq.nbkjsbgbzjd.决定要jcxq.zdm gqyjgq ydwlcmxw.xxzjydhcg jybs kxd kld h下去 西瓜切开后瓜肉是红的皮和瓜肉中间是黄色的可以吃吗? Excel2003问题,根据数字个数改变数字的颜色,如下所示: 钼靶 俩字怎么读?求拼音钼靶怎么读,是啥意思 已知某二次函数,当x=1时有最大值-6,且其图象经过点(2,-8),求此二次函数的解析式 拼音 ǖ 在jqx 后为什么要去掉“两点”?我不要什么儿歌和硬性要求的解释 我要这样做的道理 我记得在大学语言老师讲过,可惜我忘记了,所以现在跪求一种详细的解释说明道理.我隐约记得关 下面竖式中,不同的字母代表不同数字,各个字母代表什么数字?A B C× D ________2367ABCD分别代表什么数字?怎么算出来的?或者什么规律? Excel2003里的公式怎么用?我想用Excel2003做个表格,我想计算下最后的数值要怎么用.比如我现在要算(50+2)×1.1×1.2÷12= 这个要怎么调?我的意思是(50+2)×1.1×1.2÷12= 我要做一些产品的现金报价,5 Excel2003如何识别数据后转回数据分组后的列标?如A列是1至50的随机数,现把50个数分成2组.把2组数分别填入C列和D列,也就是C2至C26和D2至D26.C1是C列的列标为:1,D1是D列的列标为:2.现在要在B列中识 下面竖式的字母a.b.c.d.e.各表示什么数 怎么防止西瓜空心和裂瓜
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘