以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请问如何保证窗口全部打开之前 后续的点击无效啊  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=66074)

--  作者:mxm121
--  发布时间:2015/3/29 15:08:00
--  请问如何保证窗口全部打开之前 后续的点击无效啊
请问如何保证窗口全部打开之前 按钮后续的点击无效啊

如果快速点击tile 就会报一些表加载错误什么的 但是一次点击就都正常



\'Tile点击事件
Public Sub Tile_Click(sender As System.Object, ByVal e As System.EventArgs)
Select Case sender.text
    Case "客户资料"
        If UserPrivilege.Contains("010000") Then
            Forms("CustInfo").Show
        Else
            MessageBox.show("无权限!","系统提示",MessageBoxButtons.OK, MessageBoxIcon.Information)
        End If
    Case "销售日报"
        If UserPrivilege.Contains("010202") Then
            Functions.Execute("CRM_Stats_DailyPaperTemptbl")
            Forms("CustDailyPaper").Show
        Else
            MessageBox.show("无权限!","系统提示",MessageBoxButtons.OK, MessageBoxIcon.Information)
        End If
    Case Else
        MessageBox.Show(sender.text & "正在建设中...")
End Select
End Sub

--  作者:有点甜
--  发布时间:2015/3/29 15:14:00
--  

 请用例子说明。

 

 加载错误,就说明你的加载条件有问题


--  作者:mxm121
--  发布时间:2015/3/29 15:31:00
--  
例子不太好上 这个不属于我加载条件错误的问题 因为单击都没有任何问题 

想问一下 如何能在窗口完全打开后 这个点击事件才能继续执行

--  作者:有点甜
--  发布时间:2015/3/29 15:37:00
--  

不明白你什么意思,也不知道你的tile是什么。

 

具体请上传例子说明情况