vb编程练习题

《vb编程练习题》由会员分享，可在线阅读，更多相关《vb编程练习题（28页珍藏版）》请在金锄头文库上搜索。

1、VBVB 编程练习题编程练习题VB 编程练习题 说明：做练习时，工程文件、标准模块及 main 过程可以自己创建，本练习只提供一个样例。 第一题 【问题描述】 请打开指定文件夹下的工程文件 Count.vbp，并在标准模块 Module1中的 main 过程中实现如下功能：在给定的数据序列中，统计指定的关键字在序列中出现的次数，并将结果写入输出文件 out.Txt 中。 说明： 1.输出语句使用 Print，若同一行上输出多个表达式，多个表达式采用紧凑格式输出。 2.打开文件时，使用相对路径，不使用绝对路径，即直接使用文件名即可。 【输入文件】 输入文件 in.txt 有 2 行，第 1 行中

2、第 1 个数表示数据序列中数的个数，第1 行中第 2 个数表示要查找的关键字，第 2 行表示给定的数据序列。每个数之间用空格隔开。 【输出文件】 输出文件 out.Txt 是 1 行，表示统计结果。 【输入样例】 5 55 34 23 55 12 55 【输出样例】 2 第二题 【问题描述】 请打开指定文件夹下的工程文件 CountWord.vbp，并在标准模块Module1 中的 main 过程中实现如下功能：在给定的单词序列中，统计指定的关键字在序列中出现的次数，并将结果写入输出文件 out.Txt 中。说明： 1.输出语句使用 Print，若同一行上输出多个表达式，多个表达式采用紧凑格式

3、输出。 2.打开文件时，使用相对路径，不使用绝对路径，即直接使用文件名即可。 【输入文件】 输入文件 in.txt 有 2 行，第 1 行中第 1 个数表示数据序列中数的个数，第 1 行中第 2 个数表示要查找的关键字，第 2 行表示给定的单词序列。每个单词之间用逗号隔开。 【输出文件】 输出文件 out.Txt 是 1 行，表示统计结果。 【输入样例】 5 dog Cat,dog,good,bear,character 【输出样例】 1 第三题 【问题描述】 求最大公约数的算法思想：(最小公倍数=两个整数之积/最大公约数) (1) 对于已知两数 m，n； (2) m 除以 n 得余数 r；

4、(3) 若 r=0，则 n 为求得的最大公约数，算法结束；否则执行(4)； (4) mn，nr，再重复执行(2)。 请打开指定文件夹下的工程文件 gcd.vbp，并在标准模块 Module1中的 main 过程中实现如下功能： 从输入文件 in.txt 中读入给定的两个数，并求出这两个数的最大公约数和最小公倍数，并将结果写入到输出文件 out.Txt 中。 说明： 1.输出语句使用 Print，若同一行上输出多个表达式，多个表达式采用紧凑格式输出。 2.打开文件时，使用相对路径，不使用绝对路径，即直接使用文件名即可。 【输入文件】 输入文件 in.txt 有 1 行，有两个数，用空格分开，表示

5、给定的数据。【输出文件】 输出文件 out.Txt 有 1 行，有两个数，第一个数表示最大公约数，第二个数表示最小公倍数，两个数之间用空格分开。 【输入样例】 6 9 【输出样例】 3 18 第四题 【问题描述】 基本思想：n 个有序数（从小到大）存放在数组 a(1) -a(n)中，要插入的数 x，把数 x 插到有序数列中，插入后数列仍然有序。 请打开指定文件夹下的工程文件 insert.vbp，并在标准模块Module1中的 main 过程中实现如下功能： 从输入文件 in.txt 中读入给定的数据，完成上述思想，并将结果写入到输出文件 out.Txt 中。 说明： 1.输出语句使用 Pri

