首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上先画一个名为Text1的文本框和—个名为Label1的标签,再画—个名为Op1的有4个单选按钮的单选按钮选项组,其Index属性按季度顺序为0~3(见图1)。在文件sales.txt中按月份顺序存有某企业某年12个月的销售额。要求在程序执行时,鼠标
在窗体上先画一个名为Text1的文本框和—个名为Label1的标签,再画—个名为Op1的有4个单选按钮的单选按钮选项组,其Index属性按季度顺序为0~3(见图1)。在文件sales.txt中按月份顺序存有某企业某年12个月的销售额。要求在程序执行时,鼠标
admin
2009-03-17
55
问题
在窗体上先画一个名为Text1的文本框和—个名为Label1的标签,再画—个名为Op1的有4个单选按钮的单选按钮选项组,其Index属性按季度顺序为0~3(见图1)。在文件sales.txt中按月份顺序存有某企业某年12个月的销售额。要求在程序执行时,鼠标单击—个单选按钮,则Text1中显示相应季度的销售总额,并把相应的文字显示在标签上。图2是单击“第三季度”单选按钮所产生的结果。请填空。
Dim sales(12) As Long
Private Sub Form_load()
Open "sales.txt" For Input As #1
Fork=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=Op1(Index).【 】&"销售总额"
Text1=sum
End Sub
选项
答案
Op1_Click , 3 , Caption
解析
本题是要求鼠标单击哪个单选按钮,则Text1中显示相应季度的销售总额,所以该题的第1空应该填 Op1 Click。一年有十二个月,分四个季度,每3个月是1个季度,所以该题的第2空应该填3。Caption属性表示控件中显示的内容,所以该题的第3空应该填Caption。
转载请注明原文地址:https://kaotiyun.com/show/Vj1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
java.lang.object类中实现线程通信的两个方法是()。
字符串分为两大类,一类是字符串常量,使用String类的对象表示,另一类是字符串变量,使用【】类的对象表示。
假设a是int类型的变量,并初始化为1,则下列各项中属于合法条件语句的是()。
下面的说法中正确的是()。Ⅰ:有float型数据定义floatf1=100.00f;FloatF1=newfloat(f1),要把float型转换为double型时用Doubled1=F1.doubleValue()。Ⅱ:有
软件需求分析阶段的工作,可以分为4个方面:需求获取、需求分析、编写需求分析说明书和()。
如果抛出异常,则应用语句()。
下面各项语句中会产生编译错误的是()。
下列赋值语句中错误的是()。
在switch(expression)语句中,expression的数据类型不能是(),
算法的空间复杂度是指算法执行过程中所需要的【】。
随机试题
低血糖出现交感神经兴奋症状是由于释放大量
王某因刑讯逼供而申请司法赔偿确认,法院对刑讯逼供的确认应在在()内完成。
建设工程安全生产管理,坚持安全第一、预防为主的方针。()
禁止玉米种子进境是为了防止( )传入我国。
对装运出口易腐烂变质食品的船舱和集装箱,收货人或者装箱单位必须在装货前申请检验。( )
只有在没有现金净流量为正的项目的时候才会支付股利的方式是()。
中学生楚某自从结交了几个游手好闲的社会青年后,逐渐变得不思进取,经常逃学旷课,迷恋网络游戏。经学校多次教育,他仍不思悔改,受到了学校的纪律处分。毕业后,他进一步发展到敲诈勒索一些中学生的地步,甚至盗窃财物、参与赌博,最终被人民法院判刑。谈谈这一案例对教
Thegovernmentistobanpaymentstowitnessesbynewspapersseekingtobuyuppeopleinvolvedinprominentcases【C31】______the
下面对对象概念描述错误的是( )。
A、Thecolorisnotpopular.B、Thestyleisfashionable.C、Thepriceisthelowestintheshop.D、ThesizeisunsuitableforChri
最新回复
(
0
)