标题:控件初始检查赋值情况,求助
只看楼主
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



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-302859-1-1.html




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

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