如何使用vb打开excel(vb如何打开文件)

1. vb如何打开文件

直接采用shell语句就可以了，采用相对路径方法，如下Shell App.Path & "\2.exe"

2. VB如何打开

用命令shellshell"你所打开的目录"如果要打开C:\1.exe就是shell"C:\1.exe"app.path&相当于取运行目录shellapp.path&　"\1.exe"这个就是打开取运行目录下的程序，比如说你编译的程序运行在C盘，那么shellapp.path&　"\1.exe"就相当于shell"C:\1.exe"千万不要忘记“\”符号

3. vbs文件如何打开

有一点我不清楚的是，你指的把dng文件拖到exe上，是先打开exe然后把文件拖到它的界面中；还是直接在Explorer资源管理器中把文件放在exe上？

如果是前者，这个就需要参考dng工具有没有提供命令行版本了。一般在这个工具的开发页面或下载页面会附带一个使用帮助，一般里面会提示有如何使用命令行调用它。

如果没有提供这个帮助页面，那么可能它不支持命令行，你就只能使用按键精灵之类的来做。

如果是后者，那么会方便很多，一般就是写个VBS里调用WScript.Shell就可以实现一样的操作，后面再写段循环，扫描这个文件夹内所有的dng类型文件，分别用shell调用一次该exe并将dng文件路径作为参数传递进去就行。

4. vb文件打开方式

CommonDialog 控件（“打开”、“另存为”对话框）

通过使用 CommonDialog 控件的 ShowOpen 和 ShowSave 方法可显示“打开”和“另存为”对话框。

两个对话框均可用以指定驱动器，目录，文件扩展名和文件名。除对话的标题不同外，另存为对话外观上与打开对话相似。

在运行时，当用户选择一个文件“关闭”对话框时，FileName 属性既为选定的文件名。

可以设置 Filter 属性，这样对话就只显示某种文件类型，如文本文件。Flags 属性可用来改变对话的元素，当诸如覆盖文件之类的动作发生时，还可用来提示用户。

CommonDialog 控件（“打开”、“另存为”对话框）示例

下例显示“打开”对话框然后在信息框中显示所选的文件名：

Private Sub Command1_Click() ' 设置“CancelError”为 True CommonDialog1.CancelError = True On Error GoTo ErrHandler ' 设置标志 CommonDialog1.Flags = cdlOFNHideReadOnly ' 设置过滤器 CommonDialog1.Filter = "All Files (*.*)|*.*|Text Files" & _ "(*.txt)|*.txt|Batch Files (*.bat)|*.bat" ' 指定缺省的过滤器 CommonDialog1.FilterIndex = 2 ' 显示“打开”对话框 CommonDialog1.ShowOpen ' 显示选定文件的名字 MsgBox CommonDialog1.FileName Exit Sub ErrHandler: ' 用户按了“取消”按钮 Exit SubEnd Sub

5. vb打开帮助文件

你是指利用Excel内置的VBA进行编程还是指用VB编的程序来处理Excel文档或控制Excel？如果是前者，那么你按Alt+F11打开VB界面输入代码即可开始编程。后者则可以把Excel文档或Excel应用程序作为对象进行相应操作。至于具体如何做，那就不是这里一两句话能说清的，甚至一两本书的容量也不一定说得完。

你可以自己查看Excel和VB的相关帮助文档或者到微软的MSDN网站寻求帮助。

6. vb如何打开文件路径

首先将文件显示做了区分：文件夹名称显示folderlist()，文件名称显示filelist():

Private Function folderlist(pathname As String, treeflag As Integer) 'treeflag:0列表 1树形 2树形展开

'文件夹数和名称

Dim sf As String

sf = Dir(pathname, vbDirectory) '获取第一个目录名

foldernum = 0

Do While sf <> ""

' 跳过当前的目录及上层目录

If sf <> "." And sf <> ".." Then

If (GetAttr(pathname + sf) And vbDirectory) = vbDirectory Then

If treeflag = 0 Then

Text2 = Text2 & sf & vbCrLf ' 如果它是一个目录，将其名称添加到列表

ElseIf treeflag = 1 Then

Text2 = Text2 & Treestr & sf & vbCrLf

ElseIf treeflag = 2 Then '树形展开的时候，需要了解子目录，所以还需进行递归调用

Text2 = Text2 & Treestr & sf & vbCrLf

folderlist pathname + sf, treeflag

filelist pathname + sf, treeflag

End If

foldernum = foldernum + 1 '统计文件夹数目

End If

End If

sf = Dir() ' 查找下一个目录

Loop

If treeflag = 0 Then

If foldernum <> 0 Then

Text2 = Text2 & vbCrLf & "======共有" & foldernum & "个文件夹======" & vbCrLf & vbCrLf

Else

Text2 = Text2 & "======无子目录======" & vbCrLf & vbCrLf

End If

ElseIf foldernum <> 0 Then

Text2 = Text2 & Nullstr & vbCrLf & Nullstr & vbCrLf

End If

End Function

Private Function filelist(pathname As String, treeflag As Integer) '0列表 1树形 2树形展开

'文件数和名称

Dim a As String

a = Dir(pathname & "/*.*")

