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

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
显示文件属性对话框-VB资料 VB用 API 打开打印对话框 VB用API函数改进ListView控件的显示效果 VB用API函数控制光驱的开关 VB用注册表保存数据(VB函数篇) 有关Tray系统盒的VB API函数 在VB中调用API函数动态改变及恢复屏幕设置 在VB中控制Ctrl+Del+Alt键 在VB中使用API函数 (之二) 在VB中使用API函数 (之三) 在VB中使用API函数 (之四) 在VB中使用API函数 (之五) 在VB中使用API函数 (之一) 在VB中用API实现多媒体 VB怎样用VB在应用程序中调用API VB怎样在DELPHI中使用API函数 指定文件夹-VB资料 VB5中注册控件三法 Bug:维护 Internet Transfer Control 之 Username 及 Pass VB对低层硬件访问控制 HitTest的妙用 -VB资料 ListBox项的控制-VB资料 VB 6.0中类聚集关系的实现 VB6编程中如何获取硬盘分区信息 VB的坐标系统综述 VB调用C程序动态链接库的方法 VB对低层硬件的访问控制 VB软件开发中的错误捕获及处理技术 VB中Combo的一种输入检查制约方法的实现 VB中Winsock控制的UDP协议的使用 VB中的时间处理问题 请问在内部局域网正常的情况下,打印机无法共享(共享以后没有效果)的主要原因是什么?谢谢! ===我对Linux上的Oracle8.1.7.0.1操作的时候只读,为什么啊???==== 请给我一个GetCurrentDirectory使用实例, 问一个深入MFC的简单问题 请问有关delphi项目编译的一个小问题。 各位,那里有VisualAge for Java4.0下在?我从ibm的网站上下载了,但是安装不了,说是语言不对! shcv.dll 编译不过去!!!!! have a test!have a test!have a test!have a test!have a test!have a test!have a test!have a test! mysql 结果中再次查询如何才能实现呢 pc2phone java支持byte[] a = String.getBytes("iso-8859-1");转换吗? c语言中关于对windows命令调用的语法、命令及其格式。 怎么样捕捉数据库连接出错的信息?? 在SQL语句中,如何获得一汉字字段的字节长度,而不是字符长度?如“测试”返回4,不是2 如何建树 winsock.dll提供的都是什么函数?如果它提供的是winsockAPI,那么winsock32。lib提供的又是些什么?它们重复吗? FormatDateTime这个函数的日期间的字符不支持汉字,怎么解决? 关于用JAVA生成GIF的问题?(16M的GIF,256的我已经知道了) 如何在ACCESS李使用SQL? 梦天请进,谢谢! 能不能将对象序列化后存到数据库再取出还原?有没有例子? 分屏的已个视要做成对话框,请指教,顺便告诉我如何给分,只能给这么多 sorry,梦天进来,thanks!! 急!请问怎么在java类里写编译另一个类的语句?? 如何在ACCESS里使用SQL? 谁有BO2K源代码,我愿高分求购.不为别的目的,只为深入学习系统编程 如何实现 调用IE打开一个页面,并且多次调用,只打开一个窗口? 帮我点一下我就给分! 一个简单问题:我在给Access数据表中增加记录,其中一字段是CTime类型,但老是非法操作。调试后错误出现是:return (GetLocalTm(NULL)->tm_year) + 1900 不知如何解决。请各位大师救救我把。 动态的保存datawindow object的问题 怎么给一个(tab control)属性单 的标题栏上给添加一个背景位图呢! 千山一刀之忍者神龟进来拿分!!! 怎样得到年、月、日的值 那里有C++ Primer这本书 十万火急!!!怎么在oracle+developer2k中取得本机ip.——高分奉上!! 如何判断输入的信息是中文? dll调用找不到程序入口?? 怎么用win2000来制作一张可以代光盘启动的启动盘 我怎么用一个ALT 封装一个 ToolBar Control的 ActiveX的控件! 谁有什么好的例子吗! 给个意见,是联通好呢?还是移动好? Paramstr如何正确处理带空格的参数? 我在表中插入记录可流览时却见不到新插入的记录只有关闭程序然后重新运行才能看见新插入的记录. 用awt控件制作的下拉菜单,为什么在IE环境下无法正常显示? 请CommerceServer(商业秘密[::路德一族::])luojx(大鱼儿)koyia(koyia) 三位高手再去谁能单独解决~谁能独享100分!绝不食言(再详细点!)) 怎样让程序只运行一次? 怎样合并两个EXE文件? 把数据库表转换成文本文件,有什么好办法吗/ 怎么才能当鼠标移到表格上,然后表格的颜色改变 请kylincn(随心所欲),lianghu(山人)进来拿分; 另外 斑竹帮我给分http://www.csdn.net/expert/topic/389/389544.shtm 哪儿可以找到一些游戏的算法 谁帮我写一段程序啊!用JS求1-100之间的偶数之和的、、 用C语言编写一程序,统计从键盘输入的任意自然数中偶数的个数并求其和#include "stdio.h"main(){\x05int num,count=0,sum=0;\x05printf("please input one number(>0):\n");\x05scanf("%d",&num);\x05for(;num!=-1;)\x05{\x05\x05if(num% 阴影部分的面积是5平方米求环形的面积是多少 程序填空:求100~200之间的偶数之和(存放在S中)的程序CLEARS=________X=100DO WHILE _________IF ___________________ENDIF X=_________ENDDO明天就考试了! 综合除法和余式定理 1.设多项式f(x)=(x+3)(x-2)+5,若f(x)除以x-k之余数为k^2,则k=?1.设多项式f(x)=(x+3)(x-2)+5,若f(x)除以x-k之余数为k^2,则k=?2.设f(x)=x^3-2x^2-x+2,则多项式g(x)=f(f(x))除以x-1所得之余式为? 看到一个背单词的诀窍,背单词的诀窍:首先Z,Y,X,Q,J,K,U,然后V,W,N,O,L,接着B,D或E,R或F,G或T,I或H,M,最后挑战BOSS:C,P,A,S,不久你会发现,在英语的世界里,单词会主动认识你. 如图,一个梯形的面积是4/3平方米,阴影部分的面积是多少平方米上底5米下底8米的梯形 图中大正方形的面积是40平方米,求阴影部分面积 下图中阴影的面积是5平方分米,求圆环的面积 梯形的面积是25平方米 其他条件如图所示(上底是4米、下底是6米)求阴影部分的面积.一只三角形的底是6米 高未知 三角形的高就是梯形的高 想办法求出梯形的高 若多项式x^3-2x^2+x+3除以x-2的余数为a,求2x-y-4的绝对值 + 根号a-x-y =0的解 空调作用原理 问:只含字母x的五次多项式,最多有()项,最少有()项. 图中大正方形的面积是60平方米,小正方形的面积是多少?希望不要用60除以2,有没有别的方法? 右图中阴影部分的面积是40平方米,求环形的面积 四级要怎么提高这次四级我听力147 阅读160 综合39 写作63 总分409,差一点点!我知道写作很差 那要怎么重点复习翻译和作文呢?作文是不是字迹也很重要?听力也不是很好,请帮我综合分析下我要 5个连续偶数之和是100,这5个偶数分别是多少? 1.5v干电池电压升到4V驱动发光二极管,求详细的原理 关于英语四级,请看一下如何才能在提高听力142 阅读127 综合38 写作98总分405 这是2013年6月份的成绩,下半年的题型还会改,请帮忙参谋参谋,我想下半年就过了.我想了解那部分应该重点加强以及 5个连续的偶数和是100,其中最小的一个和最大的偶数分别是多少? 帮我做一下,阴影部分的面积是20平方厘米,求环形的面积是多少平方米?图片上传不了 0--100之间的偶数之和是多少? 100以后的4个连续奇数和偶数是什么? 下图中阴影部分的面积为5平方厘米 求环形面积·求高手如题 0到100的实数中有哪些是偶数0到100中那些事偶数=】请教 5个连续的偶数和是100, 世界大学排名前一百名?求2010年最新数据!亚洲的占多少?中国的占多少?权威报告 如图,已知阴影部分的面积是73.6平方分米.求梯形的面积.梯形是直角梯形,上底3.2分米,上底右边的边是直角边,边长未知,左边边长未知,下底6.8分米,梯形内花了一条从左上角向右下角直线,先下 五个连续的偶数的和是100,其中最大的一个数是多少? 编写VB程序 输出1至100(包括1和100)内能被7整除的所有整数用 循环语句 编写WHILE 或者 UNTIL 如图,阴影部分的面积是是6平方分米,求梯形的面积. 关于余数定理的问题~多项式余数定理是指一个多项式 f(x) 除以一线性多项式 x - a 的余数是 f(a).例如,(5x3 + 4x2 - 12x + 1) / (x - 3) 的余数是 5(3)3 + 4(3)2 - 12(3) + 1 = 136这里x=3,这样分母不就为0了吗?我 有一个自然数含有10个不同的约数,但质因数只有两种:2和3.这个自然数最大是 梯形的面积是45平方分米,高6分米.求图中阴影部分的面积. 余数定理问题已知f(x)除以x-n/m的余数是k,那么f(x)除以mx-n的余数是?为什么答案依为k,如果可以详细,能不能给我具体深入讲一下,我才学余数定理请说具体点, 91的92次幂 除以100的余数 二项式定理解答 要求详细说明-919 怎么就算出 81的余数 下面程序计算100以内正偶数之和,错在哪里?main(){int sum,i;for(i=100;i>=0;i--);if(i%2==00sum+=i;else sum=0;printf("和为:%d\n",sum);} 什么是中国余数定理? 1.化简(√2+1)^5+(√2-1)^5= 2.利用二项式定理证明命题:15^8-1能被64整除 3.67^200除以9所得的余数是PS:67^200意为:67的200次方 一个关于字母a,b的多项式,每项的次数都是3,这个多项式最多有几项?试写出一个符合要求的多项式. 那个英语四级阅读你是怎么提高的? 余数定理高手进1.已知关于X的整式能被X+3整除;除以X+2,X-3时,余数分别是-4,6,求满足上述条件的次数最低的整式2.已知F(X)=X的三次方+2X的二次方+3X+2除一整系数多项式G(X)所的的商式及余 一个关于字母X,Y,的多项式,每项的次数都是3.这个多项式最多有几项?写一个符合条件的多项式. 关于多项式恒等定理f(x) g(x)究竟表示什么~还有~x前面的系数究竟取什么啊~没有要求随便取得嚒~不好意思我初中的~没学过这个东西~、 阴影部分的面积是25平方米,求圆环的面积 504有多少个约数? 关于多项式定理求[xk+x(k-1)+x(k-2)...+x2+x1]n的展开式其中xk为X的K次幂,依次类推 还有最好能对上面的公式做一下解释 下图中阴影部分的面积是25平方厘米,你能算出环形的面积是多少吗? 已知一个关于字母a,b的多项式,每项次数都是3,这个多项式最多有几项,试写出一个符合要求的多项式,若a,b 因式定理和余数定理是什么请用初中知识解决,详细一点拜托 阴影面积是25平方米求圆环面积 504中有几个约数,其中有多少个是3的倍数急急急快开开开 多项式的恒等定理指的是什么最好有来源 下图中阴影的面积是25平方厘米,请你求出环形面积 求5544有多少个不同的约数?这些约数的和是多少? 多项式恒等定理的推广我所知道的多项式恒等定理只是涉及x的整数次幂的,那么它能不能推广呢,包括x的实数次幂,以及lnx啊之类的~搞不清 阴影部分面积25平方米,求环形面积 三个连续偶数的和在100到200之间,这样的连续偶数有几组 数学填空题:M,N两素因素都是2和3,它们的最大公约数是12,已知M有8个约数,N有9个约数,则M,N的和是什么 请问SAT2数学中高次多项式函数的五个定理详细解释
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn