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

题型：综合题题类：常考题难易度：普通

浙江省杭州市五县七校2016-2017学年高二上学期期中联考信息技术试题

两个富翁试图做一笔换钱生意，换钱规则为：富翁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

①应填的内容是，②中应填的内容是。

举一反三

图1

相关试卷