VB辅导答疑题

选择循环部分

1、 输入三条线段a,b,c的长，若a,b,c能够构成三角形，求此三角形的面积,否则输出“NOT”。

分析：(1)如何来求出三角形的面积，给出了三条边，应该应用海伦公式

S=P*(P?a)*(P?b)*(P?c)(其中P=(a+b+c)/2)

(2)题目要求来判断输入的三边是否能够构成三角形，而且明确给出条件成立与

否的执行操作即：

能构成：输出三角形面积 否则：输出“NOT”。因此明确使用双分支结构——if-else

(3)三边的输入要求可以使用textbox控件，也可以使用inputbox函数 2、输入x的值，根据如下函数,输出y值。 x (x<1)

y = 2x-1 (1<=x<10) 3x-11 (x>=10)

分析：要求用户输入一个X的值，根据X的所在范围来确定分段函数，并求出Y值

(1) 输入X的值，可用textbox控件，也可以用inputbox函数

(2) 因为分段函数要根据不用X的范围来确定应该使用那个函数求Y值

而且X的一共有三种范围，所以要使用多种条件判断——块结构if if-elseif-elseif-[else]-endif也可以使用select case语句

(3) 求解Y值的时候是使用的赋值语句

3、给出一个百分制成绩，要求输出等级’A’、’B’、’C’、’D’、’E’。90分以上为’A’，81-89分为’B’，70-79分为’C’，60-69分为’D’，60分以下为’E’。

4、用Do…Loop循环求100－200之间第一个即能被5整除又能被7整除的数。

分析：(1)先来判断一个数是否是能够被5和7来整除的，使用if来判断

(2)接着要看100-200间的所欲的数都要进行判断，显示出能够被整除的 (3)要求只求出第一个满足条件的数，所以找到之后要结束循环。

5、求S=1/2-1/3+1/4-1/5+...+1/10的值。

分析：求累加和，其中当分母为偶数时符号，为奇数数时符号为负号

（1） 可以先求出偶数的累加和，再求奇数的累加和，之后求出偶数和-奇数和

因此要在累加时判断是奇数还是偶数

6、产生20个50~100之间的随机整数，分别求出奇数和偶数的累加和，并输出这20个数及奇数和偶数的累加和。如图1所示。

图1

图2

分析：(1)产生一个50-100的随机数：int(rnd*(100-50+1)+50)

(2)判断出来这个随机数是奇数还是偶数

(3) 用循环控制求出20个随机数，并按条件累加求和

7、有键盘输入两个正整数M和N，求M和N的最大公约数和最小公倍数

分析：最大公约数：

(1) 从键盘输入数据：inputbox

(2) 最大公约数即为两个数中，从小数开始每次递减判断，其中第一个能够同时

整除M和N的数即为最大公约数 (3) 确定一下M和N中的最小数 最小公倍数：M*N/最大公约数

8、有一分数序列：2/1,3/2,5/3,8/5,13/8……求出这个数列的前20项之和。

分析：(1+1/1),(1+1/2),(1+2/3),(1+3/5),(1+5/8) 2/1 3/2 5/3 8/5

规律：每一项都等于前一项的倒数加1

9、在窗体上画一个命令按钮，名称为command1，标题为“计算并输出”，程序运行后，如果单击命令按钮，程序将计算500以内两个数之间(包括开头和结尾的数)所有连续数的和为1250的正整数，并要窗体上显示出来。结果如图2所示。

分析：要判断从1开始到500是否存在累加和为1250；无论是否存在都要从2开始接着

判断以此类推

10、求100~200之间的所有素数，每行输出5个

分析：(1)判断一个数n是否是素数，从1开始mod除到n-1（n/2,sqr(n)）看看其中是

否有能够被整除的，如果有的话就说明该数并不是素数，否则就是

(2)循环判断100-200间有多少个素数，即把每个数都要做一次判断

(3)如果该数是素数的话则退出的判断素数的循环，如果不是的话(即该数是素数)

则正常退出判断素数的循环，因此要判断出是哪种退出循环的情况。

11、求自然对数的底e的值 e≈1+1/1!+1/2!+1/3!+…+1/n!，直到 1/n!小于10-5 分析：求阶乘和

(1) 求阶乘：

(2) 求累加和：条件是1/n！大于10-5时停止循环，因此考虑用while循环来

做

12、求1！+2！+3！+……+10！

分析：(1)求阶乘：累乘 (2)求累加和

13、输入任意一个整数，求其每位数字的平方和

分析：(1)先要知道是几位数字，把整数当作字符求出其长度

(2)求出每一位具体数字，并且累加求出具体数字的平方和

14、从键盘任意输入30次字符，每次一个，分别统计字符A、B、C的个（不区分大小写）。 如果中途连续输入三个“Q”，则结束输入。

分析：(1)计算一个字符的分类，不区分大小写用函数实现（LCase()或者UCase()） (2)30个字符的统计 (3)

15、输入任意一个整数，将其反向输出。如输入1234，则输出4321。

分析：要想反向输出则应该把每一位都取出来，相反显示即可

把输入的数作为字符串，用mid函数把每一位取出来，反向输出，循环取位从

末位开始

控件部分

1、设计一个数据迁移程序，运行界面如图所示。要求：

1) 单击“产生”按钮，随机产生10个两位正整数，并添加到左边的列表框中(List1)。 2) 单击“→”按钮，或双击List1，将List1的所有偶数迁移到List2中。

3) 单击“←”按钮，或双击List2，将List2的数据再移回到List1中。

4) 单击“清除”按钮，清除List1和List2中的所有项目。 2、在名称为Form1的窗体上有一个名称为Text1的文本框和名称为Command1标题为“确定”的命令按钮，一个名称为List1的列表框和两个名称分别为Option1和Option2、标题分别为“添加”和“删除”的单选按钮，如图3-3所示，程序运行后，如果选择单选按钮Option1并在文本框中输入一个字符串，然后单击“确定”命令按钮，则把文本框中的字符串添加到列表框中，并清除文本框，如图3-4，如果选择列表框中的一项和单选按钮Option2，并单击“确定”按钮，则删除列表框中选择的内容，如图3-5，如果在文本框中未输入字符或未选择列表框中的一项，单击“确定”命令按钮，将显示一个信息框“未输入或未选择项目”，如图3-6。

图3－3 图3－4

图3－5 图3－6

3、设计一水平滚动条，表示范围为1到100，要求:

(1) 单击命令按钮生成[1，100]之间的随机整数，在滚动条上反映此随机数，同时在标签上显示该值。

(2) 滚动条滚动时，标签内容能够及时反映滚动条的当前值。

HScroll1 Label3

Command1

4、利用IIF函数完成对文本框中的字体修饰，运行界面如图所示

5、在窗体上画一个文本框，两个框架，框架内各有两个单选按钮。窗体及其上的控件如图所示。在两个框架内分别选择一个单选按钮，单击窗体时，在文本框中显示旅游工具的旅游目的地，如“乘飞机去大连” 。编写相关的事件过程。 6、已利用属性窗口向列表框（List1）添加了四个项目：Visual Basic，Turbo C，C++，Java；请编写适当的程序完成以下功能：当选择列表框中的一项和单选按钮OP1，然后单击“确定”命令按钮，则文本框中显示“XXX笔试”；当选择列表框中的一项和单选按钮OP2，然后单击“确定”命令按钮，则文本框

图5-10

中显示“XXX上机”。其中“XXX”是在列表框中选择的项目。如图5-10所示。 7、在窗体（Form1）上有两个命令按钮C1、C2，一个标签控件L1，一个计时器控件Timer1，如图5-12所示，程序运行后在命令按钮C1中显示“开始”，在命令按钮C2中显示“停止”，在标签中用字体大小为16的粗体显示“热烈欢迎”，（标签的AutoSize属性为True），同时标签自左至右移动，每个时间时隔移动20，如图5-13所示，移动出窗体右边界后，自动从左边界开始向右移动，单击“停止”命令按钮，则该按钮变为禁用，“继续”命令按钮变为有效，同时标签停止移动，再关键作再次单击“继续”命令按钮后，标签继续移动。

图5-12 图5-13

8、在窗体上画一个列表框、一个文本框一个滚动条。要求：利用属性窗口设置适当的属性。为List1列表框添加3个项目：宋体、黑体、楷体_BG2312；Text1文本框设置初值为“计算机”；Hscroll1水平滚动条设置值和最大值分别为10和50。如图5-14所示。

如果在列表框中选择一种字体，然后移动滚动条中的滚动框，则可使文本框中的文字按所选择的字体显示，并可随着滚动框的移动放大或缩小，如果不选择字体直接移动滚动框，则显示一个信息框，提示“请选择字体”。

图5-14

9、在窗体上有一个命令按钮,其名称为Command1，标题为“添加”,有一个文本框，名称为Text1，初始内容为空白，此外还有一个列表框，其名称为List1。程序运行后，如果在文本框中输入一个英文句子（有多个单词组成，各单词之间用一个空格分开）然后单击命令按钮，程序将把英文句子分解为单词，并把每个单词作为一个项目添加到列表框中。如

图5-15

图5-15所示。

10、如图5-18所示，在窗体上画一个文本框(Text1)，三个列表框L1（字体），L2（字号），

L3（修饰），分别编写L1，L2，L3的单击事件，修饰文本框的文本内容。

图5-18

11、窗体上有一个图片框，一个时钟控件，一个水平滚动条，两个标签，标题分别为“快”、“慢”，两个命令按钮，标题分别为“开始”、“停止”，编程实现：单击“开始”按钮，则汽车图标向右移动，当移出窗体时，汽车图标从新回到窗体的左侧，单击“停止”按钮则汽车停止运动，移动滚动条上的滚动框，可以改变汽车的运动速度（滚动框向右移动，速度减慢）。设计与运行后的窗体如图所示。

本文来源：https://www.bwwdw.com/article/gp4d.html