计算机二级考试题库：VB程序题.doc

编写一个复制字符串的程序,如图 x_17.jpg 所示。 界面要求： * 使用文本框、命令按钮完成. 运行要求： 1、点击“清除”按钮，将所有的文本框内容清空； * 2、点击“复制”按钮,如上面文本框有选中的文本，则将选中的文本复制到下面文本框中， 否则，将上面文本框所有内容复制到下面文本框中。 （此题要求上载窗体文件，不要求填写程序运行结果)编写程序： * 使用冒泡法，对数组ia（1)=8,ia(2）=6，ia（3）=9,ia(4）=3,ia（5）=2，ia(6）=7 从小到大排序，并以紧凑格式在一行上输出。编写一个秒表程序，如图 K_309.jpg 所示。 界面要求： * 使用一个标签、两个命令按钮、一个时钟控件完成。 运行要求: * 1、点击“开始计时按钮，开始计时,标签中显示时间，时间精度是百分之一秒； 2、点击“结束计时”按钮，停止计时。 * 3、未计时时,“开始计时按钮可用，“结束计时”按钮不能用。 * 计时过程中，“开始计时按钮不可用，“结束计时按钮能用。 * （此题要求上载窗体文件,不要求填写程序运行结果)编写程序: 利用随机函数产生20个1099之间（包括10和99）的随机整数存入一维数组A， 找出其中的最大值和最小值.编写程序： 求出斐波那契数列前9项的和。 提示:前两项为：0，1,从第3项开始，每一项均为其前两项的和（即：0+1+1+2+3+5+.。)。编写一个字母转换的程序，如图 K_401。jpg 所示。 界面要求： * 使用文本框、命令按钮控件完成。 * 运行要求: * 在文本框1中输入任意字符串； 点击“字母转换按钮，将小写字母转换成大写字母，大写字母转换成小写字母,其余字母不变， * 并在文本框2中显示转换后的字符串. * （此题要求上载窗体文件,不要求填写程序运行结果)编写程序： * 设窗体上有一命令按钮控件Command1,对其Click事件设计一事件过程。 * 求二维数组A（1 To 6， 1 To 6)的最大元素值所在位置（即：行号和列号），并在窗体上输出其结果. 数组元素值为0，100内（包括0和100）的随机整数。编写程序： 打印出以下图案。 + * + * + * (此题要求有源程序，不要求填写程序运行结果)编写一个登录的程序，如图 K_774。jpg 所示。 * 界面要求: 使用标签，文本框，命令按钮完成,对输入的密码用“”显示. 运行要求： 1、输入帐户：张三 * 2、输入密码：123456 3、点击“确定按钮时进行判断. * 如果帐户和密码都对，使用MsgBox显示“此帐户通过验证”； 如果帐户对密码不对，使用MsgBox显示“密码错误，清空密码重新输入； 如果帐户不对,清空帐户和密码输入框，使用MsgBox显示“此帐户不存在”， * 并将焦点重新定位到帐户输入框. 4、点击“取消”按钮，则结束程序运行. * (此题要求上载窗体文件，不要求填写程序运行结果）编写程序： 设窗体上有一命令按钮控件Command1,对其Click事件设计一事件过程. * 统计二维数组A（1 To 6, 1 To 6)的所有值是偶数的元素的个数，并在窗体上输出其结果。 数组元素值为0，100内（包括0和100）的随机整数。编写程序：l 使用双重循环，求100，160以内的素数并以紧凑格式在窗体上一行输出，然后计算出个数s.编写一个分类统计的程序，如图 K_115。jpg 所示. * 界面要求： 使用文本框、命令按钮完成。 运行要求： * 1、在文本框中输入若干英文字符串； * 2、单击“统计”命令按钮后，判断文本框中“H到“S之间各个英文字母（不区分大小写）出现的次数，并输出到窗体上。 （此题要求上载窗体文件，不要求填写程序运行结果)编写程序： * 用随机函数产生10个50以内（包括50）的随机整数存入一维数组，从键盘输入一个数， 然后用顺序查找法,统计该数在一维数组中出现的次数.编写程序，输出下列三角形： 1 111 11111 1111111l （此题要求有源程序，不要求填写程序运行结果) 编写一个根据月份求月天数的程序，如图 x_7b.jpg 所示。 * 界面要求： 使用文本框,标签，命令按钮完成。 * 运行要求: 1、点击“天数”按钮，结果文本框中显示今年(2007年)该月份的天数; * 2、点击“结束”按钮，则结束程序运行。 （此题要求上载窗体文件，不要求填写程序运行结果）编写程序： 设窗体上有一命令按钮控件Command1，对其Click事件设计一事件过程。 * 求二维数组A（1 To 6, 1 To 6)的偶数行上元素之和并在窗体上输出其结果。 数组元素值为0，100内（包括0和100)的随机整数.编写程序： 计算并输出下面级数前n项（n=50)中偶数项的和。 12+2*3+34+4*5+n*(n+1)+编写一个同时显示日期和时间的程序，如图 K_7844.jpg 所示. * 界面要求： * 使用标签、命令按钮、时钟控件完成。 * 运行要求： 点击“显示日期和时间”按钮，标签开始显示日期和时间（上、下居中，左右居中). (此题要求上载窗体文件，不要求填写程序运行结果）编写程序： * 用随机函数产生10个110之间（包括1和10）的随机整数存入一维数组A， * 通过键盘输入数值m，然后用A(m）的值作为下标，打印出对应数组元素的值。编写程序： 计算并输出下面级数前n项(n=50）的部分和。 1*2+23+34+4*5+n*(n+1）+编写一个程序，如图 K_204.jpg 所示。 界面要求: * 使用文本框、命令按钮控件完成。 运行要求： 1、Text1中随机产生500以内的整数； 2、点击“验证”按钮,当Text1中输入的数据小于300时,Text2显示Text1中的数据， 否则，使用MsgBox显示“重新计算”,并使焦点重新回到Text2上。 (此题要求上载窗体文件,不要求填写程序运行结果）编写程序： 已知一个具有10个整数的一维数组，各元素值随机产生（范围在10，99内)， * 找出第一个偶数所在的位置及其值，然后输出.如果未找到就输出”not found。编写程序： * 计算并输出下面级数前n项(n=50）的部分和。 12+2*3+3*4+4*5+n（n+1)+利用随机函数产生20个1099之间（包括10和99）的随机整数存入一维数组A，将其排序，求出相邻两个数的最大差值。* 求出斐波那契数列第20项和第30项的和是多少。 提示：前两项为：0，1,从第3项开始，每一项均为其前两项的和（即：0+1+1+2+3+5+.。）.设窗体上有一命令按钮控件Command1，对其Click事件设计一事件过程. 统计二维数组A（1 To 6, 1 To 6)第一列所有元素中奇数元素的个数，并在窗体上输出其结果。 数组元素值为0，100内（包括0和100）的随机整数。设窗体上有一命令按钮控件Command1，对其Click事件设计一事件过程. * 统计二维数组A（1 To 6， 1 To 6）第一列所有元素中奇数元素的个数，并在窗体上输出其结果。 * 数组元素值为0，100内（包括0和100）的随机整数。界面要求: 使用标签,文本框，命令按钮完成. 运行要求： * 点击“累加”按钮，将文本框中输入的数字累加，显示到下方的标签中。 * （此题要求上载窗体文件，不要求填写程序运行结果）界面要求: 使用标签、命令按钮、时钟控件完成. * 运行要求： * 点击“显示日期和时间”按钮,标签开始显示日期和时间（上、下居中，左右居中)。 (此题要求上载窗体文件,不要求填写程序运行结果）编写程序： * 打印出以下图案。 A ABC ABCDE ABCDEFG ABCDE ABC Al (此题要求有源程序，不要求填写程序运行结果）界面要求： * 使用标签、文本框、命令按钮控件 运行要求： 单击“产生随机数”按钮，文本框中随机产生10，10范围内的整数10个; * 单击“统计”按钮,使用标签分别显示正数和零的个数、负数的个数。 （此题要求上载窗体文件，不要求填写程序运行结果）编写程序： 计算并输出下面级数前n项中（n=50）偶数项的和。 123+234+3*45+n*(n+1）（n+2)+编写一个复制字符串的程序，如图 x_17.jpg 所示。 * 界面要求： * 使用文本框、命令按钮完成。 运行要求： * 1、点击“清除按钮,将所有的文本框内容清空； * 2、点击“复制”按钮，如上面文本框有选中的文本，则将选中的文本复制到下面文本框中， 否则，将上面文本框所有内容复制到下面文本框中。 （此题要求上载窗体文件，不要求填写程序运行结果）编写程序： * 使用冒泡法,对数组ia（1）=8,ia(2）=6，ia(3）=9，ia(4)=3,ia(5）=2，ia(6）=7 从小到大排序，并以紧凑格式在一行上输出。编写程序： 打印出以下图案。 2 222 22222 2222222 22222 222 2 （此题要求有源程序，不要求填写程序运行结果）编写程序: * 求一个44的整型矩阵的所有元素的平均值。(其中矩阵元素随机产生）编写一个程序，如图 K_204.jpg 所示。 * 界面要求: * 使用文本框、命令按钮控件完成。 运行要求： * 1、Text1中随机产生500以内的整数; 2、点击“验证”按钮，当Text1中输入的数据小于300时，Text2显示Text1中的数据， 否则,使用MsgBox显示“重新计算”，并使焦点重新回到Text2上。 * (此题要求上载窗体文件，不要求填写程序运行结果）编写程序： 已知一个具有10个整数的一维数组，各元素值随机产生（范围在10,99内)， * 找出第一个偶数所在的位置及其值，然后输出。如果未找到就输出”not found”。编写程序: * 计算并输出下面级数前n项（n=50）的部分和。 12+2*3+3*4+45+n（n+1)+求一维数组A(1 TO 8)的最大元素值。 * 程序段如下： _ = A(1） For I = 2 To 8 If Max A(I） Then _ = A（I） Next I Print 最大元素值为: ”; Max编写一个计算两个数之和的程序，如图 x_11.jpg 所示。 * 界面要求： * 使用文本框,标签，命令按钮完成。 运行要求： 1、当用户单击“计算”按钮后，计算两个数的和，并用MsgBox显示结果. 2、点击“清除按钮，清除所有文本框内容； 3、点击“结束”按钮，则结束程序运行. * （此题要求上载窗体文件，不要求填写程序运行结果）编写程序： 利用InputBox接收一批字符,将其中的数字打印输出（提示：使用Len和Mid函数）。编写程序，输出下列三角形： 1 222 33333 4444444 （此题要求有源程序，不要求填写程序运行结果）编写一个秒表程序,如图 K_310.jpg 所示. * 界面要求: 使用一个标签,一个命令按钮、一个时钟控件完成。 运行要求: * 1、点击“开始计时按钮，开始计时，标签中显示时间，时间精度是百分之一秒； * 2、点击“结束计时”按钮,停止计时。 * 3、“开始计时”，“结束计时”由一个命令按钮实现. * （此题要求上载窗体文件,不要求填写程序运行结果）编写程序： 统计二维数组A（1 TO 6, 1 TO 6)所有非靠边元素中偶数元素的个数,并在窗体上输出其结果。( 数组元素值为0,10内的随机整数).* 编写程序，输出下列三角形： 1234567 12345 123 1 * (此题要求有源程序，不要求填写程序运行结果）* 编写一个计算累加和的程序，如图 K_502。jpg 所示. 界面要求: 使用标签、文本框、命令按钮完成。 * 运行要求： 单击“计算”按钮，计算从“起始值到“终止值”之间（包括起始值和终止值）所有整数的累加和,并显示到标签中。 * 如图为输入1和10时运行结果。 * （此题要求上载窗体文件，不要求填写程序运行结果)编写程序： 使用数组,求出下列数列的前30项中所有能被3整除的数据项: 0,0，1，1，2,4,7，13，。.。.编写程序： * 要求能够产生一个10,100内（包括10和100）的一个随机数，然后判断其是否是素数。 * 如果是,在窗体上输出”yes，否则，输出no。 (此题要求上载窗体文件，不要求填写程序运行结果）