VB课程设计任务书03-趣味填数.docVIP

河北工业大学计算机软件技术基础（VB） 课 程 设 计 任 务 书 本题难度级别：B 实现基本要求代码: 约100行 主要涉及: 基本控件、数组及算法 一、设计题目：趣味填数（出题人：曹新国） 二、目的与要求1.目的培养学生综合利用语言进行程序设计的能力，主要是。基本要求3.创新要求在基本要求达到后，进行创新设计， 三、设计方法和基本原理 问题描述问题的解决方案Private Sub CmdFill_Click 主事件处理过程，按照指定的参数和选项进行填充，并输出结果。 Private Sub LoopFill Private Sub S_HorizonalFill Private Sub S_VerticalFill 实现S型水平、垂直和转圈填数的子程序，数组及行列数为窗体级作用范围，所以子程序不需要参数传递。 四、问题的描述Dim A As Integer说明一个空数组，等用户输入行数和列数后（分别记为M和N），使用：ReDim A 0 To M + 1, 0 To N + 1 　来确定数组的大小，之所以多出两行两列，是为了在判断边界时防止下标越界。填充的时候从A 1,1 开始填充，然后根据不同的填充方式，确定行和列的变化规律，然后将自然数依次填充到目标位置。基本算法如下所示： 共需要填充M*N个数 For I 1 To M * N 将要填充的数放入当前位置 A L, C I L和C为当前行和列，如果从左上角开始，其初值为1和1 如果已经填充完成，退出循环 If I M * N Then Exit For 查找下一个可用位置，规则是位置在阵列内且数值为0，然后调整L和C的值。 Next I 2. 在图片框上输出数据 在图片框P上输出文字可用图片框的Print方法，例如P.Print 123，则会在图片框P上的当前输出位置输出数字“123”。 当前输出位置可以用P.CurrentX和P.CurrentY属性来设置，左上角分别为0，0。 输出数字点用的宽度可以用P.TextWidth函数来检测，占用的高度可以用P.TextHeight函数来检测，例如：P.TextWidth “123” 可以得到输出“123”需要占用的宽度。 图片框本身的宽和高可以用P.Width和P.Height属性来得到。 至于图片框上输出文字的字号，可以用P.FontSize来设定，输出所使用的字体可以用P.FontName来指定，至于其它输出属性，比如色彩什么的，和Form的设定没什么不同。 3. 行数和列数的范围限制。 这个可以使用文本框的Validate事件来进行，当数值不在有效范围内时，可以使Cancel变量的值为True，则光标就不会离开文本框，直到用户输入了合法的数据。 五、参考资料 Visual Basic 程序设计教程 及 Visual Basic 实验教程 MSDN中文版，课程设计网站上提供的其它资料。 六、设计部分的评分标准（本题难度为B级，综合时要乘系数0.9） 完成基本要求前3项 70 基本要求全部完成 80 创新要求完成任意3项 90 创新要求完成4项或以上 100 [注：最后得分是根据本部分得分 占最大比例 以及课程设计期间纪律、设计报告书、答辩情况综合得出 VB课程设计任务书 – 趣味填数　 第1页共2页