远洋岛事件:如用VB 6.0的CommonDialog控件读取文件

来源：百度文库 编辑：高校问答 时间：2024/05/11 03:14:42
当中的一些代码如下：
With dlgCommonDialog 'dlgCommonDialog是CommonDialog名称
.DialogTitle = "请选择要打开的数据库"
.CancelError = True
.Flags = &H4&
.InitDir = App.Path
.FileName = ""
.Filter = "数据库文件|*.mdb"

.ShowOpen
If Err.Number = 32755 Then
MsgBox "未打开文件！", vbCritical, "数据库管理"
Exit Sub
Else
MDB_File_Name = .FileName
MsgBox "你选择打开的是：" &MDB_File_Name
End If
End With

程序运行以后，假如我选择了“d:\mdb_gl\001.mdb”这个文件，变量“MDB_File_Name”被赋的值是“d:\mdb_gl\001.mdb”。
问：如果我只想让系统返回的是“001.mdb”，即只返回文件名不返回路径，该如何写这段代码？
如用VB 6.0的CommonDialog控件读取文件 如何用03版本的VB.NET打开用05版做的VB的东西?? 如何用vb打开指定的端口 如何用vb表示时间的变化 用VB 如何实现系统操作的监控。如文件的复制、删除等 用VB如何截取一个字符串前或后的空字符（如空格） 如何用VB读取TXT的文字,然后可以用按钮打开? 如何用VB制作 如何用VB做记码器？ 如何用VB实现