从品牌网站建设到网络营销策划,从策略到执行的一站式服务
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
你这个神如Text()()是一个二维数游返启组?
将数字直接定义成text box类型,并将己所添加的textbox实例复制给数组的相关项,这样就能通过数组的形式世仿访问了。。。
先判断几个数组中个数最大的一个作为循塌衫卖环次数。
然后每建第一行,把每个数组团逗第0个数值依次输出
然后建第二行,把每个数组第1个数值依次输出
依次类推完成循环。
在循塌芦环中,如果当前循环寄存器大于某个数组的下限值,输出“null”
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图