学生管理系统中的特殊控件-statusbar，DTPicker，Monthview，MSH

Statusbar控件

1. ? ?添加? 工程—部件—Microsoft? common ?dialog control 2.6

2. ? Statusbar控件又称状态栏。利用statusbar控件可以方便的显示有关窗体上查看的对象，对象组件的信息或关系到对象操作各种 ? ? ? ? 状态数据，也可以利用statusbar记录其他控件的属性。一个statusbar是由多个窗格组成，最多可以被分为16个窗格。

? ? ? ?对statusbar控件点击右键，再点击属性，出现属性对话框，通过插入窗格和删除窗格来控制窗格的数量。

? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?

? ? ? ? ? 在学生管理系统中，主窗体下就用到了这个控件，其中可以添加自己的姓名，年月日和时间等相关信息。

? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?

DTPicker控件和MonthView控件

1.??????添加工程—部件—Microsoft windows common controls 2.6

2.??????DateTimePicker?控件显示日期和/或时间信息，并且可以作为一个用户用以修改日期和时间信息的界面。控件的显示包含由控 ? ? ? ? ? ?件格式字符串定义的字段。当下拉?DateTimePicker?控件时，将会显示一个?MonthView?日历。???

3.??????该控件有两种不同的模式：????

? ? ? ? ?下拉日历模式（缺省）——使用户能够显示下拉的日历，以便用于选择日期。?

? ? ? ? ?时间格式模式——使用户能够在日期显示中选择一个字段（即月、日、年等），并通过按下控件右部的上/下箭头来设置其 ? ? ? ? ? ? ? ? ?值。???

? ? ? ? ? UpDown?属性决定了控件属于何种模式。当?UpDown?被设为?False时，控件就属于下拉日历模式（缺省值）。如果?UpDown?属 ? ? ? ? ?性被设为?True，那么DateTimePicker?就属于时间格式模式。??

? ? ? ? ? MonthView 控件可以用来创建一个能够让用户通过日历风格的界面查看和设置日期信息的应用程序。右击MonthView控件，选 ? ? ? ? ? 择“属性”，然后在出现的属性页中就可以设置MonthView的各种属性了。

? ? ? ? ?在学生管理系统中，使用这两个控件显示日期会比较方便。而且需要注意的是入校日期需要小于出生日期。代码如下

? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?Dim date1 as date

? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? Dim date2 as date

? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?date1 =DTPickerborn.value

? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? date2 = DTPickerruxiao.value

? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? if DateDiff("d",CDate(date1),CDate(date2)) < 0 then

? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?msgbox "还没有出生怎么可能入校呢？请认真输入！",vbOKonly +vbexclamation,"警告"

? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? exit sub

? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? end if

MSHFlexGrid控件

1.添加工程—部件—Microsoft Hierarchical Flexgrid control 6.0

2. MSHFlexGrid控件显示和操作表格数据。你可以在中的任何单元放置文本、图片或这二者。Row和Col属性指定 ? ? ? ? ? ? 控件的当前单元。你可以在代码中指定当前单元，也可以在运行时使用鼠标或键盘改变当前单元。Text属性引用了当 ? ? 前单元中的文本。

? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??