djlwydhs 发表于 2008-3-27 19:49

我想编写一个循环可不知怎么写,请大家帮帮忙!!

我想编写一个循环可不知怎么写,请大家帮帮忙!!
我的WEB页面中有24个TextBox,分成两列
......TextBox1....TextBox21
      TextBox2....TextBox22
         .            .     
      TextBox12....TextBox32
我想对页面中的同行两个TextBox进行比较,让左边的大于右边
数据如下:
         8             5
         1             6
         空              2
.......
我编写的程序为:
dim aa as string  
dim ab as string
dim i as Integer
for i=1 to 12  
aa="TextBox" & str(i) & ".text"
ab="TextBox" & str(i+20) & ".text"
if Isdbnull(aa) and ab>0 or aa < ab then
msg.text="第" & srt(i) & "行数据错误!"
Exit   For
endif
next
这是我编写的,可怎么调试都不行,请大家帮帮忙!谢谢

hgl520 发表于 2008-3-27 21:54

回复 1# 的帖子

路过就是路过

qlong0728 发表于 2008-3-29 08:29


aa="TextBox" & str(i) & ".text"
改成
aa=DirectCast(Controls.Find("TextBox" & i, True)(0), TextBox).Text

winorange 发表于 2008-3-29 08:46

还没开始学,搞不清,呵呵

页: [1]

编程论坛