VB中怎么取第五位后面的值

帮我分析下,VB中怎么取第五位后面的值
最新回答
不难

2025-06-27 04:23:34

这个使用mid函数很方便,无需编代码

例如:

Mid("12345A011111111,",6,10)        返回     A011111111

Mid("12345A011111111,",6)             返回     A011111111,

Mid("12345A011111111",6,10)           返回     A011111111

Mid("12345A011111111",6)                返回     A011111111


被截取的字符串也可以是变量,例如

Dim a As String

a="12345A011111111"

MsgBox Mid(a,6)    '截取第六位开始剩余的字符串

'会弹出消息框,显示 A011111111


下图是Mid()函数的联机帮助说明,供参考

瑾沫流年

2025-06-27 04:47:10

您好!!根据您的问题,请看如下代码:

    Dim str, a() As String
    str = "12345A011111111"
    a = Split(str, "5")
    MsgBox a(1)

这段代码的关键部分是使用Split函数,该函数用于分割字符串,提取出指定字符串中包含规定字符串后面或者前面的内容。

如果上面的代码的最后一句改成 MsgBox a(0) 的话则消息框的内容就是“1234”。

如果您对我的回答满意的话请采纳!

追问
不好意思 不能用拆分的方式 因为前面和后面的数都是变量