filenum = 0

Do While a <> ""

If treeflag = 0 Then

Text2 = Text2 & a & vbCrLf

Else

Text2 = Text2 & Treestr & a & vbCrLf

End If

filenum = filenum + 1 '统计文件数目

a = Dir

Loop

If treeflag = 0 Then

If filenum <> 0 Then

Text2 = Text2 & "======共有" & filenum & "个文件======"

Else

Text2 = Text2 & "======无文件信息======"

End If

End If

End Function

7. vb文件用什么软件打开

　zip格式怎么打开是很多朋友关注的话题，其实zip格式的文件是一种经过压缩的文件，通过压缩之后，文件的体积会变小，从而更有利于在网络上传播。经过压缩的文件，如果想要再次使用，就必须通过解压缩后才能使用。常见的解压缩软件有WinRAR。

zip格式怎么打开?利用WinRAR软件打开Zip格式文件的方法如下：

　　1、上网搜索并下载WinRAR解压缩软件。

2、WinRAR解压缩软件的安装过程：下载完成后，双击文件WRAR进行安装操作，在弹出的第一个安装窗口中选择文件安装的路径。

　　3、接下来直接点击下一步，出现关联文件类型窗口，点击窗口界面上的“全部选择”以关联所有文件类型，点击“完成”按钮开始安装。

　　4、WinRAR软件安装完成后，双击需要打开的Zip格式的文件，则会打开一个窗口，首先选择要查看的文件或文件夹，然后点击位于窗口上方工具栏上的“解压缩”按钮，在弹出的“解压路径和选择”对话框中选择将要解压输出的目录，设置完成后点击“确定”即可实现当前Zip格式文件的解压缩操作。

5、最后转到输出文件的位置，就可以查看压缩文件里的具体内容了。

　　以上就是有关zip格式怎么打开的简单介绍，希望对大家有所帮助。

8. vb如何打开文件夹

把下面的代码放在模块里，改下文件夹名称，另外要把工作簿与文件夹放在同一目录里，然后运行

Sub 提取文件名作目录()

Dim myPath As String

Dim n As Integer

Dim myFile As String

‘把工作簿与文件夹放在同一目录里

myPath = ThisWorkbook.Path & “\” & “文件夹名称”

n = 1

myFile = Dir(myPath & "\*.*")

Do While myFile <> ""

Cells(n, 1) = myFile

myFile = Dir '找寻下一个文件

n = n + 1

Loop

End Sub

9. vb打开文本文件

'函数：一次性读文件至变量，非常快

functiongetfile(filenameasstring)asstring

dimiasinteger,sasstring,bb()asbyte

ifdir(filename)=""thenexitfunction

i=freefile

redimbb(filelen(filename)-1)

openfilenameforbinaryas#i

get#i,,bb

close#i

s=strconv(bb,vbunicode)

getfile=s

endfunction

'调用举例：

dimsasstring

s=getfile("c:\1.txt")

10. vb中怎样打开指定文件

rivate Sub Command1_Click()Dim YDMYDM = WebBrowser1.Document.body.createtextrange().htmltextOpen "D:\WEB.html" For Output As #1Print #1, YDMClose #1End Sub=================工程里引用：Microsoft HTML object Library工程里部件：Microsoft Internet controlsMicrosoft rich textbox controls 6.0 (SP6)在窗体中放置一个WEBbrowser控件，放置一个richtextbox控件代码：Private Sub Form_Load()WebBrowser1.Navigate "http://www.sohu.com"End SubPrivate Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)Text1.Text = WebBrowser1.Document.documentElement.outerHTMLEnd Sub如需修改网页内容，增加以下代码：Private Sub Command1_Click()Dim wdoc As HTMLDocumentSet wdoc = WebBrowser1.Documentwdoc.body.innerHTML = "dfkdjfkdfjdkfjdkfjdk

" ‘网页内容'WebBrowser1.Document.body.innerHTML = "dfkdjfkdfjdkfjdkfjdk

" 与上句二选一End Sub

11. vb怎么打开文件

1首先打开VB6——点击新建——选择标准EXE——点击打开。如果没有新建对话框，那么点击文件——新建工程——选择标准EXE后点击确定。

2第二步，先在左侧工具箱把commondialog 部件拖放到窗体那里，然后再点击一下命令控件并在窗体那里画一个方框，命令控件按钮就画出来——右击命令按钮，选择属性窗口——在属性窗口那里把Caption属性改为：打开。（如果工具箱那里没有commondialog 部件，右击任一控件——选择部件——然后找到common dialog control选项，勾选后点击确定就会出现了）

3第三步，添加代码。右击命令按钮——选择查看代码——然后在弹出的代码编辑界面输入如下图的代码

4第四步，检测语句。点击调试——然后选择逐语句或逐过程，就会自动检测是否有问题。如果没问题就可以点击运行——启动——然后就会弹出打开文件窗口。

5第五步，保存工程并生成工程。点击文件——选择保存工程，然后选择保存路径并命名后点击保存。同样点击文件——选择生成工程，然后选择路径——点击确定就生成工程了。

6最后，也可以工具箱那里选择 DIRLISTBOX控件，然后双击该控件并输入如下图的代码