计算机二级考试.题库-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）的随机整数。编写程序： 使用双重循环，求100， 160以内的素数并以紧凑格式在窗体上一行输出，然后计|算出个数 s。编写一个分类统计的程序，如图 K_115.jpg 所示。* 界面要求：* 使用文本框、命令按钮完成。* 运行要求：* 1、在文本框中输入若干英文字符串；* 2、单击“统计”命令按钮后，判断文本框中“H”到“S”之间各个英文字母（不区分大小写）出现的次数，并输出到窗体上。* （此题要求上载窗体文件，不要求填写程序运行结果）编写程序：* 用随机函数产生 10 个 50 以内（包括 50）的随机整数存入一维数组，从键盘输入一个数，* 然后用顺序查找法，统计该数在一维数组中出现的次数。编写程序，输出下列三角形：1111111111111111 （此题要求有源程序，不要求填写程序运行结果）* 编写一个根据月份求月天数的程序，如图 x_7b.jpg 所示。* 界面要求：* 使用文本框，标签，命令按钮完成。* 运行要求：* 1、点击“天数”按钮，结果文本框中显示今年（2007 年）该月份的天数； * 2、点击“结束”按钮，则结束程序运行。* （此题要求上载窗体文件，不要求填写程序运行结果）编写程序：* 设窗体上有一命令按钮控件 Command1，对其 Click 事件设计一事件过程。* 求二维数组 A(1 To 6, 1 To 6)的偶数行上元素之和并在窗体上输出其结果。* 数组元素值为0，100内（包括 0 和 100）的随机整数。编写程序：* 计算并输出下面级数前 n 项（n=50）中偶数项的和。1*2+2*3+3*4+4*5+n*(n+1)+|编写一个同时显示日期和时间的程序，如图 K_7844.jpg 所示。* 界面要求：* 使用标签、命令按钮、时钟控件完成。* 运行要求：* 点击“显示日期和时间”按钮，标签开始显示日期和时间（上、下居中，左右居中） 。* （此题要求上载窗体文件，不要求填写程序运行结果）编写程序：* 用随机函数产生 10 个 110 之间（包括 1 和 10）的随机整数存入一维数组 A，* 通过键盘输入数值 m，然后用 A(m)的值作为下标，打印出对应数组元素的值。编写程序：* 计算并输出下面级数前 n 项（n=50）的部分和。1*2+2*3+3*4+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）的部分和。1*2+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|ABCABCDEABCDEFGABCDE ABCA （此题要求有源程序，不要求填写程序运行结果）界面要求：* 使用标签、文本框、命令按钮控件* 运行要求：* 单击“产生随机数”按钮，文本框中随机产生-10，10 范围内的整数 10 个；* 单击“统计”按钮，使用标签分别显示正数和零的个数、负数的个数。* （此题要求上载窗体文件，不要求填写程序运行结果）编写程序：* 计算并输出下面级数前 n 项中（n=50）偶数项的和。1*2*3+2*3*4+3*4*5+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* 从小到大排序，并以紧凑格式在一行上输出。编写程序：* 打印出以下图案。222222222222222222222 2222* （此题要求有源程序，不要求填写程序运行结果）|编写程序：* 求一个 4×4 的整型矩阵的所有元素的平均值。 （其中矩阵元素随机产生）编写一个程序，如图 K_204.jpg 所示。* 界面要求：* 使用文本框、命令按钮控件完成。* 运行要求：* 1、Text1 中随机产生 500 以内的整数；* 2、点击“验证”按钮，当 Text1 中输入的数据小于 300 时，Text2 显示 Text1 中的数据，* 否则，使用 MsgBox 显示“重新计算” ，并使焦点重新回到 Text2 上。* （此题要求上载窗体文件，不要求填写程序运行结果）编写程序：* 已知一个具有 10 个整数的一维数组，各元素值随机产生（范围在10，99 内） ，* 找出第一个偶数所在的位置及其值，然后输出。如果未找到就输出“not found“。编写程序：* 计算并输出下面级数前 n 项（n=50）的部分和。1*2+2*3+3*4+4*5+n*(n+1)+求一维数组 A(1 TO 8)的最大元素值。* 程序段如下：_ = A(1)For I = 2 To 8If Max < A(I) Then _ = A(I)Next IPrint “最大元素值为: “; Max编写一个计算两个数之和的程序，如图 x_11.jpg 所示。* 界面要求：* 使用文本框，标签，命令按钮完成。* 运行要求：* 1、当用户单击“计算”按钮后，计算两个数的和，并用 MsgBox 显示结果。* 2、点击“清除”按钮，清除所有文本框内容；* 3、点击“结束”按钮，则结束程序运行。* （此题要求上载窗体文件，不要求填写程序运行结果）编写程序：* 利用 InputBox 接收一批字符，将其中的数字打印输出（提示：使用 Len 和 Mid 函数） 。编写程序，输出下列三角形：1222|33333 4444444* （此题要求有源程序，不要求填写程序运行结果）编写一个秒表程序，如图 K_310.jpg 所示。* 界面要求：* 使用一个标签，一个命令按钮、一个时钟控件完成。* 运行要求：* 1、点击“开始计时”按钮，开始计时，标签中显示时间，时间精度是百分之一秒；* 2、点击“结束计时”按钮，停止计时。* 3、 “开始计时” ， “结束计时”由一个命令按钮实现。* （此题要求上载窗体文件，不要求填写程序运行结果）编写程序：* 统计二维数组 A(1 TO 6, 1 TO 6)所有非靠边元素中偶数元素的个数，并在窗体上输出其结果。( 数组元素值为0，10内的随机整数) 。* 编写程序，输出下列三角形：1234567 12345123 1* （此题要求有源程序，不要求填写程序运行结果）* 编写一个计算累加和的程序，如图 K_502.jpg 所示。* 界面要求：* 使用标签、文本框、命令按钮完成。* 运行要求：* 单击“计算”按钮，计算从“起始值”到“终止值”之间（包括起始值和终止值）所有整数的累加和，并显示到标签中。* 如图为输入 1 和 10 时运行结果。* （此题要求上载窗体文件，不要求填写程序运行结果）编写程序：* 使用数组，求出下列数列的前 30 项中所有能被 3 整除的数据项：0,0,1,1,2,4,7,13,.编写程序：* 要求能够产生一个10，100 内（包括 10 和 100）的一个随机数，然后判断其是否是素数。* 如果是，在窗体上输出“yes“，否则，输出“no“。* （此题要求上载窗体文件，不要求填写程序运行结果）
