内蒙古鄂尔多斯市东胜区第二中学2017届九年级信息技术复习：VB知识点

Val(text1.text)РIf ① ThenР       Label1.Caption = "超重!不能参赛!"РElseР   Label1.Caption = "合格,可以参赛!"     Р ②Р答案:①t>60 ② End If Р8.执行如下程序段后,x的值为。Рx=1РIf x>0 Then x=x+1РIf x>1 Then x=5РPrint xР答案:5Р9.执行如下程序段后,显示的结果为。Рa = 80РIf a > 60 Then b = 1РIf a > 70 Then b = 2РIf a > 80 Then b = 3РPrint bР答案:2Р10.执行如下程序段后,显示的结果为。Р a = 1Р b = 2Р If a > b ThenР Print a+b<0Р ElseР Print a+b>0Р End IfР答案:trueР11.某超市的苹果每斤5元,为了促销,规定购买4斤或4斤以上打八折销售。请补充下列程序(变量x表示购买斤数,变量y表示应付款额):РIf x < 4 ThenР Р ElseР y = 5 * x * 0.8Р End IfР答案:y = 5 * xР12.执行如下算法后的输出结果为РNР开始Рa=6Рb=a+5Рb>=10Р输出aР输出bР结束РYР答案:6Р13.小明利用VB编写了一个出租车计费程序,如果乘坐13公里,费用为元。Р答案:22Р14.假定有如下语句: РPrivate Sub Form_Click()Рa = Val (InputBox (“请输入a”)) Рb = Val (InputBox (“请输入b”)) Рx = a*a + b РIf b > a ThenРx = b*b + a РPrint x РendifРEnd Sub Р运行时从键盘输入3和4,输出X的值是Р答案:19