以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 还原到之前的值 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=89885) |
-- 作者:huhu -- 发布时间:2016/8/31 17:08:00 -- 还原到之前的值 textchanged代码: Dim bbyf As WinForm.ComboBox = e.Form.Controls("cmb辩白研发") Dim bbmk As WinForm.ComboBox = e.Form.Controls("cmb辩白模块") If bbmk.text = "" Then bbyf.text = "" Else Dim dr As DataRow = DataTables("模块名称库").SQLFind("模块名称 = \'" & bbmk.text & "\'") If dr IsNot Nothing Then bbyf.text = dr("模块维护人") End If End If 希望点击取消按钮,bbyf,bbmk都还原到之前的值。取消按钮代码怎么写。 |
-- 作者:有点蓝 -- 发布时间:2016/8/31 17:54:00 -- 控件的undo貌似有问题。只能是用全局变量保存一下之前的值 |