Foxtable(狐表)用户栏目专家坐堂 → 有10个文体框 还有一个保存按钮 如果有一个文体框没有值 就弹出一个对话


  共有4047人关注过本帖平板打印复制链接

主题:有10个文体框 还有一个保存按钮 如果有一个文体框没有值 就弹出一个对话

帅哥哟,离线,有人找我吗?
lsy
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2014/3/4 9:27:00 [只看该作者]

For Each c As WinForm.Control In e.Form.Controls
    If c.Gettype.Name = "TextBox" Then
        If e.Form.Controls(c.Name).text = "" Then
            MessageBox.Show("所有文本框都不能为空")
            Exit For
        End If
    End If
Next

 回到顶部