十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
For i As Integer = 1 To 8
在成都做网站、成都网站建设中从网站色彩、结构布局、栏目设置、关键词群组等细微处着手,突出企业的产品/服务/品牌,帮助企业锁定精准用户,提高在线咨询和转化,使成都网站营销成为有效果、有回报的无锡营销推广。成都创新互联公司专业成都网站建设十载了,客户满意度97.8%,欢迎成都创新互联客户联系。
Dim TC As CheckBox = Me.Controls("ComboBox" i)
If TC.Checked Then
TextBox1.Text = TextBox1.Text "," TC.Checked.ToString()
End If
Next
从你的例子来看你要实现的功能是
在
i=0
到
10
中
如果
i=3
就跳过
msgbox
("ok")
指令,否则执行该指令。
你可从另一方面来考虑。程序可以这样写:
dim
i
as
integer
for
i=0
to
10
if
i3
then
msgbox
("ok")
end
if
next
i
你对For循环的理解是完全错误的!
For循环的代码应修改为:
For i = 0 To un
ListBox2.Items.Add(ListBox1.Items(i))
Next
就这三行就行了!i的值会自动递增的,再放i=i+1不但多余,而且会使i的值按0、2、4、6……递增,这样的话ListBox1的第1、3、5……项就被跳过了!另外,i的值是肯定不会大于un的,所以if i=un then是完全多余的。