| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 457 人关注过本帖
标题:控件初始检查赋值情况,求助
只看楼主 加入收藏
lzdhc
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2010-4-13
结帖率:0
收藏
已结贴  问题点数:20 回复次数:1 
控件初始检查赋值情况,求助
http://zhidao.baidu.com/question/146656637.html
百度知道哩,问过了,没人知道。
等待高手。
搜索更多相关主题的帖子: 控件 检查 赋值 
2010-04-13 19:03
ouxianzhi520
Rank: 8Rank: 8
来 自:重庆
等 级:蝙蝠侠
威 望:3
帖 子:245
专家分:932
注 册:2007-12-1
收藏
得分:20 
程序代码:
 Dim i As Integer
        For i = 1 To 16
            If IsNumeric(Me.Controls.Item("textbox" & i).Text) Then
                ' MsgBox("提示", , "提示")
                Me.Controls.Item("textbox" & i).BackColor = Color.Red
            End If
        Next i

最好是把代码写在这里,更方便 查看 。
你在判断中加了exit sub 这样只能判断一个,当有两个或更多时,无法判断后面的,上面的代码测试通过。希望对你有帮助

[url=http://blog./ouxianzhi520]csdn个人博客[/url]
2010-04-14 09:28
快速回复:控件初始检查赋值情况,求助
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.023347 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved