- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 逛逛老师日历事务标签增加分区功能 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=122417)
-- 发布时间：2018/7/25 9:28:00
-- 逛逛老师日历事务标签增加分区功能
逛逛老师日历事务标签增加分区功能，现在的事务条不管开始时间都是从最上面依次排列（如图，晚上19:00事务）。能否增加功能，让以中午12:00为分区值，日历单元格分为两个部门，12:00之后事务的事务标签在下半区，反之在上半区，自己尝试一下，不成功，求教，谢谢！
j = Height \\ _事务标签_高度
If dc(str).Count > j Then \'如果标签的数量单元格可容纳的标签数
For i = 0 To j - 2
a = New 事务标签
a.SetData(dc(str)(i))
If CDate(str).Hour < 12 Then
a.Top = Top + _事务标签_高度 * i + 2
Else
a.Top = Top + _事务标签_高度 * i + 2 - 50
End If
......
此主题相关图片如下：事务条.png
-- 发布时间：2018/7/25 9:34:00
--
实例发上来测试。
-- 发布时间：2018/7/25 9:37:00
--
不建议你这样做，这样要改的代码比较多。
如果仅仅是希望按照时间排列，控制一下顺序不就好了？
-- 发布时间：2018/7/25 9:41:00
--
目前是按时间排序，就是想如果事务发生在下午，则单元格上部分空白，这样可以更直观，谢谢
-- 发布时间：2018/7/25 9:42:00
--
以下是引用一笑在2018/7/25 9:41:00的发言：
目前是按时间排序，就是想如果事务发生在下午，则单元格上部分空白，这样可以更直观，谢谢
目前是按时间排序，就是想如果事务发生在下午，则单元格上部分空白，这样可以更直观，谢谢
不要改变位置，这样改的代码比较多。你可以试试设置其背景颜色，用不同的背景标注。