在VB编程中，可以使用以下方法来截取字符串中的字符：
使用`Split`函数
`Split`函数用于根据指定的分隔符将字符串分割成多个子字符串。
语法：`Split（原字符串变量， 切割标志）`
示例：
```vb
Dim a As String, b（） As String
a = "abcdefg=123456789"
b = Split（a, "="）
MsgBox "等号之前的是：" & b（0）
MsgBox "等号之后的是：" & b（1）
```
使用`Left`函数
`Left`函数返回字符串的前N个字符。
语法：`Left（字符串， n）`
示例：
```vb
Dim b As String
b = "远处消失了的背影"
MsgBox Left（b, 3） ' 输出 "远处"
```
使用`Mid`函数
`Mid`函数从第P个字符开始，向后截取N个字符。
语法：`Mid（字符串， p, n）`
示例：
```vb
Dim b As String
b = "远处消失了的背影"
MsgBox Mid（b, 3, 3） ' 输出 "消失"
```
使用`Right`函数
`Right`函数返回字符串的最后N个字符。
语法：`Right（字符串， n）`
示例：
```vb
Dim b As String
b = "远处消失了的背影"
MsgBox Right（b, 3） ' 输出 "背影"
```
使用`Substring`函数
`Substring`函数从字符串的起始位置截取指定长度的子字符串。
语法：`Substring（起始位置， 长度）`
示例：
```vb
Dim str As String = "Hello World"
Dim subStr As String = str.Substring（6, 5）
Console.WriteLine（subStr） ' 输出 "World"
```
使用字符串索引
通过在字符串名称后面加上方括号并指定索引位置来访问特定的字符。
示例：
```vb
Dim str As String = "Hello World"
Dim character As Char = str（2）
Console.WriteLine（character） ' 输出 "l"
```
根据你的具体需求选择合适的截取方法，可以实现灵活的字符串处理。