vb.net添加删除路径最后面的斜杠删除字符串

  • A+
所属分类:vb.net

vb.net里面往往路径最后面需要添加一个斜杠,或者最后结尾不需要出现斜杠,那怎么删除了

添加一个斜杠代码,添加之前肯定是要判断现在是否有!

RichTextBox1.Text这个是控件里面显示的合法路径

If RichTextBox1.Text <> "" Then
' 检查目录是否以目录分割字符\结束,如果不是则添加之
If RichTextBox1.Text(RichTextBox1.Text.Length - 1) <> Path.DirectorySeparatorChar Then
RichTextBox1.Text += Path.DirectorySeparatorChar

End If
End If

复制

 

删除路径结尾的斜杠,判断我就不写了直接复制上面的

Dim Dirr As String

Dirr = RichTextBox1.Text.Remove(RichTextBox1.Text.LastIndexOf("\"))

复制

 

发表评论

:?: :razz: :sad: :evil: :!: :smile: :oops: :grin: :eek: :shock: :???: :cool: :lol: :mad: :twisted: :roll: :wink: :idea: :arrow: :neutral: :cry: :mrgreen: