假设有如下事件过程:
Private Sub Command1_Click()
msg1$="Are You Continue to?"
msg2$="Open The Books"
r=MsgBox(msg1$,34,msg2$)
End Sub
运行该程序后,所出现的对话框的标题是【 】。
第1题:
应用程序窗体的名称属性为Frm1,窗体上有一个命令按钮,其名称属性为Cmd1,单击窗体和命令按钮的事件过程名分别为______。
A.form_ Click() Command1_Click()
B.Frm1_ Click() Command1_ Click()
C.form_ Click() Cmd1_ Click()
D.Frm1_ Click() Cmd1_ Click()
第2题:
在窗体上画一个名为Command1的命令按钮,其Command1_Click事件过程如下。 Sub Command1_Click() Dim student As studtype Dim record_no As Integer record n=1 With student .ino=12 .strname="Smith" .strsex=“男” .smark=89 End With ______ Put # 1,record_no,student Close # 1 End Sub 要求在c:\的随机文件student..dat写入一条记录。应在程序中空行处填入以下哪条语句使该功能完整
A.Open"c:\student.dat"For Input As # 1 len=len(student)
B.Open"c:\student.dat:For random As # 1 len=len(student)
C.Open"c:\student.dat"For Output As # 1 len=len(student)
D.Open"c:\student.dat"For Append As # 1 len=len(student)
第3题:
图像文件使用Image 类中的 open() 方法载入图像文件。open()的调用形式如下:
第4题:
在窗体上画一个名为Command1的命令按钮,其Command1_Click事件过程如下:
Sub Command1_Click()
Dim student As studtype
Dim record_no As Integer
record_no=1
With student
.ino=12
.strname="smith"
.strsex="男"
.smark=89
End With
_______
Put # 1,record_no,student
Close # 1
End Sub
要求在c: \的随机文件student.dat写入一条记录。应在程序中空行处填以下哪条语句使该功能完整
A.Open "c: \student.dat"For Input As #1 len(student)
B.Open "c: \student.dat"For random As #1 len(student)
C.Open "c: \student.dat"For Output As #1 len(student)
D.Open "c: \student.dat"For Append As #1 len(student)
第5题:
(25)若窗体Frm1中有一个命令按钮Cmd1,则窗体和命令按钮的Click事件过程名分别为
A)Form_Click() Command1_Click()
B)Frm1_Click() Command1_Click()
C)Form_Click() Cmd1_Click()
D) Frm1_Click() Cmd1_Click()