怎么⽤stata打开dta⽂件_⽤shell命令打开任意格式的⽂件hello,⼤家好,⼜来到了每周⼀期的知识⼤课堂啦,每期的知识⼤课堂,我们都会分享⼀个实⽤的知识点。本期的知识⼤课堂为⼤家带来的是:shell命令的使⽤⽅法。
在很多情况下,我们需要在应⽤程序中直接打开电脑中的某个⽂件,如excel、word、ppt、图⽚、视频等⽂件。 那么这时候就需要使⽤到shell命令。 但是shell命令中的参数传递也是⾮常有讲究的,对于第⼀次使⽤的⼈来说,很可能会难以理解,并且加上此类知识在⽹上也很难到,所以会导致学习起来⾮常困难。 本节课程,我们就⼀起来学习如何使⽤shell命令打开任意格式的⽂件吧。 shell⽅法 作⽤: 执⾏⼀个可执⾏⽂件,返回⼀个 Variant (Double),如果成功的话,代表这个程序的任务 ID,若不成功,则会返回 0。 语法:
Shell(pathname[,windowstyle])
参数: pathname: 必要参数。 ⽤来指定要执⾏的程序名。 windowstyle: 可选参数。 表⽰程序运⾏时的窗⼝样式。 缺省效果是: 以具有焦点的最⼩化窗⼝来执⾏。 参数windowstyle的取值范围: 0: 窗⼝被隐藏,且焦点会移到隐式窗⼝ 1: 窗⼝具有焦点,且会还原到它原来的⼤⼩和位置。 2: 窗⼝会以⼀个具有焦点的图标来显⽰。 3: 窗⼝是⼀个具有焦点的最⼤化窗⼝。 4: 窗⼝会被还原到最近使⽤的⼤⼩和位置,⽽当前活动的窗⼝仍然保持活动。 6: 窗⼝会以⼀个图标来显⽰。 ⽽当前活动的的窗⼝仍然
保持活动。 说明: shell函数执⾏成功后,会返回⼀个任务ID,⽤来指明正在运⾏的程序。 如果执⾏失败,则会出现错误。 另外,shell命令是采⽤的多进程执⾏⽅法,即使shell命令还未执⾏完成,其下⾯的代码就已经开始执⾏了。 举例:打开任意⼀个⽂件的⽅法。 步骤⼀: 新建⼯程,添加⼀个命令按
钮,添加⼀个CommonDialog控件。 步骤⼆: 添加代码。
Private Sub Command1_Click()
Dim x As Long
CommonDialog1.ShowOpen
x = Shell(" " & CommonDialog1.FileName,1)
If x > 0 Then
MsgBox "执⾏成功,程序ID为:" & x
End If
stata怎么发音End Sub
步骤三: 运⾏代码,测试效果。 可以打开任意⽂件(电脑必须有可执⾏此⽂件的应⽤软件)。 代码重点分析: CommonDialog控件可以调出打开对话框,⽤来选择⽂件,并获取⽂件路径。 该控件需要额外添加,添加⽅法为: 在⼯具箱空⽩处右键弹出快捷菜单,选择部件,弹出部件对话框,在控件页⾯到Microsoft Common Dialog Control 6.0(SP6)。
变量x⽤来接收shell命令的执⾏结果。
<是windows程序管理器,它的作⽤是⾃动调取可以打开该⽂件的默认应⽤程序。需要注意的是,此处需要⽤双引号,并且还需要在后⾯加⼀个空格即:
" "。
CommonDialog1.FileName表⽰⽤户选择的⽂件路径 实际上,是可以直接⽤对应的应⽤程序来替代的,⽐如excle⽂件的可执⾏应⽤程序,其pathname参数可以写"C:\Program Files (x86)\Microsoft Office\Office14\EXCEL.EXE ",当然在不同系统下可能会存在差别。 但是显然这样做,⽆法做到通⽤性。 ⽽采⽤" "作为pathname参数则可以实现对任意格式的⽂件的通⽤性。 好了,⼩伙伴们学会了吗,快去试试吧。 我们下⼀期的知识课堂再见吧。
版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。
发表评论