首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下程序: 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
2019-03-14
44
问题
有如下程序:
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://www.kaotiyun.com/show/DpFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubForm_Click()k=0Forj=1To2Fori=1To3k=i+1Nexti
下列叙述中错误的是
(1)在名称为Form1的窗体上添加一个名称为Shape1的形状控件,通过设置参数使其形状为圆形;添加一个名称为Label1的标签,标题为“形状”,标签的大小能够根据标签内容的字数、大小而定;添加一个名称为Text1的文本框,文本框最多能够显示5个字符,文
对于图片框和图像控件,下列说法错误的是
(1)在考生文件夹下有一个工程文件sjt3.vbp,窗体中有两个图片框,名称分别为P1、P2.其中的图片内容分别是一架航天飞机和一朵云彩,一个命令按钮,名称为C1,标题为“发射”,还有一个计时器,名称为Timer1。并给出了两个事件过程,但并不完整,要求:
下面是求最大公约数的函数的首部:Functiongcd(ByValxAsInteger,ByValyAsInteger)AsInteger若要输出8、12、16这3个数的最大公约数,下面正确的语句是( )。
有如下数据定义语句:Dima,bAsIntegerDimx%,yasInteger执行上述语句后,不是整型变量的是
(1)在名称为Form1、标题为“欢迎”的窗体上画1个名称为Label1的标签,其标题内容为“欢迎使用本系统”,标题文字字体和字号分别为“宋体”、“三号”,标签大小能根据标题内容自动调整,效果如图所示。程序执行时,窗体的最大化按钮不可用(如图所示),请设置
若要清除列表框控件中的所有列表项,应该使用的方法是
下列关于数据库设计的叙述中,正确的是
随机试题
患者男性,学生,20岁,患Ⅰ型糖尿病2年,因感冒,体温39.2℃、食欲减退、恶心呕吐及腹痛入院护理查体时发现该患者呈嗜睡状态,呼吸加深加快,皮肤干燥。首先考虑患者可能是
使感光效应减小的因素是
患者女性,80岁。肺心病,近半个月来咳嗽、咳痰,今晨呼吸困难加重,烦躁不安,神志恍惚。查体:体温36.4℃,脉搏120次/分,呼吸38次/分,口唇发绀,两肺底闻及湿哕音,血压正常。患者最可能出现的并发症是
多年来,通信网主要采用铜线(缆)用户线向用户提供传送电话的业务,用户铜线(缆)网分布广泛且普及,为了进一步提高铜线传输速率,开发了()技术,以解决高速率数字信号在铜缆用户线上的传输问题。
下列说法中不正确的是()。
贷款重组的条件有()。
社会保险法调整的对象为()。
某公司拟进行股票投资,计划购买A、B、C三种股票,并分别设计了甲、乙两种投资组合。已知三种股票的β系数分别为1.5、1.0和0.5,它们在甲种投资组合下的投资比重分别为50%、30%和20%;乙种投资组合的风险收益率为3.4%。同期市场上所有股票的平均收益
实在判断:判断的最简单的形式,这里是肯定地或是否定地表明某一单个的事物的某种一般的性质(肯定判断:玫瑰花是红的;否定判断:玫瑰花不是蓝的;无限判断:玫瑰花不是骆驼)。根据以上定义,下面哪种不是实在判断?
六大行业中,私营单位与非私营单位收入差距最小的行业,人均收入差距为()元。
最新回复
(
0
)