首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下程序: Private Sub Form_Click() Dim s As Integer, p As Integer p=1 For i=1 To 4 For j=1 To i s=s+j Next j p=p * s Next i P
有如下程序: Private Sub Form_Click() Dim s As Integer, p As Integer p=1 For i=1 To 4 For j=1 To i s=s+j Next j p=p * s Next i P
admin
2015-06-30
21
问题
有如下程序:
Private Sub Form_Click()
Dim s As Integer, p As Integer
p=1
For i=1 To 4
For j=1 To i
s=s+j
Next j
p=p * s
Next i
Print p
End Sub
程序运行后,单击窗体,则输出结果是( )。
选项
A、在类型定义"Type RType"之前加上"Private"
B、Dim p As RType必须置于窗体模块的声明部分
C、应把Open语句中的For Random 改为 For Output
D、Put语句应该写为Put #1,p.Name , p.Tel
答案
A
解析
记录类型的定义必须放在模块的声明部分,当在标准模块中定义时,关键字Type前可以有Public(默认)或Private,而如果在窗体模块中定义,则必须在前面加上关键字Private。Open语句中使用For Random表示文件以随机方式存取。Put语句的语法为:Put #文件号,[记录号],变量。其中"变量"是除对象变量和数组变量外的任何变量。
转载请注明原文地址:https://kaotiyun.com/show/rcQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
阅读下列程序:PrivateSubCommad1_Click()DimiAsInteger,kAsIntegerk=2Fori=1To3PrintH(k)Next
设通用对话框控件的名称为CD1,希望在打开文件对话框中的“文件类型”列表中包含:所有文件、Word文档和文本文件这3类文件,在程序中设置Filter属性时正确的是
在窗体上画一个名称为List1的列表框,一个名称为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时,在标签中显示选中城市的名称。下列能正确实现上述功能的程序是
文件的打开和关闭语句分别是【】和【】。
测试的目的是暴露错误,评价程序的可靠性;而【】的目的是发现错误的位置并改正错误。
执行下列程序后,变量a的值为()DimiAsIntegerDimaAsIntegera=0Fori=lTo100Step2a=a+lNexti
在C:\Pic文件夹中有一个图形文件,名为Welcome.gif。为了将该图形装入窗体Form1,应使用的语句为()
设二叉树如下:对该二叉树进行后序遍历的结果为【】。
(1)在窗体Forml上画一个名称为Textl的文本框和一个名称为Labell的标签,程序运行时,在文本框Textl中输入字符,文本框中的字符将值赋到Labell中。注意,本程序代码中不得使用任何变量。程序运行时的窗体界面如图50—l所示。注意:
在窗体上绘制两个命令按钮,名称分别为Commandl和Command2,标题分别为“输人”和“调换”,两个标签,名称为Labell和Label2、Caption属性为“调换前:”和“调换后:”,两个名称分别为Text1和Text2的文本框控件。请编写适当
随机试题
首选以下处理病情缓解后应立即
妇炎平胶囊的功能是()。
根据《建设工程价款结算暂行办法》,发包人应在一定时间内预付工程款,否则,承包人应在预付时间到期后的一定时间内发出要求预付工程款的通知,若发包人仍不预付,则承包人可在发出通知的()天后停止施工。
在道路岩土工程应用的土工合成材料具有( )等功能。
某股份有限公司共发行股份3000万股,每股享有平等的表决权。公司拟召开股东大会对一项特别决议表决,在股东大会表决时可能出现的下列情形中,不能使决议得以通过的有()。
三级、四级风险提示的结束时间应当与风险提示信息内容同时发布。()
政府管理的创新模式主要有效率驱动模式、小型化与分权模式、追求卓越模式和()。
某区科技局为举办一场演讲比赛,给区政府送达一份报告,区政府未予回复。根据公文行文规则,下列说法正确的是()。
Theysaidinterestshallbedividedinto5partsanddistributedasfollows.
A、Askincarebrand.B、Aleatherbrand.C、Awatchbrand.D、Adailyusebrand.A
最新回复
(
0
)