6、nt，若同一行上输出多个表达式，多个表达式采用紧凑格式输出。 2.打开文件时，使用相对路径，不使用绝对路径，即直接使用文件名即可。 【输入文件】 输入文件 in.txt 有 2 行，第 1 行有两个数，用空格分开；第 1 个数表示有序数个数，第二个数表示要插入的数。 【输出文件】 输出文件 out.Txt 有 1 行，表示插入指定数后的有序序列，各个数之间用空格分开。 【输入样例】 5 24 12 15 34 45 56 【输出样例】 12 15 24 34 45 56 第五题 【问题描述】 字母循环加密的基本思想是：将 a-z，AZ 各看成一个环，将每个字母加一序数 K，即用它后（前）面的第

7、 K 个字母代替。 例如序数 k 为 2，这时大写字母：“A“ “C“，“B“.“D“.“Z“.“B“。 小与字母：“a“ “c“，“b“.“d“.“z“.“b“。 请打开指定文件夹下的工程文件 jiami.vbp，并在标准模块 Module1中的 main 过程中实现如下功能： 读入输入文件 in.txt 中的数据，实现上述思想，并将结果写入到输出文件 out.Txt 中。 说明： 1.输出语句使用 Print，若同一行上输出多个表达式，多个表达式采用紧凑格式输出。 2.打开文件时，使用相对路径，不使用绝对路径，即直接使用文件名即可。 【输入文件】 输入文件 in.txt 有 2 行，第 1

8、 行表示每个字母要加的序数，第 2 行表示待加密的字母序列。 【输出文件】 输出文件 out.Txt 是 1 行，表示加密后的字母序列。 【输入样例】 3 How are you 【输出样例】 Krz duh brx 第六题 【问题描述】 请打开指定文件夹下的工程文件 max.vbp，并在标准模块 Module1中的 main 过程中实现如下功能： 从输入文件 in.txt 中读入给定的矩阵数据，求出给出矩阵中最大元素及其所在的行和列，并将并将计算的行和列号写入到输出文件out.Txt中。 说明： 1.输出语句使用 Print，若同一行上输出多个表达式，多个表达式采用紧凑格式输出。 2.打开文

9、件时，使用相对路径，不使用绝对路径，即直接使用文件名即可。 【输入文件】 输入文件 in.txt 有多行，第 1 行有两个数，用空格分开；第 1 个数表示矩阵的行数，第 2 个数表示矩阵的列数。其他各行为由指定行数和列数对应的矩阵数据。 【输出文件】 输出文件 out.Txt 有 1 行，表示计算出的行号和列号，行号和列号之间用空格隔开。 【输入样例】 3 3 12 15 34 45 56 10 43 78 20 【输出样例】 3 2 第七题 素数判断方法：只能被 1 或本身整除的数称为素数 基本思想：把 m作为被除数，将 2INT（ ）作为除数，如果都除不尽，m 就是素数，否则就不是。 请打

10、开指定文件夹下的工程文件 prime.vbp，并在标准模块 Module1中的 main 过程中实现如下功能： 从输入文件 in.txt 中读入给定数，判断该数是不是素数，若是，则在输出文件 out.Txt 中写入 True，若不是素数，则在输出文件out.Txt 中写入 False。 说明： 1.输出语句使用 Print，若同一行上输出多个表达式，多个表达式采用紧凑格式输出。 2.打开文件时，使用相对路径，不使用绝对路径，即直接使用文件名即可。 【输入文件】 输入文件 in.txt 有 1 行，表示给定的数据。 【输出文件】 输出文件 out.Txt 是 1 行，表示是否素数的判断结果。 【

11、输入样例】 17 【输出样例】 True 第八题 素数判断方法：只能被 1 或本身整除的数称为素数 基本思想：把 m作为被除数，将 2INT（ ）作为除数，如果都除不尽，m 就是素数，否则就不是。 请打开指定文件夹下的工程文件 primenumber.vbp，并在标准模块Module1 中的 main 过程中实现如下功能： 从输入文件 in.txt 中读入给定数，求出 3 到该数之间的所有素数，并将结果写入到输出文件 out.Txt 中。 说明： 1.输出语句使用 Print，若同一行上输出多个表达式，多个表达式采用紧凑格式输出。 2.打开文件时，使用相对路径，不使用绝对路径，即直接使用文件名

