1. (2016·杭州模拟) 小兰设计了一个“猜价格”小游戏，用户在Text1中输入所猜的价格，单击“猜一猜”按钮，如果偏高了，Label4标签中将提示“对不起，偏高了！”；若所猜的价格偏低，则Label4标签中将提示“对不起，偏低了！”；若猜中，则Label4标签中将显示“恭喜你，猜对啦！”。界面如1图所示。

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

   

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