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,...

'以下是代码,其中将阳历转为农历的函数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(...

在左边工具栏单击右键-部件-Microsoft Calendar Control 8.0勾选-应用-确定。 左边工具栏就多了一个工具,就可以用了哦~~

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

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

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

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

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

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