4. 阅读以下程序段
Private Sub Command1_Click()
For  R =100 to 520 step 100
  b1 = 255 * Rnd( )
  b2 = 255 * Rnd( )
  b3 = 255 * Rnd( )
  Picture2.Circle(1000,1000), R,RGB(b1,b2,b3)
Next R
End Sub
当程序执行时，单击command1后，将在（何处）___________显示____________个颜色______（填相同或不同）的同心圆。
5. 以下是求任意圆面积的程序
Private Sub Command1_Click()
R = ________________________
print  “S=”；3.14*R*R
End Sub
在程序执行过程中单击command1时，出现了右图所示的窗口，请根据如图所示信息，在空白处补充对应的程序语句。
6.阅读程序代码并填空。
Private Sub Command1_Click()
Dim a, b As Integer
a = InputBox("a=", "输入")
b = InputBox("b=", "输入")
If a > b Then
Print a
Else: Print b
End If
End Sub
（1）程序的基本结构包括顺序结构、分支结构和循环结构，本程序主要使用的是______ 结构。
（2）本程序的主要作用是_______________________________________。
（3）假如输入的两个数分别是 7和 9，程序执行后，输出的结果是________________。