vb结业作业.docx

1、vb结业作业VB 任课老师：陈 铭 班 级：11自动化 学 号：2011118149 姓 名：徐 淼1、 自定义类型数组应用的考核：（1） 自动义一个职工类型。包括职工号、姓名、工资三项内容。声明一个职工类型的动态数组，可输入n个职工的数据。当单击“添加”命令按钮，将文本框输入的内容添加到数组的当前元素中。（2）当单击“排序”命令按钮，将输入的内容按工资递减的顺序排序，并在图形框显示。 图1解答过程： 1、设计步骤：在工具箱一栏中寻找label、text、picture、command，将它们调成的合适并美观，得到如图所示界面： 2、属性设置：form、label.1、text.1、text.

2、2、text.3、picture.1、command.1、command.2，属性设置如图所示： 3、程序代码如图所示 4、运行时界面如图： 单击运行按钮出现如图所示界面： 输入一定的人数后出现最初设计的界面，在对应的text中填入：01 张三 30000 单击添加再输入02 李四 3500 单击添加再输入03 王五 3400，则可得到如图所示界面：2、 设计运行界面如图2所示的程序。当把“小纸条”拖动到“回收站”时，屏幕显示“要删除小纸条吗？”；当把“文件”拖动到“回收站”时，屏幕显示“要删除文件吗？”限定只能用鼠标左键才能拖动。 要求：用手工拖放模式实现，拖动时显示拖动图标（drag3pg

3、.ico）。 图2解答过程： 1、设计步骤：在工具箱一栏中寻找image，分别在form中添加image1，image2，image3，然后再各自的属性窗口中寻找picture点击添加相应的图片，得到如图所示界面： 2、属性设置：form、image1、image2，image3，属性设置如图所示： 3、程序代码如图所示： 4、运行时界面如图：3、 设计一个如图3所示的指针式时钟。 图3解答过程： 1、设计步骤：在工具箱一栏中寻找line，分别在form中添加line1，line2，line3，line4，timer然后再各自的属性窗口中改变对应的长短及宽度等，以及对应的属性设置，得到如图所示界面： 2、属性设置：form、timer、line1、line2、line3、line4，属性设置如图所示： 3、程序代码如图所示： 4、运行时界面如图：