kwrl.net
当前位置:首页 >> 使用vB编写一个日历的功能? >>

使用vB编写一个日历的功能?

使用日历控件么?

用vb自带的calendar类就可以处理 Imports System Imports System.Globalization Public Class SamplesCalendar Public Shared Sub Main() ' Sets a DateTime to April 3, 2002 of the Gregorian calendar. Dim myDT As New DateTime(2002, 4, 3,...

label1.caption=format(now,"YYYY年MM月DD日 HH:mm:ss") '显示日期和时间 label1.backcolor=qbcolor(3) '背景颜色,想更细,也可以用RGB函数 label1.forecolor=vbRed '显示文字的颜色,也可以用QBcolor 或RGB函数

'以下是代码,其中将阳历转为农历的函数getLunarDate来自网络:Option Explicit' Public Function getLunarDate(Optional ByVal datetime As Date) As String Dim WeekName(7), MonthAdd(11), NongliData(99), TianGan(9), DiZhi(11), ShuXiang(...

DateTimePicker控件使您可以提供格式化的日期字段,使得进行日期选择很容易。另外,用户还可以从类似于MonthView控件的下拉式日历界面中选择日期。 DateTimePicker控件,有两种操作模式: 下拉式日历模式(缺省)—允许用户显示一种能够用来选择...

正好我以前写过一个类似程序,简单记录工作任务用的,不过是用MonthView,和DTPicker应该很类似,可以去下面的页面下载,带源码: http://www.namipan.com/d/JMSTask.rar/044dd7edda87ba9a655abda76db6f67f47a108ae952d0000

这个解答完全符合你的要求: 首先在默认form1窗体上画一个文本框text1、再画一个日历控件MonthView1,记得是MonthView1控件,你自己排列好它们两个的位置即可,一切都按默认(不用改属性)。然后复制以下代码到form1的代码窗口里运行即可看到结...

DateTimePicker控件使您可以提供格式化的日期字段,使得进行日期选择很容易。另外,用户还可以从类似于MonthView控件的下拉式日历界面中选择日期。 DateTimePicker控件,有两种操作模式: 下拉式日历模式(缺省)—允许用户显示一种能够用来选择...

给你个简便易行的代码。==========================PrivateSubForm_Load()While1DimyAsInteger,mAsInteger,dAsInteger,sAsDate,xAsInteger,rAsStringy=InputBox("请输入年份",,Format(Now,"yyyy"))m=InputBox("请输入月份",,Format(Now,"mm"))d=...

网站首页 | 网站地图
All rights reserved Powered by www.kwrl.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com