以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]窗口“月历”控件问题。  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=117622)

--  作者:vxzx
--  发布时间:2018/4/16 13:44:00
--  [求助]窗口“月历”控件问题。
窗口设为主窗口,“月历”控件,DateSelected事件:
Dim i As Integer = Tables("交接班").FindRow("日期 = #" & e.sender.Value & "#")
msgbox(i)
If i >= 0 Then
    Tables("交接班").position = i
Else
    Dim nr As Row = Tables("交接班").AddNew
    nr("日期") = e.sender.Value
End If


现在问题是当“帐号A”双击 4月11日,会第一次新建一行内容,而“帐号A”又不在那行中键入任务内容,此时再切换为“账号B”双击4月11日后,表格会第二次再新建一行内容,而此时在此次新建中键入内容后,后边无论切换哪个帐号,只要双击 4月11日,主窗口都只会显示第一次新建的空白内容的行,不会显示第二次新建的已经键入了内容的行。
请问老师,怎么编写,让一个日期只能建一行内容,不会重复建相同日期的空白行?

--  作者:vxzx
--  发布时间:2018/4/16 13:46:00
--  
显示的
--  作者:有点甜
--  发布时间:2018/4/16 14:18:00
--  
上传具体项目测试。