[求助]Buttom是否可用 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]Buttom是否可用

共有2123人关注过本帖树形打印复制链接主题：[求助]Buttom是否可用

blsu33

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2928 积分：20184 威望：0 精华：0 注册：2012/2/3 17:45:00

[求助]Buttom是否可用 发帖心情

Post By：2016/2/23 14:41:00 [只看该作者]

红袍老师，

我想在某一时点某个按钮可用，用变量还是怎么做，求思路。

例如窗口1中的Textbox checkbox DateTimePicker1 都录入信息了才可以显示 Buttom 1，怎么实现呢？

blsu33

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2928 积分：20184 威望：0 精华：0 注册：2012/2/3 17:45:00

Post By：2016/2/23 14:41:00 [只看该作者]

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目17.foxdb

大红袍

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/2/23 14:54:00 [只看该作者]

TextChanged事件

Dim txt1 As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim dtp1 As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker1")
Dim cbx1 As WinForm.CheckBox = e.Form.Controls("CheckBox1")
If txt1.text > "" AndAlso dtp1.text > "" AndAlso cbx1.Checked Then
e.Form.Controls("Button1").Enabled = True
Else
e.Form.Controls("Button1").Enabled = False
End If