有如下程序: 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  17

问题 有如下程序:
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
0

最新回复(0)