2024年3月31日发(作者：)

VB中截取任意两个字符中间的字符串函数

vb截取字符串2010-04-18 02:52一、

（1）左部截取left$(字符串,n）：n是要截取的字符个数

（2）中部截取Mid$(字符串,p,n):表示从第p个字符开始截取n个字符

（3）右部截取Right$(字符串,n):表示截取字符串的后n个字符

如：

left$("abcdefg",3)的结果是："abc"

mid$("abcdefg",2,3)的结果是:"bcd"

right$("abcdefg",3)的结果是："efg"

Dim strSrc As String

Dim strResult As String

strSrc = "0|下载地址1|/upload/upload2/files/"

strResult = Right(strSrc, Len(strSrc) - InStr(1, strSrc, "/"))

二、

VB中截取任意两个字符中间的字符串函数

111111+22222+33333333+44444+55555+66666…

如何得到任意两个符号”+”之间的字符串,譬如22222

以下为代码全过程,函数为增强版,支持任意字符,只需要在调用的时候修改参数就OK

了,代码注释中已经有描述:

新建工程在窗体上放置两个TextBox控件和一个Command控件,名称不需要修改默

认就OK,分别名为: 和 command1

然后复制以下代码:

Private Sub Command1_Click()

= GetChar(Trim(), "+", 1, 3)

End Sub