vb点虐 用文本框输入数组的所有元素，数值之间用逗号分隔，统计数组中正数的个数，并显示最大值的元素下标

Dim str As String = "", temp, n As Integer

站在用户的角度思考问题，与客户深入沟通，找到从化网站设计与从化网站推广的解决方案，凭借多年的经验，让设计与互联网技术结合，创造个性化、用户体验好的作品，建站类型包括：成都做网站、网站建设、企业官网、英文网站、手机端网站、网站推广、域名注册、网站空间、企业邮箱。业务覆盖从化地区。

Dim str1 As 困羡String = "12,45,2,9,41,31,66,83,2,1,-9,-91,-21"

Dim a() As String = Split(str1, ",")

For i = 1 To UBound(a) Step 1

a(i) = Val(a(i))

Next

temp = 0

n = 0

For i = 1 To UBound(a)

If a(i)  temp Then

temp = a(i)

End If

If a(i)  0 Then

n = n + 1

End If

Next

李态 str = str  "正数的个数为 "  n

str = str  "最大元素的下标为 "

For i = 1 To UBound(a)

哪尺源If a(i) = temp Then

str = str  i  " "

End If

Next

TextBox6.Text = str

VB点虐 通过text框的输入赋值给数组

你这个神如Text()()是一个二维数游返启组？

将数字直接定义成text box类型，并将己所添加的textbox实例复制给数组的相关项，这样就能通过数组的形式世仿访问了。。。

在VB点虐 中如何将几个数组按照列输入到ListView中

先判断几个数组中个数最大的一个作为循塌衫卖环次数。

然后每建第一行，把每个数组团逗第0个数值依次输出

然后建第二行，把每个数组第1个数值依次输出

依次类推完成循环。

在循塌芦环中，如果当前循环寄存器大于某个数组的下限值，输出“null”

文章标题：vb点虐 数组输入 vbs 数组
分享路径：http://azwzsj.com/article/ddpjogh.html