2. 计算机
  3. 有如下程序： 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

admin2015-06-30  61
问题 有如下程序：
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/HuQp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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