编程实现加法运算,在两个文本框中输入加数,用标签表示结果,单击按钮进行计算,完成下列计算过程。
Private Sub Command1_Click()
Dim AAs Integer,B As Integer
A= ____________
B=Val(Text2.Text)
________ =A+B
End Sub
第1题:
由于补码的减法可以转化成加法实现,因此在采用补码表示的计算机中只需一个加法器即可实现加减法运算。
第2题:
编程题: 按要求定义如下功能的窗口(10分): 文本框中输入数值,单击“平方”按钮实现对文本框中数值求平方的功能,并将结果用标签显示在窗口中。
第3题:
2、字长=8,用补码形式完成下列十进制数运算。要求有计算过程,写出加数、被加数和结果的补码,O标志和C标志的值,并判断结果是否正确。 (-110)+(-70)
第4题:
在考生文件夹下有“db4.mdb”数据库。
(1)创建“计算圆面积”窗体,在窗体中添加“请输入半径”和“圆面积”文本框。
(2)在窗体中添加“计算”按钮,实现圆面积计算,编写按钮代码,结果显示在“圆面积”文本框中。要求编写单独的函数实现圆面积的计算,只做半径r<=0判断,此时面积的值为0,其他情况下面积的值=3.14×r×r。窗体设计结果如图所示。
第5题:
在考生文件夹下有一个工程文件sjt3.vbp,窗体上有一个标题为“计算”的命令按钮,1个标题为“1!+2!+…+10!=”的标签。请画1个名称为Text1,初始内容为空的文本框,如图所示。程序功能:单击“计算”命令按钮,则计算“l!+2!+…+10!”的值,并将结果显示在Textl文本框中。请将“计算”命令按钮的Click事件过程中的注释符去掉,把?改为正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后,程序按原文件名存盘。
【解题思路】此题目主要是对While循环和For循环的考查,循环结构是指在满足循环条件时反复执行循环代码块,直到循环条件不能满足为止。一个循环语句一般应包含4个部分的内容。
初始化部分:设置循环控制的一些初始条件
循环体部分:反复执行的代码
迭代部分:修改循环控制条件
判断部分:判断是否继续执行循环体
【操作步骤】
步骤1:打开本题工程文件,在窗体视图中添加一个TextBox控件,并按表4.8在属性窗口中设置相应属性,如图4.8所示。
步骤2:打开代码编辑窗口,去掉程序中的注释符“′”,将问号改为正确的内容。
参考答案(阴影部分是需考生填入的内容)
步骤3:调试并运行程序,关闭程序后按题目要求存盘。
第6题:
有一个VBA计算程序的功能如下:该程序用户界面由3个文本框和3个按钮组成,3个文本框的名称分别为Text1、Text2和Text3,3个按钮分别为清除(名为Command1) 、计算(名为 Command2) 和退出(名为Command3) 。窗体打开运行后,单击清除按钮,则清除所有文本框中显示的内容;单击计算按钮,则计算在Text1和Text2两个文本框中输入的数值的和并将结果存放在Text3文本框中;单击退出按钮则退出。请将下列程序填空补充完整。
Private Sub Command1_Click(
第7题:
在考生文件夹下有“xx”数据库。
在“窗体1”窗体中添加标签和名称相同的文本框“请输入学号”和“学生姓名”,添加“显示学生姓名”按钮,编写程序实现输入学号后单击“显示学生姓名”按钮后显示学生姓名。要求用Dlookup()函数实现。窗体设计如图所示。
第8题:
阅读以下应用说明及Visual Basic程序代码,将应填入(n)处的字句写在对应栏内。
【说明】
本应用程序是一个乘法计算器,其运行窗口如图2所示。
在该界面中,“被乘数”、“乘数”以及“积”等文字为标签,相应的3个输入输出数据框为文本框,此外还有3个命令按钮。用户在“被乘数”和“乘数”相应的文本框内输入数据,再单击“运算”按钮,便能在“积”对应的文本框中看到相乘的结果;当用户单击“清除”按钮时,就会清除各文本框中的数据;当用户单击“关闭”按钮时就会关闭该窗口并退出应用程序。用户不能在“积”对应的文本框中输入数据。
【属性设置】
各个对象、有关的属性名以及需要修改的属性值设计如下:
【程序】
Private Sub cmdMultiply_Click( )
txt3. Text =Trim(Str$ ((3)) '加法运算获得和数
End Sub
Private Sub (4) (
txt1. Text=" " '空字符串赋值给文本框txt1的内容
txt2. Text=" " '空字符串赋值给文本框txt2的内容
txt3. Text=" " '空字符串赋值给文本框txt3的内容
End Sub
Private Sub cmdClose_Click( )
(5) '退出应用程序
End Sub
第9题:
在窗体中有两个文本框分别为Textl和Text2,一个命令按钮Cmmand1,编写如下两个事件过程:
Private Sub Commandl_Click()
a=Textl.Value+Text2.Value
MsgBox a
End Sub
Private Sub Form_Load()
TextI.Value=“”
Text2.Value=””
End Sub
程序运行时,在文本框Textl中输入78,在文本框Text2中输入87,单击命令按钮,消息框中输出的结果为【 】。