初中九年级信息技术 活动2 设置万年历程序

活动2设计万年历程序目录CONTENTS12绘制程序界面实现日历功能

在VB中，除了可使用VB自带的内部控件之外，还可使用外部控件来设计制作程序。本活动利用VB的外部控件—“Microsot日历控件11.0”来编写一个“万年历”程序。活动分析利用外部控件编写VB程序，首先要将外部控件导入VB的工具箱中，然后即可像使用内部控件一样使用该控件来设计程序。本活动分为以下2个阶段来进行。1.绘制程序界面：在控件工具箱中添加日历控件，绘制日历程序的界面。2.实现日历功能：利用日历控件编写程序，实现万年历功能。一、绘制程序界面在窗体上绘制程序界面，一般需要使用控件。在VB中，既可以使用系统自带的控件，也可以使用外部控件。研究室如图2.2.1所示，通过标签来显示程序名称，使用框架来布局，通过日历控件，显示某年的具体日期及对应的星期。添加日历控件在VisalBasic中，系统没有的控件需要先添加才能使用，如日历控件、媒体播放控件等。1.新建工程文件按图2.2.2所示操作，运行VB软件，新建“标准EXE”2.调整窗体大小按图2.23所示操作，将窗体的大小设置为“4880*6330°。3.添加日历控件按图2.2.4所示操作，打开“部件”对话框，并在工具箱中添加日历控件。绘制控件对象新增的外部控件和VB自带的内部控件一样，都放置在控件工具箱中，在窗体上绘制控件对象的方法也一样。1.绘制标签按图2.2.5所示操作，在窗体上部绘制一个标签Labell.

2.绘制框架控件按图2.2.6所示操作，在Labell的下方制作框架Framel，调整好框架的大小和位置。3.绘制日历控件按图2.2.7所示操作，在框架中绘制日历对象。

4.调整对象分别调整好窗体Foml、标签检件Label、框架控件Famel、日历检件Calentdarl的大小和位置。二、实现日历功能软件界面设计好之后，需要编写代码才能实现自己想要的功能，如通过自己设计的电子万年历查看年、月、日。如图2.2.8所示，选中的对象是窗体，窗体有多种事件，目前选中的是加载事件，当窗体载入计算机时，代码执行，将日历控件设置为当前的日期。加工坊美化程序界面日历控件对象属性除了可以通过“属性”窗格来设置，还可以通过日历控件的属性对话框来完成，而后者更方便。1.设置窗体标题按图2.2.9所示操作，设置窗体的Capion的属性为“万年历”。2.设置标签内容按图2.2.10所示操作，设置标签的Caption的属性为“万年历”。3.设置标签居中按图2.2.11所示操作，设置标签文本的对齐方式为“居中”。4.设置标签字体状图2212所示成作”的文本格式微软黑雅、粗体、小一号”。5.设置标签颜色按图2.2.13所示操作，设置标签的ForeColor属性为“暗红色”。

6.设置日历控件属性按图2.2.14所示操作，打开日历对象Calendarl的“属性页”对话框，将星期标题字体颜色设置为暗青色。

7.设置日历控件属性按图22.1522.15所示操作，打开日历对象Calendarl，选中“颜色”选项卡，将日期的字体颜色设置为“红色”。编写测试程序“万年历”程序要求一开始就切换到当前日期，因此相关代码要放在窗体的Load过程中才能实现这样的功能。1.编写代码右击“万年历”窗体上任意对象，按图2.2.16所示操作，在窗体对象Form的Load过程中输入代码“Calendarl.Value=Date”、2.保存文件单击“标准”工具栏上的“保存”接钮，将窗体和工程文件保存在文件失中。3.测试程序单击“标准”工具栏上的“运行”按钮”，按图2.2.17所示操作，运行“万年历”程序，观察发现2016年10月24日为星期一。4.停止程序单击“常用”工具栏上的“停止”按钮”，停止执行程序。1.打开“个性万年历bp”文件，设置日历中的星期为中文，效果如图2.2.18所示。2.为打开的“个性万年历xbp”设置日历背跟颜色，效果如图2.2.19所示。1.代码编辑器代码编维器的作用就是用来编写应用程序代码。设计程序时，当用鼠标点击窗体设计器中的窗体或窗体上的某个对象时，代码编辑器将显示在VB集成环境中，如图2.2.20所示。3.窗体事件窗体最常用的事件有3种：Click（单击）、DbiClick（双击）和Losd（加载）。Click（单击）单击鼠标左键时发生的事件。在程序运行后，当单击窗体内的某一个位置时，将触发该事件。·DblClick