VB如何获取当前目录的上级目录名？

VB进行可视化编程时，需要加窗体，在窗体界面进行 *** 作，FileSystemObject模型来 *** 作，特别简单，举例如下：

1.引用Microsoft Scripting Runtime,//这是一个加载超时的设置，棚樱掘

2. Dim parentPath As String

Dim fso As FileSystemObject

Set fso = New FileSystemObject

parentPath = fso.GetParentFolderName("C:\1\as\text\p")//这是找到上级目录的函数。

3.parentPath 就是你要的结果。

Visual Basic（简称VB）是Microsoft公司开发的一种通用的基于对象的程序设计语言，为结构化的、模块化的、面向对象的、包含协助开发环境的事件驱动为机制的可视化程序设计语言。

是一种可用于微软自家产品开发的语言。

“Visual” 指的是开发图形用户界面 (GUI) 的方法——不需编写大量代码去描述界面元素的外观和位置，而只要把预先建立的对象add到屏幕上的一点即可。

“Basic”指的是 BASIC (Beginners All-Purpose Symbolic  Instruction Code) 语言，是一种在计算技术发展历史上应用得最为广泛的语言。

Visual Basic源自于BASIC编程语言。

VB拥有图形用户界面（GUI）和快速应用程序开发（RAD）系统，可以轻易的使用DAO、RDO、ADO连接数据库，或者轻松的创建Active X控件，用颂尘于高效生成类型安全和面向对象的应用程序。

程序员可以轻松的使用VB提供的组件快链核速建立一个应用程序。

System.Environment.CurrentDirectory

//例: c:/test/

Application.ExecutablePath(包括名称）

//例: c:/test/myapp.exe

Application.StartupPath（不包括名称）

//例: c:/test/

绝对路径是直接到达目标位置，通常是从盘符开始的路径。完整的描述文件位置的路径就是绝对路径，以web站点根目录为参考基础的目录路径。

绝对路径名的指定是从树型目录结余码构顶部的根目录开始到某个目录或文件的裂空路径，由一系列连续肆毁瞎的目录组成，中间用斜线分隔，直到要指定的目录或文件，路径中的最后一个名称即为要指向的目录或文件。之所以称为绝对，意指当所有网页引用同一个文件时，所使用的路径都是一样的。

扩展资料

几种编程语言获取程序所在路径的方法：

1、在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)

}

2、python脚本所在路径：

import os

print(os.path.split(os.path.realpath(__file__))[0])

3、shell脚本获取脚本的绝对路径：

DIR="$( cd "$( dirname "${BASH_SOURCE[0]}" )" &&pwd )"

---