vb如何分别截取指定字符之前和之后的内容？
vb如何分别截取指定字符之前和之后的内容？这个问题已经问了一遍了，但是得到的效果有点不对，现在解释一下
我不知道=i don't know
我看不见=i can't see
我是学生=i'm a student
第一步我想截取第一句话 = 之前的内容
第二步我想截取第二句话 = 之后的内容
第三步我想截取第三句话 = 之前的内容
不知道代码如何写？？？ 请指点..
请注意，这3句话要分3次截取
方法和详细的操作步骤如下：
1、第一步，删除字符串C两端的空格，见下图，转到下面的步骤。
2、第二步，完成上述步骤后，截取C的最左边的n个字符，见下图，转到下面的步骤。
3、第三步，完成上述步骤后，截取C的最右侧n个字符，见下图，转到下面的步骤。
4、第四步，完成上述步骤后，从C中的第m个字符截取n个字符，见下图，转到下面的步骤。
5、第五步，
完成上述步骤后，返回C中包含的字符数，汉字中的空格算作一个字符，见下图，转到下面的步骤。
6、第六步，
完成上述步骤后，将C中的大写字母变为小写字母，见下图，转到下面的步骤。
7、第七步，完成上述步骤后，将C中的小写字母转换为大写字母，见下图。这样，就解决了这个问题了。
温馨提示：答案为网友推荐，仅供参考
第1个回答 2006-05-07
a="我不知道=i don't know "
b="我看不见=i can't see"
c="我是学生=i'm a student"
a1=split(a,"=")(0)
b1=split(b,"=")(1)
c1=split(c,"=")(0)
其中split函数可以把字符串变成数组
第一个参数是待分割的字符串，第二个参数是分隔符。
假设
a="v,b,n,m"
b=split(a,",")
那么结果就是
b(0)="v"
b(1)="b"
b(2)="n"
b(3)="m"
b(4)=错误，下标越界本回答被网友采纳
b="我看不见=i can't see"
c="我是学生=i'm a student"
a1=split(a,"=")(0)
b1=split(b,"=")(1)
c1=split(c,"=")(0)
其中split函数可以把字符串变成数组
第一个参数是待分割的字符串，第二个参数是分隔符。
假设
a="v,b,n,m"
b=split(a,",")
那么结果就是
b(0)="v"
b(1)="b"
b(2)="n"
b(3)="m"
b(4)=错误，下标越界本回答被网友采纳
第2个回答 推荐于2018-05-04
vb截取指定字符之前和之后的内容使用split函数。
Split函数用于分割字符串，以一个字符串内容中的一个(或几个连续的)特定的字符为切割位点的标志，将这个字符串分割成若干个小字符串。
用法：变量 = Split(原字符串变量, 切割标志)
例子：
Private Sub Command1_Click()
Dim a As String, b() As String
a = "abcdefg=123456789" '这里要分割的字符可以更改，比如我们取等号=之前和之后的内容
b = Split(a, "=") '用split分割字符
MsgBox "等号之前的是：" & b(0)
MsgBox "等号之后的是：" & b(1)
End Sub本回答被网友采纳
Split函数用于分割字符串，以一个字符串内容中的一个(或几个连续的)特定的字符为切割位点的标志，将这个字符串分割成若干个小字符串。
用法：变量 = Split(原字符串变量, 切割标志)
例子：
Private Sub Command1_Click()
Dim a As String, b() As String
a = "abcdefg=123456789" '这里要分割的字符可以更改，比如我们取等号=之前和之后的内容
b = Split(a, "=") '用split分割字符
MsgBox "等号之前的是：" & b(0)
MsgBox "等号之后的是：" & b(1)
End Sub本回答被网友采纳
相似回答