| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 604 人关注过本帖
标题:不用控件的情况下,仅靠按钮和标签怎么制作日历?
只看楼主 加入收藏
mrye
Rank: 2
等 级:论坛游民
帖 子:14
专家分:36
注 册:2013-3-21
结帖率:100%
收藏
已结贴  问题点数:20 回复次数:9 
不用控件的情况下,仅靠按钮和标签怎么制作日历?
RT,我知道很麻烦,但真的请大家帮帮忙。

[ 本帖最后由 mrye 于 2013-3-21 23:48 编辑 ]
搜索更多相关主题的帖子: 标签 日历 
2013-03-21 16:28
mrye
Rank: 2
等 级:论坛游民
帖 子:14
专家分:36
注 册:2013-3-21
收藏
得分:0 
怎么没人帮小白解决啊?真的很想试试呢

各位大神帮帮忙吧
2013-03-21 23:48
seafish011
Rank: 7Rank: 7Rank: 7
等 级:黑侠
威 望:1
帖 子:167
专家分:694
注 册:2011-11-8
收藏
得分:0 
日历这些花点心思就可以了。例如:简单些的就弄个数组label(),然后用weekday判断相应月份的第一天是星期几返回一个值再做运算,当然你得计算出相应月份的天数。
2013-03-22 06:12
mrye
Rank: 2
等 级:论坛游民
帖 子:14
专家分:36
注 册:2013-3-21
收藏
得分:0 
回复 3楼 seafish011
求代码,谢谢大神了
2013-03-22 10:52
wp231957
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:神界
等 级:贵宾
威 望:423
帖 子:13688
专家分:53332
注 册:2012-10-18
收藏
得分:0 
现成的日历控件多好啊

DO IT YOURSELF !
2013-03-22 10:54
mrye
Rank: 2
等 级:论坛游民
帖 子:14
专家分:36
注 册:2013-3-21
收藏
得分:0 
回复 5楼 wp231957
现成的不能扩大,我要弄半屏幕的那么大
2013-03-22 11:44
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:364
帖 子:4947
专家分:30084
注 册:2008-10-15
收藏
得分:10 
用标签排 0-34 ,共35个,每行 7个,共5个。
按顺序摆。

1、初始化。年月,计算 1日是星期几?
计算本月有多少天。  下月1号减1,然后取 天 就是本月天数。
2013-2 :   day(#2013-3-1#-1)

如,你日历里,每周是1开始,经星期日结束。取1号是星期几,VB 也有函数
那么,如果 1日是 星期一,那就 0下标 显示1,1下标 显示2
如果 1日 是星期三,那么 0下标和1下标 就隐藏,2下标 显示1 。 以此类推。
尾部没用的标签也全部隐藏。
用三个循环,就排完它来。
for i=0 to 星期几-1
   隐藏
next i
for i=星期几 to 月总天数+星期几
  显示内容
next i
for i=月总天数+星期几+1 to 34
  隐藏
next i

2、事件。 点击后,返回 点击了的标签的显示的内容就是 日期。

代码应该很简单。

授人于鱼,不如授人于渔
早已停用QQ了
2013-03-22 16:06
seafish011
Rank: 7Rank: 7Rank: 7
等 级:黑侠
威 望:1
帖 子:167
专家分:694
注 册:2011-11-8
收藏
得分:10 
详细功能自己添加吧
自制日历.rar (2.83 KB)
2013-03-22 19:16
mrye
Rank: 2
等 级:论坛游民
帖 子:14
专家分:36
注 册:2013-3-21
收藏
得分:0 
回复 7楼 风吹过b
谢谢,经你这么说大致明白怎么弄了。万分感谢
2013-03-23 00:02
mrye
Rank: 2
等 级:论坛游民
帖 子:14
专家分:36
注 册:2013-3-21
收藏
得分:0 
回复 8楼 seafish011
谢谢,辛苦你了。万分感谢。
2013-03-23 00:03
快速回复:不用控件的情况下,仅靠按钮和标签怎么制作日历?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.031600 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved