当前位置:编程学习 > VB >>

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 ,  基础类
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,