Private Sub File1_Click()
MsgBox File1.Path & "\" & File1.FileName
End Sub
MsgBox File1.Path & "\" & File1.FileName
End Sub
解决方案 »
- 紧急求助关于StretchBlt函数的使用!!
- 50分求解sql查询语句,叩谢
- vb编译的程序在xp下出问题,在98下确正确执行,何解?
- 问题没解决,谢谢帮忙!
- 试试看,如何读写带中文的.txt顺序文件,我发现不带中文的行,一带中文就不行
- 我怎样用存放路径的方法来显示数据库中的图片?请高手急救!谢谢!!
- 怎么把变巨变成曹操?
- 一个关于使用paintpicture放大图片的问题
- 如何解决这个数据转换?
- vb可以实现.exe文件的自我复制吗?
- 献给新手朋友:如何让DataReport脱离DataEnvironment并动态指定Datasource的例程.
- 我在工程1中添加了现存的工程2,工程2.form1.show的语句编译通不过! ???
vbNormalFocus, 正常运行,焦点在运行程序上
vbMinimizedFocus 最小化运行,焦点在运行程序上
vbMaximizedFocus 最大化运行,焦点在运行程序上
vbNormalNoFocus 正常运行,没有焦点
vbMinimizedNoFocus 最小化运行,没有焦点.
MsgBox File1.FileName
End Sub
正常是发送数据的
各位高见
shell "c:\windows\command.com /c c:\path1\app1.exe",vbNormalFocusw2k:
shell "c:\winnt\system32\cmd.exe /c c:\path1\app1.exe",vbNormalFocus
而在其它目录下,敲它的全路径运行就不行
如果是这样的话,通过shell调用这个程序就比较困难了.要求该程序和你的程序在同一个目录下才可以。你试试看吧。