CommonDialog的一个问题,,来吧!
Text1.Text = CommonDialog1.FileName他得出的路径是: C:\Program Files\Game\Game.exe
但我想他变作 C:\Program Files\Game\
不要后面的,那应该怎做 --------------------编程问答-------------------- InStrRev函数
描述
返回一个字符串在另一个字符串中出现的位置,从字符串的末尾算起。
Private Sub Command1_Click()
Dim a As Integer
a = InStrRev(Text1, "\")
Debug.Print Left(Text1, a - 1)
End Sub
Private Sub Form_Load()
Text1 = "C:\Program Files\Game\Game.exe"
End Sub
--------------------编程问答-------------------- 成功了!謝
补充:VB , 基础类