题目内容

在窗体上画1个名为Text1的文本框和1个名为Label1的标签,再画4个名为Op1的单选按钮控件数组,其Index属性按季度顺序为0~3,如图1所示。在文件Sales.txt中按月份顺序存有某企业某年12个月的销售额。要求在程序执行时,鼠标单击一个单选按钮,则Text1中显示相应季度的销售总额,并把相应的文字显示在标签上。如图2所示是单击“第二季度”单选按钮所产生的结果。请选择可在空白处填写的合适语句()。
Option Base 1 Dim sales(12) As Long Private Sub Form_Load() Open "c:\sales.txt" For Input As #1 For k=1 To 12 Input #1,sales(k) Next k Close #1 End Sub Private Sub______(Index As Integer) Dim sum As Long,k As Integer, month As Integer sum=0 month=Index * ______ For k=1 To 3 month=month+1 sum=sum+sales(month) Next k Label1.Caption=______.Caption & "销售总额:" Text1=sum End Sub

A. Opl_Click 3 Op1(Index)
B. Opl_Click 0 Optionl(Index)
C. Optionl_C1ick 1 Opl(Index)
D. Optionl_C1ick 2 Optionl(Index)

查看答案
更多问题

税法是国家制定的用以调整国家与纳税人之间的征纳税方面的权利义务关系的法律规范的总称。()

A. 正确
B. 错误

听力原文:W: This house won't be big enough when the new baby arrives in two months. I'm afraid we have to buy a big one.
M: But I don't see we can afford it right now. We can let Andy live with my mother then.
Q: What can we learn from this conversation?
(2)

A. New baby will be born soon.
B. They will buy a big house in two months.
C. They will live with the man's mother.
D. The new baby will be sent to the man's mother.

A.It's small but beautiful.B.I like it.C.I don't like it.D.I like teachers there.

A. It's small but beautiful.
B. I like it.
C. I don't like it.
D. I like teachers there.

A.About 200 miles.B.About 1,000 miles.C.About 7,000 miles.D.About 5,000 miles.

About 200 miles.
B. About 1,000 miles.
C. About 7,000 miles.
D. About 5,000 miles.

答案查题题库