VB中的Dir1.Path & File1.FileName是什麽意思呀?
发布网友
发布时间：2024-08-16 17:59
我来回答
共2个回答
热心网友
时间：2024-08-22 03:11
Dir1.Path & File1.FileName的意思：
从名字上猜测，当前窗体里有两个控件：
1、文件夹控件（DirListBox）Dir1
2、文件列表控件（FileListBox） File1
path是文件夹被一级一级打开到最后的路径，
filename是文件列表里被选中的文件名称（这个列表就是关联的文件夹的文件列表）
所以，Dir1.Path & File1.FileName就是选中的文件的“完全标识”，包括这个文件的路径和文件名。
但是，运行时，会出错，应该在两者之间增加一个斜杠：
Dir1.Path & "\" & File1.FileName
热心网友
时间：2024-08-22 03:10
dir1.path:读取目录控件中的目录
file1.filename:读取文件控件中所选取的文件名
VB中的Dir1.Path & File1.FileName是什麽意思呀?
filename是文件列表里被选中的文件名称（这个列表就是关联的文件夹的文件列表）所以，Dir1.Path & File1.FileName就是选中的文件的“完全标识”，包括这个文件的路径和文件名。但是，运行时，会出错，应该在两者之间增加一个斜杠：Dir1.Path & "\" & File1.FileName ...
VB问题,Dir1.Path= Drive1.Drive File1.Pah=Dir1.Path Debug.Print...
File1.Path = Dir1.Path 是把File1的文件列表设为Dir1中选定的文件夹里面的文件 以上两句结合就可以使这三个控件实现联动 Debug.Print Fn是把Fn的内容输出到立即窗口
vb获取指定文件夹内的文件的文件名
VB可以使用FileListBox 控件来获取指定文件夹内的所有文件名。FileListBox 控件，在运行时，在 Path 属性指定的目录中，FileListBox 控件将文件定位并列举出来。该控件用来显示所选择文件类型的文件列表。例如，可以在应用程序中创建对话框，通过它选择一个文件或者一组文件。以下是组合使用DriveListBox 、...
VB中如何判断当前路径啊(万分火急)
不太明白你的意思。下面代码能够使dir1与file1的路径保持一致，不会存在2个路径的问题。另外，判断用户有没有选择文件用file1.listindex即可（0 没选择，非0 已选择。）Private Sub Dir1_Change()File1.Path = Dir1.Path End Sub Private Sub Drive1_Change()Dir1.Path = Drive1.Drive End Su...
用vb编一个加密解密的程序
newfile = Dir1.Path & "\X-" & File1.FileName Open oldFile For Binary As #1 Len = 1 Open newfile For Binary As #2 Do Get #1, , theByte theByte = 7 Xor theByte Put #2, , theByte Loop Until EOF(1)Close #1 Close #2 MsgBox "加密或解密后的文件存放在“" & new...
自己做了一个VB图片浏览器,求和高手帮我加插上一张\下一张的代码! 急...
File1.FileName)resize_pic End Sub 改成如下=== Private Sub File1_Click()Image1.Picture = LoadPicture(Dir1.Path & "\" & File1.List(File1.ListIndex))resize_pic End Sub 上下翻的话，只要加减File1.ListIndex，然后调用File1_Click就可以了 ...
关于VB制作文件列表框
File1.Path = Dir1.Path 然后，可设置 Pattern 属性来显示这些文件的子集─ 例如，设置为 *.frm 后将只显示这种扩展名的文件。Pattern 属性也接受由分号分隔的列表。例如，下列代码行将显示所有扩展名为 .frm 和 .bas 的文件：File1.Pattern = "*.frm; *.bas" 以下代码是实现上述要求的实例代码...
VB中如何插入音乐
dir1.path = drive1.drive end sub private sub file1_click()windowsmediaplayer1.url = file1.path & "\"& file1.filename end sub url是文件的路径，你也可以抛弃那三个控件，直接指定一个文件 至于视频嘛，也一样，可以放一个command1 caption属性设为"视频"private sub command1_click()...
如何用VB获得某一目录下的所有文件和文件夹名称
File1.Path = Dir1.Path Label1.Caption = Dir1.Path End Sub Private Sub Drive1_Change()On Error GoTo err1 Dir1.Path = Drive1.Drive Exit Sub err1:MsgBox Err.Description, vbInformation + vbOKOnly, "提示"End Sub Private Sub Command1_Click()Dim i As Integer, j As Integer Di...
VB 如何遍历文件夹下所有文件,高手请指教
Private Sub Drive1_Change()Dir1.Path = Drive1.Drive End Sub Sub sosuofile(MyPath As String)Dim Myname As String Dim dir_i() As String Dim i, idir As Long If Right(MyPath, 1) <> "\" Then MyPath = MyPath + "\"Myname = Dir(MyPath, vbDirectory Or vbHidden Or ...
