试题

试题 试卷

logo

题型:综合题 题类:模拟题 难易度:普通

浙江省杭州市2016年信息技术高考模拟卷十四

小兰设计了一个“猜价格”小游戏,用户在Text1中输入所猜的价格,单击“猜一猜”按钮,如果偏高了,Label4标签中将提示“对不起,偏高了!”;若所猜的价格偏低,则Label4标签中将提示“对不起,偏低了!”;若猜中,则Label4标签中将显示“恭喜你,猜对啦!”。界面如1图所示。

(1)、应用程序界面设计时,为添加“请输入您猜的价格:”对象,应使用第14题-2图所示的“控件工具箱”中的(填写相应字母),并在3图所示的“属性窗口”中,将属性值设置为“请输入您猜的价格:”。

(2)、解决此问题的相应程序如下,请根据题意将程序补充完整。

Private Sub Command1_Click()

Dim g As Integer

Dim p As Integer

p = 99        '预设价格的值存储到p变量中

g =

If g > p Then

   = "对不起,偏高了!"

ElseIf g < p Then

   Label4.Caption = "对不起,偏低了!"

Else

   Label4.Caption = "恭喜你,猜对啦!"

End Sub

举一反三
返回首页

试题篮