《VisualBasic程序设计教程》自学指导书

对于k = I—1到1步骤—1打印k； 7

下一个k打印下一个I结束子

6。从键盘输入两个正整数m和n，找出最大的公共因子答:程序如下: 私有子窗体_ click () dimm。Nasinteger

m = inputbox(“请输入m的值”)m = val (m) m1 = m n = inputbox(“请输入n的值”)n = val(n)n1 = n Do While n 0提醒= m Mod n m = n n =提醒循环

打印m1；和的最大公因数是:\\结束子

。这个程序通过轮换除法找到两个正整数的最大公因数。程序运行后，在输入对话框中分别输入96和64，输出结果为:96和64的最大公因数为:32

7。从键盘输入学生的学号和考试结果，然后输出学生的学号和结果。并且根据结果，按照以下规定，学生的评语将被输出:

分数80~100 60~79 50~59 40~49 0~39评语私有子窗体_ click () n = inputbox(“请输入学生编号”)s = inputbox(“请输入分数”)如果s > = 50则

msgbox \\学生编号\\分数\\ MsgBox \\学生编号\\分数\\ ElseIf s >= 50