求助！有关在VB下如何更改字符串？

来源：百度知道 编辑：UC知道 时间：2024/06/07 09:20:06
很急！
举个例子：
VB上有一个文本框中是其他文件的路径，例如：F:\11\info.txt
程序靠这个路径打开txt文档。现在希望程序可以靠以上给出的路径再打开F:\11\data.txt，不知道怎么更改最后的几个字符。
可能我叙述的不是很清楚，可以发站内信给我。叙述的详细点。

可以这样：

假设Text1.Text="F:\11\info.txt"

那么data的名字就是：

Left(Text1,Len(Text1)-8) & "data.txt"

Sub Command1_Click()
Dim i As Integer
Dim s As String
Dim p As String

s = "f:\11\info.txt"

For i = Len(s) To 1 Step -1
If Mid$(s, i, 1) = "\" Then
p = Left$(s, i)
Exit For
End If
Next i

End Sub

p 就是分离出的 “f:\11\"

你的意思是打开同一路径根目录下的不同文件是吧？ 其实很简单 用函数InStrRev从右向左匹配“\”的位置 然后用Left函数截取text1中的字符窜（截取位置就是前面函数取得的位置）然后就把取得的字符串&上需要打开的文件就行了