这个就是你要的了!希望你能用!
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim AppPath As String = Directory.GetCurrentDirectory() '获取应用程序的当前工作目录
Process.Start(AppPath) '打开当前目录
End Sub
忘了说,这个要引用命名空间!
把Imports System.IO 写到代码最上边就好了!
Set fso = CreateObject("scripting.filesystemobject") Set disks = fso.Drives For Each disk In disks '枚举磁盘 Set ID = fso.GetDrive(fso.GetDriveName(disk)) If ID.drivetype = 1 And disk.IsReady = True Then '如果是可移动磁盘 Msgbox ID.DriveLetter ":\" '读出盘符 End If Next
命名空间:System.Windows.Forms
Application.StartupPath 属性(返回String)
获取启动了应用程序的可执行文件的路径,不包括可执行文件的名称.
Application.ExecutablePath 属性(返回String)
获取启动了应用程序的可执行文件的路径,包括可执行文件的名称.
System.Environment.CurrentDirectory;
//例:?c:/test/
Application.ExecutablePath;(包括名称)
//例:?c:/test/myapp.exe
Application.StartupPath;(不包括名称)
绝对路径是直接到达目标位置,通常是从盘符开始的路径.完整的描述文件位置的路径就是绝对路径,以web站点根目录为参考基础的目录路径.
绝对路径名的指定是从树型目录结构顶部的根目录开始到某个目录或文件的路径,由一系列连续的目录组成,中间用斜线分隔,直到要指定的目录或文件,路径中的最后一个名称即为要指向的目录或文件.之所以称为绝对,意指当所有网页引用同一个文件时,所使用的路径都是一样的.
扩展资料
几种编程语言获取程序所在路径的方法:
①.、在golang程序里面获取程序所在路径:
package main
import (
"path/filepath"
"os"
"fmt"
"log"
)
func main() {
execDir, err := filepath.Abs(filepath.Dir(os.Args[0]))
if err = nil {
log.Fatal(err)
}fmt.Println(execDir)
}
import os
print(os.path.split(os.path.realpath(__file__))[0])
DIR="$( cd "$( dirname "${BASH_SOURCE[0]}" )" pwd )"
以上就是土嘎嘎小编为大家整理的vb.net显示当前目录的简单介绍vb.net显示当前目录的简单介绍相关咨询咨询主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用,就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦!!