vb路径不包含文件名

1. 怎样用VB获取文件的文件名（不要包含扩展名）

这样来就可自以啦，干嘛要这么麻烦呢？ Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim a As String
a = System.IO.Path.GetFileNameWithoutExtension("c:\windows\test123.txt123")
Me.Text = a End Sub

2. vb编程怎么执行某一目录下不确定文件名的程序，求代码

DimdAsString
d=Dir("c:soft*.exe")
Ifd<>""ThenShell"c:soft"&d

以上代码是假定只有一个exe文件。如果有多个exe都要执行，可以这样：

DimdAsString
d=Dir("c:soft*.exe")
DoUntild=""
Shell"c:soft"&d
d=Dir
Loop