" id="b1img" alt="米课”N+1“思维建站-非官方免费技术支持,Wordpress/Zencart/Opencart建站、SEO" title="米课”N+1“思维建站-非官方免费技术支持,Wordpress/Zencart/Opencart建站、SEO">
  • " alt="米课”N+1“思维建站-非官方免费技术支持,Wordpress/Zencart/Opencart建站、SEO" title="米课”N+1“思维建站-非官方免费技术支持,Wordpress/Zencart/Opencart建站、SEO" />
  • " alt="Windows/Linux服务器运维技术支持 环境搭建、应用发布、服务器管理、虚拟化、云计算" title="Windows/Linux服务器运维技术支持 环境搭建、应用发布、服务器管理、虚拟化、云计算" />
  • " alt="高校/小型企业网络运维与建设免费技术支持,网络规划、网络优化、故障排除、网络管理" title="高校/小型企业网络运维与建设免费技术支持,网络规划、网络优化、故障排除、网络管理" />

VB – 动态循环加载控件数组失效的解决方法

程序设计2005-04-26 itlogger阅读(542) 评论(0)
sql=”select * from table1″
rs.open sql,cnn,1,3
‘—————————————————————————-
do while not rs.eof
i=cint(rs(“sid”))
load frmmain.imgswitch(i)’只要加这个,循环就失效了?
rs.movenext
loop
‘—————————————————————————-
循环失效,只有一个控件被load,而且没有错误提示
经查,是由于事先控件imgswitch(0)已经load所致
修改程序如下:
‘—————————————————————————-
do while not rs.eof
i=cint(rs(“sid”))
if i<>0 then ‘—
load frmmain.imgswitch(i)
end if
rs.movenext
loop
转载请注明 :IT樵客
文章地址:http://www.itlogger.com/program/57.html
标签:
相关文章

发表评论

电子邮件地址不会被公开。 必填项已用*标注