Foxtable(狐表)用户栏目专家坐堂 → [求助][讨论]为什么会这样?


  共有2645人关注过本帖平板打印复制链接

主题:[求助][讨论]为什么会这样?

帅哥哟,离线,有人找我吗?
小美菜
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:646 积分:4893 威望:0 精华:0 注册:2016/1/16 22:42:00
[求助][讨论]为什么会这样?  发帖心情 Post By:2021/4/7 21:46:00 [只看该作者]

运行TextChanged事件,代码如下,第一个msgbox反馈为TRUE,第二个msgbox反馈为TRUE,第三个msgbox反馈为false,怎么会这样呀?搞半天了,检查不出什么问题
Dim tTrvCol As String = E.Sender.Text.Trim
If tTrvCol = "" Then
   ' e.Form.Controls("ChkShowTRV").Checked = False
Else
    CreateMultiTreeV( tTrvCol,guTblInfo("窗口当前表")(e.Form.Name)("上当前表"),e.Form.Controls("TrVNavBar"))
  '  e.Form.Controls("ChkShowTRV").Checked = True ' False
End If
msgbox(tTrvCol <> "" )
Dim blVisible As Boolean = (tTrvCol.Trim <> "" AndAlso e.Form.Controls("ChkShowTRV").Checked )
e.Form.Controls("TrVNavBar").Visible = blVisible
msgbox( blVisible)
msgbox(e.Form.Controls("TrVNavBar").Visible)
e.Form.Controls("Panel1").Visible = (e.Form.Controls("TrVNavBar").Visible = False)

 回到顶部