vb導出的文件名

Ⅰ VB如何提取路徑中的文件名

樓上幾位夠費勁的，只需要一行代碼：
Text2 = CreateObject("Scripting.FileSystemObject").GetBaseName(Text1)

Ⅱ VB如何獲取文件名

VB6.0可以使用CommonDialog 控制項實現獲取文件路徑並使用Split函數獲取文件全名。

CommonDialog 控制項

CommonDialog 控制項提供一組標準的操作對話框，進行諸如打開和保存文件，設置列印選項，以及選擇顏色和字體等操作。

通過使用 CommonDialog 控制項的 ShowOpen 和 ShowSave
方法可顯示「打開」和「另存為」對話框。

兩個對話框均可用以指定驅動器，目錄，文件擴展名和文件名。除對話的標題不同外，另存為對話外觀上與打開對話相似。

Split函數，

返回一個下標從零開始的一維數組，它包含指定數目的子字元串。

代碼實例：

PrivateSubCommand1_Click()
DimsplitStr
CommonDialog1.CancelError=True'設置「CancelError」為True
OnErrorGoToErrHandler
CommonDialog1.Flags=cdlOFNHideReadOnly'設置標志
'設置過濾器
CommonDialog1.Filter="AllFiles(*.*)|*.*|TextFiles"&"(*.txt)|*.txt|BatchFiles(*.bat)|*.bat"
CommonDialog1.FilterIndex=2'指定預設的過濾器
CommonDialog1.ShowOpen'顯示「打開」對話框
'顯示選定文件的名字
MsgBoxCommonDialog1.FileName
splitStr=Split(CommonDialog1.FileName,"")
MsgBoxsplitStr(UBound(splitStr))
ErrHandler:
'用戶按了「取消」按鈕
ExitSub
EndSub

第一句Msgbox顯示文件路徑。

Ⅲ 怎樣用vb獲取exe自身的文件名

Dim str As String
str = IIf(Len(App.Path) > 3, App.Path & "\" & App.EXEName & ".exe", App.Path & App.EXEName & ".exe") str 就是EXE文件的路徑了。搞這么復雜是因為當EXE文件在根目錄下的時候，app.path 是帶有「\」，不在根目錄下的時候沒有。

Ⅳ vb 獲取目錄所有文件名

1、首先，在電腦上打開VB6.0屬性窗口，新建一個EXE工程窗口。

Ⅳ vb如何從全路徑中獲取文件名

把以下代碼復制到代碼窗口,
要獲取文件名時,
用這樣的語句:
msgbox
GetPathFromFileName("C:\windows\text.txt")
代碼如下:
'****************************************************************************************************
'函數:
GetPathFromFileName
'作用:
從完整路徑獲取
文件名
'輸入:
完整路徑,
目錄分隔符
'返回:
文件名(帶擴展名)
Public
Function
GetPathFromFileName(ByVal
strFullPath
As
String,
Optional
ByVal
strSplitor
As
String
=
"\")
As
String
GetPathFromFileName
=
Left$(strFullPath,
InStrRev(strFullPath,
strSplitor,
,
vbTextCompare))
End
Function