12、即可。 【输入文件】 输入文件 in.txt 有 1 行，表示给定的数据。 【输出文件】 输出文件 out.Txt 是 1 行，表示指定范围内的所有素数，每个素数之间用空格分开。 【输入样例】 20 【输出样例】 3 5 7 11 13 17 19 第九题 【问题描述】 折半查找思想：设 n 个有序数（从小到大）存放在数组 a(0)-a(n-1)中，要查找的数为 x。 用变量 bot、top、mid 分别表示查找数据范围的底部（数组下界） 、顶部（数组的上界）和中间，mid=(top+bot)2。 x=a(mid)，则已找到退出循环，否则进行下面的判断； xa(mid)，x 必定落在 mid+

13、1 和 top 的范围之内，即 bot=mid+1； 在确定了新的查找范围后，重复进行以上比较。 请打开指定文件夹下的工程文件 Search.vbp，并在标准模块Module1中的 main 过程中实现如下功能： 在给定有序数的数据序列中，利用折半查找算法计算查找到指定关键字需要查找的次数，并将结果写入输出文件 out.Txt 中；若没找到则在输出文件 out.Txt 中写入-1。 说明： 1.输出语句使用 Print，若同一行上输出多个表达式，多个表达式采用紧凑格式输出。 2.打开文件时，使用相对路径，不使用绝对路径，即直接使用文件名即可。 【输入文件】 输入文件 in.txt 有 2 行，

14、第 1 行中第 1 个数表示数据序列中数的个数，第 1 行中第 2 个数表示要查找的关键字，第 2 行表示给定的有序数据序列。每个数之间用空格隔开。 【输出文件】 输出文件 out.Txt 是 1 行，表示查找关键字所用次数，若没找到则写入-1。 【输入样例】 5 56 12 34 45 56 58 【输出样例】 2 第十题 【问题描述】 请打开考号文件夹下的工程文件 sort.vbp，并在标准模块 Module1中的 main 过程中实现如下功能：将给定的数按照从小到大的顺序排序，并将结果写入到输出文件 out.Txt 中，所需数据从输入文件 in.txt 读入。 说明： 1.输出语句使用

15、Print，若同一行上输出多个表达式，多个表达式采用紧凑格式输出。 2.打开文件时，使用相对路径，不使用绝对路径，即直接使用文件名即可。 【输入文件】 输入文件 in.txt 有 2 行，第 1 行表示参加排序数的个数，第 2 行表示要排序的数。 【输出文件】 输出文件 out.Txt 是 1 行，表示排序后的结果，各个数字之间用空格隔开。 【输入样例】 5 53 34 4 45 10 【输出样例】 4 10 34 45 53 第十一题 【问题描述】 请打开考号文件夹下的工程文件 string_2.vbp，并在标准模块Module1 中的 main 过程中实现如下功能：将给定字符串中的所有数字

16、字符（09）去掉，并将结果写入到输出文件 out.Txt 中，给定字符从输入文件 in.txt 读入。 说明： 1.输出语句使用 Print，若同一行上输出多个表达式，多个表达式采用紧凑格式输出。 2.打开文件时，使用相对路径，不使用绝对路径，即直接使用文件名即可。 【输入文件】 输入文件 in.txt 有 1 行，表示源数据字符串。 【输出文件】 输出文件 out.Txt 也是 1 行，表示去掉数字字符（09）后结果字符串。 【输入样例】 Abc019a0b123 【输出样例】 Abcab 第十二题 【问题描述】 合并排序（将两个有序数列（均为升序）A、B 合并成另一个有序的数 C，合并后 C 仍然为升序） 基本思想： 1）先在 A、B 数列中各取第一个元素进行比较，将小的元素放入 C数列中； 2）取小的元素所在数列的下一个元素与另一数列中上次比较后较大的元素比较，重复上述比较过程，直到某个数列被先排完； 3）将另一个数列剩余元素抄入 C 数列，合并排序完成。 请打开指定文件夹下的工程文件 union.vbp，并在标准模块 Module1中的 ma