自上而下两个文本框的名称分别是Text1和Text2，“开始”按钮的名称是Command1。在Text1

中输入数据，单击“开始”按钮，在Text2中显示统计结果。“开始”按钮单击事件处理过程的流程图如右图所示。请根据流程图将下列程序补充完整

     Private Sub Command1_Click( )

       Dim n As Integer, m As Integer, i As Integer

       Dim x As Single, y As Single

       n = ____

       m=0

       Randomize ′初始化Rnd函数

       For i = 1 To n

       x = Rnd ′随机产生x坐标，0≤x＜1

    y = Rnd ′随机产生y坐标，0≤y＜1

    ____

    Next i

    Text2.Text = Str(m)

     End Sub

图一：一只失去雏鸟的美国红雀，总是给养鱼池边浮到水面张口求食的金鱼喂它捕来的昆虫，就像喂养自己的雏鸟一样，一连喂了好几个星期。

图二：很多年前，在英格兰有一只大山雀，一次偶然机会碰巧打开了放在门外的奶瓶盖，偷喝了牛奶。不久那里的其他大山雀也学会了偷喝牛奶。

9+____=11         9+____=17         9+____=13

11-9=____          17-9=____         13-9=____