以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  逻辑判断  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=123225)
--  作者：liuandwang
--  发布时间：2018/8/10 10:18:00
--  逻辑判断
各位老师：
我设计了一个出货单窗口，加了“外框出货”和“内框出货”CheckBox复选框，分别在后面加了两个外框出货日期和内框出货日期的TextBox文本框，
出货时通过勾选“外框出货”或“内框出货”复选框（也可能同时选择），在文本框中自动显示当天日期。
按下打印按钮时，当“外框出货”或“内框出货”复选框其中一个或都没有选择，应出现“未选择出货类型”的提示信息。
求代码，非常谢谢
--  作者：有点甜
--  发布时间：2018/8/10 10:46:00
--  

1、checkbox的checkedchanged事件

 

If e.sender.checked Then

    e.form.controls("textbox1").text = date.today

Else

    e.form.controls("textbox1").text = Nothing

End If

 

2、打印按钮

 

If e.form.controls("checkbox1").checked = false orelse e.form.controls("checkbox2").checked = false then

    msgbox("没勾选")

    return

End If

\'打印代码
--  作者：liuandwang
--  发布时间：2018/8/10 11:49:00
--  
十分谢谢，已搞定