1.设计一个如图所示的成绩录入程序。

要求利用文本框的lost focus事件检查录入的成绩是否有效。

如果录入的成绩介于0~100之间则可以继续输入，否则清除原数据，并且要求重新输入。

底部的5个复选框用来设置参加合计的课程成绩。

2.设计一个用户界面如图所示，用于将学生学习的课程在列表框中显示出来，要求程序有以下功能：a)单击“添加”按钮，若文本框“Text1.text”中不是空格串，并且在列表中也没有，则将课程添加到列表框中去。

b)单击“删除”按钮，删除列表框中被选中的并显示在文本框中的课程名称。

c)单击“统计”按钮，统计课程列表框中的课程数量，并显示在文本框“Text2.text”中。

d)单击“结束”按钮，结束程序运行。

3.设计一个偶数迁移程序，运行界面如图所示。

要求如下：a.单击“产生”按钮，随机产生10个两位正整数，并添加到左边的列表框(list1)中。

b.单击“→”按钮，或双击list1,将list1中的所有偶数迁移到list2中。

c.单击“清除”按钮，清除list1和list2中所有的项目。

4. 设计如图所示窗体form1,在窗体上画一个名称为lst的列表框，通过属性窗口向列表框添加“中国”、“日本”、“新加坡”、“澳大利亚”、“美国”五个项目；在列表框右侧上方画一个名称为text1的文本框，并使其内容空白；在文本框下方画两个名称分别为c1和c2、标题分别为“修改”和“添加”的命令按扭。

程序运行时要求：单击“修改”按钮时文本框text1中显示列表框中选中项目内容，同时列表框移除该项；单击“添加”按钮时，将文本框修改后的内容添加在列表框中列表的末尾。

保存窗体文件xg.frm,工程文件为xg.vbp.5. 设计如图所示窗体form1,在窗体左边画两个名称为t1、t2的文本框，文本框内显示空白；在窗体右下方画一个名称为c1的命令按扭，按扭的标题为“复制”。

编写适当的事件过程，使得在运行时，选定t1中任意文本后，单击命令按扭c1,文本框t2中显示t1中所选定的文本。

6.设计如图所示窗体form1;在窗体内画一个名称为lb的标签，其标题为“选择字体”，三号字、倾斜；在标签的下方画一个名称为cb的组合框，设置适当属性使其成为下拉式列表框，并通过属性窗口向下拉式列表框添加“宋体”、“黑体”、“楷体_GB2312”“隶书”四个项目。

编写适当的事件过程，使程序运行后，当选中下拉式列表框中某项时，lb标题上就显示该项的字体。

7.在FORM1的窗体上画一个文本框，名称为Text1。

画一个命令按钮，名称为C1，标题为“显示”，它的Tabindex属性设为0。

请为C1设置适当的属性，使得当焦点在C1上时，按ESC键就调用了C1的Click事件，该事件过程的作用是在文本框中显示“计算机”。

把工程文件名为：test6-1.vbp，窗体文件名为test6-1.frm。

程序中不得使用任何变量。

界面如下：8.在窗体上画一个文本框，名称为text1,高度为350，宽度为2000，字体为“黑体”，并设置其它相关属性，使得在运行时，在文本框中输入的字符都显示为“？”，且最多允许输入5个字符。

工程文件名保存为“test6-2.vbp”，窗体文件名为“test6-2.frm”。

界面如下：9.在窗体上画两个命令按钮，名称分别为C1，C2，标题分别为“按钮1”、“按钮2”，其中“按钮2”的初始状态为无效。

请编写适当的事件过程，使得在运行时单击“按钮1”，则使得“按钮2”变为有效。

程序中不得使用任何变量。

10.在窗体FORM1上创建一个名称为L1的标签控件，在程序运行时，标签上的字符为右对齐方式，标签的底色为白色。

请按下述要求在属性窗口中设置。

初如界面如下：11.在窗体FORM1上建立一个名称为C1，标题为“隐藏”的命令按钮，要求通过在属性窗口设置相应的属性，使得命令按钮在运行时不可见。

12.在窗体上画一个文本框，其名称为text1，text属性为空白。

再画一个命令按钮，其名称为C1，visible属性为false。

编写适当的事件过程。

程序运行后，如果在文本框中输入字符，则命令按钮出现。

运行结果如下：13.在窗体上画二个文本框，名称分别为TEXT1，TEXT2。

请设置适当的控件属性，并编写适当的事件过程，使得在运行时，如果在TEXT1中每输入一个字符，则显示一个“＊”，同时在TEXT2中显示输入的内容。

程序中不得使用任何变量。

14.在名称为FORM1的窗体上画一个文本框，名称为TEXT1；再画一个命令按钮，名称为C1，标题为“移动”。

请编写适当的事件过程，使得在运行时，单击“移动”按钮，则文本框水平移动到窗体的最左端。

程序中不得使用任何变量。

15.在窗体FORM1上创建一个图片框控件和两个命令按钮，命令按钮的标题分别为“打印”和“清空”。

在程序运行后，点击“打印”按钮，在图片框中打印出“VB考试系统”；点击“清空”按钮，清空图片框。

16.在名称为form1的窗体上画二个文本框，名称分别为text1,text2，都显示垂直滚动条，都可以显示多行文本；再画一个命令按钮，名称为C1，标题为“复制“。

