VB猜价格小程序
高二（8）班决定在第11周开一个主题班会，为了丰富班会的内容，班主任要求班级几位信息高手，设计一个小程序，这事难不倒班上的各位大神，他们齐心协力，很快就完成了。
编写程序，实现如下功能：有6张待猜的商品图片加载到Image1中，通过上一个和下一个按钮进行切换，主持人可以通过“设置价格”按钮Command2对每一张商品图片设置一个价格，然后，单击“我来猜一猜”按钮开始猜价格游戏，每人只给8次（这个数据存放在变量n中）猜价格的机会，8次机会用完后，如果猜中价格，则在文本框Text2中显示处价格。

（1）窗体中有________个对象，________类。
（2）Command1对象的Caption属性值是_______________________________。
（3）实现上述功能的部分VB程序如下，请在划线处填入合适代码。
Private Sub Command1_Click()
Dim i As Integer
Dim n As Integer    '变量n存储猜价格的次数
Dim cai_shu As Integer    '变量cai_shu存储猜的价格
n = ①__________________
For i = 1 To n
cai_shu = Val(InputBox("请输入当前商品的价格：", "输入价格"))
If cai_shu = jg(dqtp) Then  'jg(dqtp)存储的是当前商品图片的价格
MsgBox "恭喜你猜对了"
Text2.PasswordChar = ""
Text2.Text = Text2.Text + "元"
Exit For
ElseIf ②__________________ Then
MsgBox "猜大了，再来猜一猜"
Else
MsgBox "猜小了，再来猜一猜"
End If
Next i
If i > n Then
MsgBox "猜价格次数用尽，很遗憾，你没有猜对！"
③___________________
End Sub