[求助] 引用 Split 分割字符串得到的数组，出现编译错误，为什么呢？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助] 引用 Split 分割字符串得到的数组，出现编译错误，为什么呢？

共有2254人关注过本帖树形打印复制链接主题：[求助] 引用 Split 分割字符串得到的数组，出现编译错误，为什么呢？

龙潭春早

小大 1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：三尾狐帖子：676 积分：4895 威望：0 精华：0 注册：2018/3/22 16:05:00

[求助] 引用 Split 分割字符串得到的数组，出现编译错误，为什么呢？ 发帖心情

Post By：2020/1/6 20:07:00 [显示全部帖子]

任务：双击表B单元格，向表A 的多个列输入数据

代码：

Dim Pn2(),Pn3(),str2s,str3s As String

str2s = "A1,A2,A3,A4,A5,A6" ' 表A 列名字符串

str3s = "B1,B2,B3,B4,B5,B6" ' 表B 列名字符串

Dim dr As DataRow = DataTables("表A").Find("[编码] = '"&e.Row("编码")&"'")

If dr IsNot Nothing Then

Pn2() = str2s.Split(",") ' 表A 列名数组

Pn3() = str3s.Split(",") ' 表B 列名数组

For i As Integer = 0 To Pn2().Length - 1

dr(Pn2(i)) = e.Row(Pn3(i))

End If

保存代码时，出现编译错误，为什么呢？怎么解决呢？

此主题相关图片如下：双击输入时代码编译错误.png

龙潭春早

小大 2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：三尾狐帖子：676 积分：4895 威望：0 精华：0 注册：2018/3/22 16:05:00

Post By：2020/1/6 21:30:00 [显示全部帖子]

蓝老师，帮助中的下面这个示例里，定义了 Parts() 并用它直接引用了字符串分割数组，

我们这里为什么不能用 Pn2() 直接引用数组，而必须用 Pn2 引用呢？

帮助中的示例代码：

Dim Tel As String = "0759 - 3166876"

Dim Parts() As String = Tel.Split（"-"）

Output.Show（"区号：" & Parts（0））

Output.Show（"电话：" & Parts（1））

在命令窗口执行上述代码，得到的结果是：

区号：0759

电话：3166876

龙潭春早

小大 3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：三尾狐帖子：676 积分：4895 威望：0 精华：0 注册：2018/3/22 16:05:00

Post By：2020/1/6 22:46:00 [显示全部帖子]

哦多谢！

主题：[求助] 引用 Split 分割字符串得到的数组，出现编译错误，为什么呢？