189 8069 5689
Dim
云南ssl适用于网站、小程序/APP、API接口等需要进行数据传输应用场景，ssl证书未来市场广阔！成为创新互联建站的ssl证书销售渠道，可以享受市场价格4-6折优惠！如果有意向欢迎电话联系或者加微信：18982081108（备注：SSL证书合作）期待与您的合作！
dir
As
New
IO.DirectoryInfo("C:\TDDownload")
//
目录下就一个文件夹
If
dir.GetDirectories.Length
Then
MessageBox.Show(dir.GetDirectories.GetValue(0).ToString())
End
If
//
目录下多个文件夹
'For
Each
d
As
IO.DirectoryInfo
In
dir.GetDirectories
'
MessageBox.Show(d.FullName)
'Next
命名空间:System.Windows.Forms
Application.StartupPath 属性(返回String)
获取启动了应用程序的可执行文件的路径，不包括可执行文件的名称。
Application.ExecutablePath 属性(返回String)
获取启动了应用程序的可执行文件的路径，包括可执行文件的名称。
可试试下面的方法：
1.可接收参数的外部程序
/// summary
/// 可接收参数的外部程序主函数
/// /summary
static class Program
{
/// summary
/// The main entry point for the application.
/// /summary
[STAThread]
static void Main(string[] paras)
{
string temp = "";
foreach (string str in paras)
{
temp += str + ",";
}
MessageBox.Show(temp);
Application.EnableVisualStyles();
Application.SetCompatibleTextRenderingDefault(false);
Application.Run(new Form1());
}
}
2.启动外部程序的方法(给外部程序加参数)
/// summary
/// 调用外部程序窗体
/// /summary
public partial class Invokeprogram : Form
{
public Invokeprogram()
{
InitializeComponent();
}
private void button1_Click(object sender, EventArgs e)
{
System.Diagnostics.Process proc = new System.Diagnostics.Process();
proc.StartInfo.CreateNoWindow = true;
proc.StartInfo.UseShellExecute = false;
proc.StartInfo.RedirectStandardOutput = true;
proc.StartInfo.FileName = Application.StartupPath + "\\WindowsFormsApplication1.exe";
proc.StartInfo.Arguments = "-steam -game cstrike"; //传入启动参数
proc.Start();
//string output = proc.StandardOutput.ReadToEnd();
// MessageBox.Show(output);
}
}
VS2005为例：
我的文档--Visual Studio 2005----Projects
在这面找到你的项目，打开项目文件夹，再打开项目文件夹，以WindowsApplication1为项目名为例：
我的文档\Visual Studio 2005\Projects\WindowsApplication1\WindowsApplication1
如果一名开发者希望在代码中使用相对路径而非绝对路径 那么设定当前工作路径的能力迟早会派上用场 在本教程中 我说明如何用 VB NET 设定当前工作路径
在代码中 由于相对路径可以简化代码 它一般成为我们的首选路径 但是 解释相对与当前工作目录有关 因此 将当前工作目录修改到一个需要的位置允许开发者在代码中使用相对路径
为了确定当前工作路径 我使用 Directory 对象的 GetCurrentDirectory 方法 同时 为修改当前工作路径 我应用 Directory 对象的 SetCurrentDirectory 方法 此外 您可以利用 Path 对象的 GetFullPath 方法 它允许您把使用当前工作路径的一个相对路径转换成绝对路径
实例
在表格中增加一个列表框（ listbox ）控件 listbox 并在 列表 A 中添加代码 运行代码时 结果 如图 所示
在此例中 我首先显示一个当前工作目录（利用 Directory 类的 GetCurrentDirectory 方法） 然后我用 GetFullPath 方法向它提交一个文件名（在本例中为 text txt ） 这两个行为的结果被逐条添加到列表框 Listbox 中
lishixinzhi/Article/program/net/201311/12881
这个就是你要的了！希望你能用！
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 写到代码最上边就好了！