Foxtable(狐表)用户栏目专家坐堂 → 关于库存表


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

主题:关于库存表

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/14 9:05:00 [显示全部帖子]

多加一个列, 存 "月初" "月末"  那不就很好的分辨出来啦吗?

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/14 9:14:00 [显示全部帖子]

这个很好转啊.你是存的字符串 "一月" "二月" 还是  日期格式 2013-03-30?

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/14 9:31:00 [显示全部帖子]

Dim ms As new Dictionary(of String,String)
For i As Integer=1 To 12
   ms.Add(CLNum(i) & "月",CLNum(i+1) & "月")
Next
ms("十二月")="一月"
MessageBox.Show(ms("一月"))
这样就可以了.

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/14 9:49:00 [显示全部帖子]

Dim ms As new Dictionary(of String,String)
For i As Integer=1 To 10
   ms.Add(CLNum(i) & "月","#" & Date.Today.Year & "-" & (i+1) & "-1#")
Next
ms.Add("十一月","#" & Date.Today.Year & "-12-1#")
ms.Add("十二月","#" & Date.Today.Year & "-1-1#")
MessageBox.Show(ms("十一月"))


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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/14 10:36:00 [显示全部帖子]

我试了 可以正常获得上一个月的时间一点问题都没. 我不知道你怎么应用的.  实在不会就发例子吧.

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/14 10:50:00 [显示全部帖子]

我测试都是没问题的,你不要生搬硬套哦.

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/14 10:55:00 [显示全部帖子]

不是写在哪里的问题,你还是把例子发出来吧.. 

 回到顶部