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


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

主题:关于库存表

美女呀,离线,留言给我吧!
L7
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:32 积分:272 威望:0 精华:0 注册:2013/5/7 11:19:00
关于库存表  发帖心情 Post By:2013/5/14 9:00:00 [只看该作者]

如何实现盘点表中的月末库存与库存表中的月初库存之间的转换?库存表时个视图,实际上月末库存也相当于月初库存,只是月份不一样而已


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


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

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

 回到顶部
美女呀,离线,留言给我吧!
L7
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:32 积分:272 威望:0 精华:0 注册:2013/5/7 11:19:00
  发帖心情 Post By:2013/5/14 9:11:00 [只看该作者]

问题是比如月末是三月的  那么月初的库存也就是三月月末的库存   库存表里的月初库存字段就是从盘点表里的月末库存里提取出来的,现在是月份与时间转换不过来


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


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

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

 回到顶部
美女呀,离线,留言给我吧!
L7
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:32 积分:272 威望:0 精华:0 注册:2013/5/7 11:19:00
  发帖心情 Post By:2013/5/14 9:22:00 [只看该作者]

字符串的 


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | 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("一月"))
这样就可以了.

 回到顶部
美女呀,离线,留言给我吧!
L7
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:32 积分:272 威望:0 精华:0 注册:2013/5/7 11:19:00
  发帖心情 Post By:2013/5/14 9:40:00 [只看该作者]

我试下  谢谢


 回到顶部
美女呀,离线,留言给我吧!
L7
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:32 积分:272 威望:0 精华:0 注册:2013/5/7 11:19:00
  发帖心情 Post By:2013/5/14 9:42:00 [只看该作者]

我的入库时间是日期型的

 回到顶部
美女呀,离线,留言给我吧!
L7
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:32 积分:272 威望:0 精华:0 注册:2013/5/7 11:19:00
  发帖心情 Post By:2013/5/14 9:47:00 [只看该作者]

应该可以说是月份与日期之间的转换,我用你圆点符号,没转成功,应该是我写的代码问题


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | 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("十一月"))


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