重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
for i =0 to ...
在虹口等地区,都构建了全面的区域性战略布局,加强发展的系统性、市场前瞻性、产品创新能力,以专注、极致的服务理念,为客户提供网站建设、成都网站建设 网站设计制作按需求定制设计,公司网站建设,企业网站建设,品牌网站设计,成都全网营销,成都外贸网站建设,虹口网站建设费用合理。
for j =0 to ...
keyarray(i,j)=
next
next
双重循环,赋值和读取一样
没办法,老老实实一个个赋值。如果你定义成数组,就简单了,a(1)~a(100),就可以用for循环赋值了。
dim s() as string
For Each fm1 In Panel1.Controls
dim i=0
if fm1.GetType.ToString = "System.Windows.Forms.TextBox" Then
s(i)=fm1.text
i+=1
End If
Next
参照VB6,在VB.net应该也差不多
方法一,让它们形成控件数组
for i=1 to 5
textbox(i).text=1
next i
方法二,假设这些控件的名称有规律,分别是textbox1,textbox2等
for i=1 to 5
controls("textbox" i ).text=1
next i
在VB6中能通过,希望对你有帮助