智能排课系统vb代码(5)

时间:2025-04-05

和智能智能排课系统1、2、3是一套

Command2.Enabled = False

Command3.Enabled = False

Command4.Enabled = False

Command5.Enabled = False

Command6.Enabled = False

Command7.Enabled = False

Command8.Enabled = True

Command9.Enabled = True

Call TextEnable

End Sub

Private Sub EmptyText() '清空文本框

Text1.Text = ""

Text2.Text = ""

Text5.Text = ""

Text7.Text = ""

End Sub

Private Sub OkStatus() '设置不在编辑或添加记录时的各控件状态

Command1.Enabled = True

Command2.Enabled = True

Command3.Enabled = True

Command4.Enabled = True

Command5.Enabled = True

Command6.Enabled = True

Command7.Enabled = True

Command8.Enabled = False

Command9.Enabled = False

Call TextDisable

End Sub

2、查看课表窗口及代码(以教室课表为例)

Dim Conn As New ADODB.Connection '连接变量

智能排课系统vb代码(5).doc 将本文的Word文档下载到电脑

精彩图片

热门精选

大家正在看

× 游客快捷下载通道(下载后可以自由复制和排版)

限时特价:7 元/份 原价:20元

支付方式:

开通VIP包月会员 特价:29元/月

注:下载文档有可能“只有目录或者内容不全”等情况,请下载之前注意辨别,如果您已付费且无法下载或内容有问题,请联系我们协助你处理。
微信:fanwen365 QQ:370150219