请编写适当的事件过程，使得在运行时，在text1中输入多行文本后，单击“复制”按钮，就把text1中的文本全部复制到text2中。

程序中不得使用任何变量。

17.在窗体上建立一个文本框，名为T1，通过设置相应的属性，使得在运行时，文本框被禁止输入。

再建立一个命令按钮，标题为“可用”。

单击它时，文本框变为允许输入。

18.设计如下图所示，在窗体内置一个名为txt文本框，文本框内显示空白，宽度为1750；文本框下方置一个标签label1，其文本内容居中显示，编写文本框的change事件过程，使得在运行时，在文本框中输入字符，标签中均显示其大写字母。

注：程序中不能使用任何变量。

19.在text1文本框中输入自然数N的值，单击“判断”命令按钮右边的label2标签中显示N的值是否为素数。

（如果是显示yes,不是显示no）20.在窗体上创建四个文本框，分别为T1，T2，T3，T4;和一个命令按钮，标题为“判断”，要求编写适当的程序，当在文本框T1，T2，T3中输入三个数后，单击命令按钮，会判断这三个数是否大于0（若小于等于0，会在文本框T4中提示“请输入大于0的数”）；同时判断能否够成一个三角形，并在文本框中做相应的显示。

21.在文本框TEXT1中输入自然数的值，单击“判断”命令按扭，在文本框中TEXT2显示的值是否为素数。

22.分别在TEXT1、TEXT2文本框中输入自然数M、N的值，单击“求最大公约数”命令按扭，在LABEL3标签中显示最大公约数。

23.分别在文本框TEXT1,TEXT2中输入的值，单击命令按扭“多项式F(X)的值为”后，在文本框TEXT3中输出f(x)=(n+1)x^n+nx^(n-1)+.....+2x+1的值。

24.在文本框TEXT1中输入N 的值,单击"S="命令时,在文本框TEXT2中输出:1+(1+1/3)+(1+1/3+1/5)+.....+(1+1/3+1/5+...+1/(2*n-1))的值.25.在文本框TEXT1中输入N 的值,单击"S="命令时,在文本框TEXT2中输出:1+1/3!+1/5!+….+1/(2*n-1)!的值。

26.求100到头999之间水仙花数27.求Fibonacci 数列的第N项的值。

28.单击“产生矩陈”按扭时，从键盘上输入矩陈的值并显示如上，单击“转置矩陈”按扭时，求刚产生的矩陈的转置矩陈并显示如上。

29.编一子过程，用于判断一个字符串是否是回文。

所谓回文是指顺读与倒读都一样。

如“ABCDCBA”30.阅读下列程序：Private sub form_click()Dim m as integerStatic n as integerFor I=1 to 3n=n+im=m+i^2nextprint m,nend sub程序运行时，单击三次窗体，输出的结果是：?31.sub med(x%, byval y%)x=3*x : y=x+yend subprivate sub form_click()dim a%,b%a=3: b=8med a,bprint a,bend sub运行后，单击窗体，输出结果为：?32.从键盘上输入14、18、24、37、41、54、56、66、78、99这十个数到数组A中，编写一个子程序查找数。

33.设计如图所示窗体在窗体form1上方置一名称为cal的下拉式菜单“计算”（含下一级名称为ADD的“加法”菜单项；名称为sub 的减法菜单项）、及名称为clean的菜单“清除”；另分别添加标题为“操作数1”、“操作数2”、“计算结果”的标签Label1、Label2、Label3和空白的标签Label4（其中Label1、Label2、Label3无边框，Label4有边框）；在“操作数1”、“操作数2”右方分别添加文本框Text1、Text2。

程序运行时要求：分别在文本框Text1、Text2中输入数字，选择相应的“加法”或“减法”菜单项后，在Label4中显示相应的运算结果；选择“清除”菜单，清除文本框Text1、Text2和Label4中的内容。

34.设计如图所示窗体，在窗体form1上方置一名称为ed、标题为“编辑”的下拉式菜单。

设置其下一级名称为cp、标题为“复制”、快捷键为ctrl +c的菜单项和名称为ps、标题为“粘帖”、快捷键为ctrl +v的菜单项。

另在窗体内添加一个文本框text1。

程序运行时要求：选择菜单内的“复制”或“粘帖”菜单项后，在文本框中可以实现相应功能。

35.把第三题的下拉式菜单改为弹出式菜单，其它的一样。

36.编写一段用于设置字体属性的程序，要求如下：a)启动工程后，自动在“字体”列表框中列出当前系统中可用的屏幕字体供用户选择。

b)“字号”简单组合框中列出部分字号供用户造反默认值为10磅，用户也可根据需要要文本框中直接输入字号大小。

c)通过滚动“红”“绿”、“蓝”3个水平滚动条可以设置字体颜色。

d)两个“底纹”单选按扭，一个用于取消底纹设置，一个用于设置红色底纹。

e)所做的任何设置都要“示例”选项卡中立即显示效果，单击“取消”按扭恢复初始设置，单击“确定”按扭将结束工程。

37.设计一个类似WINDOWS 的滚动字幕屏幕保护程序，要求用一个时钟控件和一个滚动条来调节和控制其滚动速度，文字的大小、颜色和距离窗体顶端的距离是随机的，从右向左连续滚动，程序运行结果如下所示。

38. 模拟电子秒表。

当单击“开始”按扭，计时开始，单击“停止”按扭，终止计时。