码迷,mamicode.com
首页 > 编程语言 > 详细

VB字符串分割为数组并遍历下标值

时间:2020-10-24 09:56:17      阅读:27      评论:0      收藏:0      [点我收藏+]

标签:integer   compare   字符   ring   开始   bug   deb   打印   spl   

Dim A() As String
Private Sub Command1_Click()
A() = Split(Text1.Text, "-", -1, vbTextCompare)‘以“-”将字符串分割后存到一个以下标为0开始的数组里
Dim i As Integer
For i = 0 To UBound(A()) ‘UBound(a())返回数组的最大下标LBound(A())返回最小下标

Debug.Print A(i) ‘将结果打印到即时窗口

Next i
End Sub

VB字符串分割为数组并遍历下标值

标签:integer   compare   字符   ring   开始   bug   deb   打印   spl   

原文地址:https://www.cnblogs.com/Mandy-ZQ-Ma/p/13863745.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!