Foxtable(狐表)用户栏目专家坐堂 → 依葫芦画瓢也错误什么玩意


  共有2769人关注过本帖树形打印复制链接

主题:依葫芦画瓢也错误什么玩意

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


加好友 发短信
等级:狐神 帖子:5054 积分:13031 威望:0 精华:0 注册:2014/5/15 21:34:00
依葫芦画瓢也错误什么玩意  发帖心情 Post By:2015/11/26 20:39:00 [显示全部帖子]

大师:难道鬼在葫芦里的夹层里?
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目45.zip


 回到顶部
帅哥哟,离线,有人找我吗?
hbhb
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5054 积分:13031 威望:0 精华:0 注册:2014/5/15 21:34:00
  发帖心情 Post By:2015/11/26 22:13:00 [显示全部帖子]

谢谢!什么原因?错在哪里?

 回到顶部
帅哥哟,离线,有人找我吗?
hbhb
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5054 积分:13031 威望:0 精华:0 注册:2014/5/15 21:34:00
  发帖心情 Post By:2015/11/27 10:00:00 [显示全部帖子]

袍兄:请问为何有的月份不是从2号开始,不是从1号开始?

 回到顶部
帅哥哟,离线,有人找我吗?
hbhb
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5054 积分:13031 威望:0 精华:0 注册:2014/5/15 21:34:00
  发帖心情 Post By:2015/11/27 10:00:00 [显示全部帖子]

袍兄:请问为何有的月份是从2号开始,不是从1号开始?

 回到顶部
帅哥哟,离线,有人找我吗?
hbhb
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5054 积分:13031 威望:0 精华:0 注册:2014/5/15 21:34:00
  发帖心情 Post By:2015/11/27 10:19:00 [显示全部帖子]

2015年3月、11月

 回到顶部
帅哥哟,离线,有人找我吗?
hbhb
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5054 积分:13031 威望:0 精华:0 注册:2014/5/15 21:34:00
  发帖心情 Post By:2015/11/27 10:56:00 [显示全部帖子]

谢谢!

 回到顶部
帅哥哟,离线,有人找我吗?
hbhb
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5054 积分:13031 威望:0 精华:0 注册:2014/5/15 21:34:00
  发帖心情 Post By:2015/11/27 12:35:00 [显示全部帖子]

奇怪奇怪真奇怪,双击日历后,事务编辑窗口的提前及几小时控件死活不显示?什么原因?劳驾大师解惑?

 回到顶部
帅哥哟,离线,有人找我吗?
hbhb
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5054 积分:13031 威望:0 精华:0 注册:2014/5/15 21:34:00
  发帖心情 Post By:2015/11/27 13:16:00 [显示全部帖子]

请问如何单独打开事务编辑窗口?

 回到顶部
帅哥哟,离线,有人找我吗?
hbhb
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5054 积分:13031 威望:0 精华:0 注册:2014/5/15 21:34:00
  发帖心情 Post By:2015/11/27 16:50:00 [显示全部帖子]

没有搞明白?

 回到顶部
帅哥哟,离线,有人找我吗?
hbhb
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5054 积分:13031 威望:0 精华:0 注册:2014/5/15 21:34:00
  发帖心情 Post By:2015/11/27 18:29:00 [显示全部帖子]

大师:我想实现如下功能如何实现?
当天的事务如何通过右下角的弹窗提醒?
下面的计划中的代码能否帮助完善一下:

Dim tp As TimeSpan
Dim a1 As Date
Dim b As Date
Dim bl1 As Boolean
Dim bl As Boolean = getconfigvalue("自启动",bl1)

If bl = True Then
    Dim drh As new List(of DataRow)
    drh = DataTables("事务主表").Select("事务日期 = #" & Date.Today & "#")
    
    For Each a As DataRow In drh
        bl1 = a("提醒")
        a1 = format(Date.now,"g")
        b = a("事务时间")       
            tp = b - a1        
            If tp.TotalHours < a("提醒提前") And tp.TotalHours > 0 Then
             PopMessage("您" & tp.TotalHours & "后的事务为:" & a("内容"),"事务提醒",PopIconEnum.Infomation)                  
            End If      
    Next
End If

 回到顶部
总数 11 1 2 下一页