重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
Dim s As String = "123124" vbTab "213131" vbTab "123123" vbTab "131312"
创新互联成立于2013年,先为顺河等服务建站,顺河等地企业,进行企业商务咨询服务。为顺河企业网站制作PC+手机+微官网三网同步一站式服务解决您的所有建站问题。
Dim arr As String() = s.Split(vbTab) '放入arr数组
For i As Integer = 0 To UBound(arr)
Console.WriteLine(arr(i))
Next
ListBox1.Items(0).ToString() '第一行
mid(ListBox1.Items(0).ToString(),2,1) '第一行第二个字符
该控件只有1列
可以的用substring可以实现
Dim table As String
table = "hello word"
'按索引获取字符串中的第4个字符从0开始,取1个字符
TextBox1.Text = table.Substring(3, 1)
'这个当然可以,用mid 取字符串的位置长度
Dim str As String = "16461了工有6149夺中46146好31"
Label1.Text = Mid(str, str.Length - 3, 3) '取字符串最后3位数
Label2.Text = Mid(str, 1, 3) '取字符串前面3位数