学进去

两个富翁试图做一笔换钱生意，换钱规则为：富翁A每天给富翁B 10万元，直到满30天；富翁B第一天给富翁A 1分钱，第二天给2分，第三天给4分……富翁B每天给富翁A的钱是前一天的两倍，直到滿30天。要求设计一个程序，在文本框Text1和Text2中分别输入富翁A和富翁B给予对方的钱的数额（万元）。
小青用VB设计了如下图所示的程序界面：

（1）如上图所示，该窗体内有      个对象，这些对象分为 __________类。
（2）为实现上述功能，请在划线处填入合适代码。
Private Sub Command1_Click()
Dim ma as single
Dim mb as single
Dim s as single
Ma =10*30
Mb = 0.000001
For i = 1 to _______①_____
Mb = ____②______
S=" s" + mb
Next i
Text1.text = str(ma)
Text2.text = str(s)
End sub
① 应填的内容是__________ ，②中应填的内容是__________ 。