| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 菜单文本框显示问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=132735) |
| -- 作者：zpsun2003 -- 发布时间：2019/3/28 16:44:00 -- 菜单文本框显示问题 If e.Table.Current("方案序号") <> 0 Then RibbonTabs("方案选择").Groups("方案选择").Items("方案库").Text = e.Table.Current("方案库") ‘文本框’ RibbonTabs("方案选择").Groups("方案选择").Items("选择方案").value = e.Table.Current("方案序号") ‘数值框’ End If 这个代码中，选择不同行时，文本框内容显示不对呢，数值框内容没有问题，感觉应该是能被第一次赋值，之后就不管用了呢
|
| -- 作者：有点甜 -- 发布时间：2019/3/28 16:46:00 -- currentchanged事件，写代码
msgbox(123) If e.Table.Current("方案序号") <> 0 Then
msgbox(456)
RibbonTabs("方案选择").Groups("方案选择").Items("方案库").Text = e.Table.Current("方案库") ‘文本框’
RibbonTabs("方案选择").Groups("方案选择").Items("选择方案").value = e.Table.Current("方案序号") ‘数值框’
End If
|
| -- 作者：zpsun2003 -- 发布时间：2019/3/28 18:43:00 -- 是写在那的，这段代码没有问题，是其他代码干扰了。谢谢 |