以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  双回车的问题?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=72214)

--  作者:zsslly
--  发布时间:2015/7/26 2:33:00
--  双回车的问题?
我有一个表,双击回车弹出窗口,代码如下:

static prevtime As Date
If e.KeyCode = keys.Enter Then
    Dim sp As TimeSpan = Date.Now - prevtime
    prevtime = Date.Now
    If sp.Milliseconds < 300 Then
        forms("设计情况调查表").show()
    End If
End If

但是我现在设计了一个窗口引用了这个主表,并设置成副本表,在副本表里双回车弹出窗口代码应该怎么改?

--  作者:大红袍
--  发布时间:2015/7/26 9:23:00
--  

加入表名判断。

 

If e.Table.Name = "窗口1_Table1" Then

    \'其余代码

End If


--  作者:zsslly
--  发布时间:2017/7/28 23:41:00
--  
If e.Table.Name = "窗口1_Table1" Then
    static prevtime As Date
    If e.KeyCode = keys.Enter Then
        Dim sp As TimeSpan = Date.Now - prevtime
        prevtime = Date.Now
        If sp.Milliseconds < 300 Then
            forms("跟踪审核").show()
        End If
    End If
End If


这样是OK的,那么请问,如果双击“空格”键怎么写呢?

--  作者:有点蓝
--  发布时间:2017/7/29 8:56:00
--  
参考:http://www.foxtable.com/webhelp/scr/0621.htm
--  作者:zsslly
--  发布时间:2017/7/29 9:24:00
--  
谢谢