Vb打开不同的文件名代码怎么写|请问vb打开文件名含有指定字符的文件的代码是什么啊

Vb打开不同的文件名代码怎么写|请问vb打开文件名含有指定字符的文件的代码是什么啊的第1张示图

A. vb打开文件代码怎么写“`在线等

先引用comdlg控件,在窗体中引用控件(名称为commondialog1),使用commondialog1.showopen就可以出现了,该控件具体用法你可以看看msdnforvb6.0,中的"commondialog控件",这里不再重复……

B. vb 读取打开的文件名

如果你的文件名是存在filename这个变量中的话,那么可以写:Me.Caption=filename+"-记事本"或者如果是用通用对话框获取的文件名,那就是Me.Caption=commdlg.filename+"-记事本"当然,如果你用的是VB6,上面的代码没有问题。但如果是VB.net的话,Me.caption要改成me.text才行

C. vb打开另一个程序的代码

1、如果是打开已存在的程序(如 *.exe *.com 等文件),可以使用shell "完整路径\完整文件名"。 例打开计算器: shell "c:\windows\system32\calc.exe",vbNormalFocus 2、打开当前工程的窗口,使用 窗口名.show 方法。 例已有窗口名为frmA : frmA.show

D. vb 打开不确定文件名的txt文档

在这里,“?”和“*”为通配符,只不过,“?”代表任意一个字符,而“*”代表任意多个字符。

在windows系统中,规定通配符是不允许被包含在文件名中的,我们可以尝试直接重命名文件就会发现,就像这样:

Open"C:"&Dir("C:abcdef06*_p.txt")ForInputAs#1'打开文件后的处理过程Close#1

就可以了

但缺点是,若有多个这样的文件,它只能找到其中的任意一个,而不能够列举出全部

E. 请问vb打开文件名含有指定字符的文件的代码是什么啊

d=Dir("d:ab*.txt")Ifd=""ThenMsgBox"文件未找到!"ElseOpen"d:"&dForInputAs#1'…….文件操作过程略…….Close#1EndIf

F. VB 打开文件代码

使用系统API函数ShellExecute实现打开文件。执行后会调用与要打开文件扩展名关联的程序打开这个文件。

"shell32.dll"Alias"ShellExecuteA"(ByValhwndAsLong,ByVallpOperationAsString,ByVallpFileAsString,ByVallpParametersAsString,ByVallpDirectoryAsString,ByValnShowCmdAsLong)AsLongPrivateSubForm_click()ShellExecute(Me.hwnd,"open","z:est.txt","","",1)Endsub

函数参数及意义:ShellExecute(hWnd:HWND;{指定父窗口句柄}Operation:PChar;{指定动作,譬如:open、runas、print、edit、explore、find[2]}FileName:PChar;{指定要打开的文件或程序}Parameters:PChar;{给要打开的程序指定参数;如果打开的是文件这里应该是nil}Directory:PChar;{缺省目录}ShowCmd:Integer{打开选项}):HINST;ShowCmd参数可选值:SW_HIDE=0;{隐藏}SW_SHOWNORMAL=1;{用最近的大小和位置显示,激活}SW_NORMAL=1;{同SW_SHOWNORMAL}SW_SHOWMINIMIZED=2;{最小化,激活}SW_SHOWMAXIMIZED=3;{最大化,激活}SW_MAXIMIZE=3;{同SW_SHOWMAXIMIZED}SW_SHOWNOACTIVATE=4;{用最近的大小和位置显示,不激活}SW_SHOW=5;{同SW_SHOWNORMAL}SW_MINIMIZE=6;{最小化,不激活}SW_SHOWMINNOACTIVE=7;{同SW_MINIMIZE}SW_SHOWNA=8;{同SW_SHOWNOACTIVATE}SW_RESTORE=9;{同SW_SHOWNORMAL}SW_SHOWDEFAULT=10;{同SW_SHOWNORMAL}SW_MAX=10;{同SW_SHOWNORMAL}WIN8系统调用此函数打开文件无效。

G. VB中如何打开自己指定类型的文件

PrivateDeclareFunctionShellExecuteLib"shell32.dll"Alias"ShellExecuteA"(ByValhwndAsLong,ByVallpOperationAsString,ByVallpFileAsString,ByVallpParametersAsString,ByVallpDirectoryAsString,ByValnShowCmdAsLong)AsLongPrivateConstSW_SHOW=5PrivateSubForm_Load()ShellExecuteMe.hWnd,"open","C:\User.doc",vbNullString,vbNullString,SW_SHOWEndSub把上面的"C:\User.doc"改成你要打开的文件,还可以是网址或E-mail。这个是用默认的程序打开已知类型的文件。还能打开网址,E-mail地址。

H. VB如何写打开文件的代码

先引用comdlg控件,在窗体中引用控件(名称为CommonDialog1),使用CommonDialog1.ShowOpen就可以出现了,该控件具体用法你可以看看MSDNforVB6.0,中的"CommonDialog控件",这里不再重复……

I. VB打开文件的代码该怎么写

方法一:用定长的String变量获取文本内容。由于定长String变量支持的下界为65400,所以在打开超过32K字节的文件时超出部分的字节将无法获取:Private Sub Command1_Cliack()Dim sA As String * 65400 '声明定长String变量 Open "F:\d.txt" For Binary As #1 '用二进制打开文件Get #1, , sA '用Get语句从文件中获取字节Text1 = sA '显示打开的文件Close #1 '关闭文件End Sub方法二:先声明一字符串变量,然后用空格填充字符串,使变量大小与文件大小一致,再通过Get语句将文件全部数据存储到变量中,从而达到获取整个文件字节数的目的。此法可以打开大于32K的文件,但应该注意的是,装载文件的容器必须能装载大于32K的文件,下例用RichTextBox控件显示打开的文件:Private Sub Command1_Click() Dim sA As StringOpen "f:\d.txt" For Binary As #1sA = Space(LOF(1)) '用空格填充sA变量Get #1, , sA '用Get语句获取文件全部内容RichTextBox1.Text = sAClose #1End Sub

J. 求VB代码,我在文本框输入文件名(如:1234),要求点击按钮,运行程序打开d:\abc\1234\1234.doc

打开文件包括 文件名和文件路径 这样才能确定一个文件。dir()vb中的函数 应该可以打开文件

未经允许不得转载:山九号 » Vb打开不同的文件名代码怎么写|请问vb打开文件名含有指定字符的文件的代码是什么啊

赞 (0)