2. 计算机
  3. 在窗体上画1个名为Textl的文本框和1个名为Labell的标签，再画4个名为Opl的单选按钮控件数组，其Index属性按季度顺序为0～3，如图1所示。在文件Sales．txt中按月份顺序存有某企业某年12个月的销售额。要求在程序执行时，鼠标单击一个单选按

在窗体上画1个名为Textl的文本框和1个名为Labell的标签，再画4个名为Opl的单选按钮控件数组，其Index属性按季度顺序为0～3，如图1所示。在文件Sales．txt中按月份顺序存有某企业某年12个月的销售额。要求在程序执行时，鼠标单击一个单选按

admin2012-12-08  59
问题 在窗体上画1个名为Textl的文本框和1个名为Labell的标签，再画4个名为Opl的单选按钮控件数组，其Index属性按季度顺序为0～3，如图1所示。在文件Sales．txt中按月份顺序存有某企业某年12个月的销售额。要求在程序执行时，鼠标单击一个单选按钮，则Textl中显示相应季度的销售总额，并把相应的文字显示在标签上。如图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)
    Nextk
    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
Labell．Caption___________．Caption&”销售总额：”
Textl=Sum
End Sub
选项 A、Opl Click  3    Opl(Index)
B、Opl Click 0 Optionl(Index)
C、Optionl—Click    1    Opl(Index)
D、Optionl—Click    2    Optionl(Index)
答案A
解析
转载请注明原文地址:https://kaotiyun.com/show/IVhp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)