坐船到美国多少钱:虾米求救！！！帮忙做做VB题，谢谢！

读程序题，写出程序运行结果
1、以下语句的输出结果是: （1）
Print Int (12345.6789*100+0.5)/100

2、在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程:
Private Sub Form_Click ()
Text1.Text = "VB程序设计"
End Sub

Private Sub Text1_Change ()
Picture1.Print "VBProgramming"
End Sub
程序运行后,单击窗体,在文本框中显示的内容是(2),而在图片框中显示的内容是（3）

3、阅读下面的程序
Private Sub Form_Click ()
Dim Check As Boolean, Counter As Integer
Check = True
Counter = 5
Do
Do While Counter < 20
Counter = Counter + 1
If Counter = 10 Then
Check = False
Exit Do
End If
Loop
Loop Until Check = False
Print Counter
End Sub
程序运行后,单击窗体,输出结果是（4）

4、设有如下程序
Private Sub Form_Click ()
Dim a As Integer, s As Integer
n = 8
s = 0
Do
s = s + n
n = n - 1
Loop While n > 0
Print s
End Sub
以上程序的功能是（5）,程序运行后,单击窗体,输出结果为（6）