首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Forml的窗体上绘制三个名称为Labell、Label2、Label3的控件和两个名称分别为COMSTART和COMEXIT、标题分别为“开始”和“退出”的命令按钮。编写函数Item(A,N),其功能是由数字A组成的不多于N位数的整数,利用该函数
在名称为Forml的窗体上绘制三个名称为Labell、Label2、Label3的控件和两个名称分别为COMSTART和COMEXIT、标题分别为“开始”和“退出”的命令按钮。编写函数Item(A,N),其功能是由数字A组成的不多于N位数的整数,利用该函数
admin
2010-07-13
54
问题
在名称为Forml的窗体上绘制三个名称为Labell、Label2、Label3的控件和两个名称分别为COMSTART和COMEXIT、标题分别为“开始”和“退出”的命令按钮。编写函数Item(A,N),其功能是由数字A组成的不多于N位数的整数,利用该函数求6666—666—66—6的值并把结果写入考生文件夹下的out.dat文件中。单击完毕,“开始”按钮变为“完成”,且无效,如图66—6所示。
选项
答案
本题主要考查标签控件的使用和循环程序设计思想。控件是否可用通过其Enable属性设置,当Enable属性为True时控件可用,当Enable为False时控件不可用(灰色);命令按钮的标题通过Caption属性设置;Str$函数将数字转换为字符串。 ①建立界面并设置控件属性。程序中用到的控件及其属性见下表: [*] ②打开工程资源管理器,右击窗体,选择查看代码项,在弹出的代码窗口输入代码如下: Option Explicit Private Sub Cmdl_Click() Dim A As Integer Dim N As Integer,J As Integer,Sum As Single A=6:N=4 For J=N To l Step-l If J=N Then Sum=Item(A,J) Else Sum+Sum-Item(A,J) End If Next J Print"Sum=";Sum Open App.Path&"\”&"out.dat"For Output As#l Print#1,Sum Close#1 Cmdl.Caption="完成" Cmdl.Enabled=False End Sub Function Item(A,N) Dim P As String,Q As String,S As Single Dim i As Integer,H As Single P="" For i=1 TO N Q$=Str$(A) P$=P$+Q$ Next i S=Val(P$) H=H+S Item=H End Function Private Sub Crod2 Click() End End Sub
解析
转载请注明原文地址:https://kaotiyun.com/show/mGmp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
Applet运行时,被浏览器或AppletViewer调用的第一个方法是( )。
当处理的数据量很多,或向文件写很多次少量的数据,一般使用( )流。
下面程序段的输出结果是( )。publicclassTest{publicstaticvoidmain(String[]args){intj=2,i=5;whi
Applet是能够嵌入到【】页面中,并能够在浏览器中运行的Java类。
在文件类提供的方法中,用于创建目录的方法是( )。
通过类MyClass中的不含参数的构造函数,生成该类的一个对象obj,可通过以下语句实现:______。
下列程序的功能是创建了一个显示5个"Hello!"的线程并启动运行,请将程序补充完整。publicclassThreadTestextendsThread{publicstaticvoidmain(Stringargs[]){Thre
下列基本命令中,属于类文件分解器命令的是
随机试题
血小板计数参考值为
血栓栓子的直接形成原因是
木瓜的加工方法为( )。
某三层楼房,每层建筑面积相等,房地总价值为200万元,其中一层价值是二层价值的2倍,三层价值是二层价值的0.7倍。若建筑物总价值为120万元。下列关于土地份额分摊的表述中正确的有()。[2008年考题]
Manyyoungstershaveheardtheirparentssay"You’llneveramounttoanythingifyoukeepdaydreamingthatway!"
“所有的人和阶级都是历史的创造者”,这一观点
数字用户线路接入种类很多,其中非对称数字用户线是(43)。光纤接入网有多种,其中(44)是最理想的。
Completethenotesbelow.WriteONEWORDONLYforeachanswer.GRAPHICALSYMBOL’Graphicalsymbol’includesthelogographsi
Wehaveaskedyoutocometoour"Thank-YouParty"todaytoshowourheartfeltgratitudetoallofyouforbeingourreliable【T1
Psychologicallytherearetwodangerstobeguardedagainstinoldage.Oneoftheseisundueabsorptioninthepast.Itdoesno
最新回复
(
0
)