![](https://lstatic.shangxueba.com/jiandati/pc/images/pc_jdt_tittleico.png)
(20 )设窗体的名称为 Form1 ,标题为 Win ,则窗体的 MouseDown 事件过程的过程名是A ) Form1_Mou
(20 )设窗体的名称为 Form1 ,标题为 Win ,则窗体的 MouseDown 事件过程的过程名是
A ) Form1_MouseDown
B ) Win_MouseDown
C ) Form_MouseDown
D ) MouseDown_Form1
![](https://lstatic.shangxueba.com/jiandati/pc/images/jdt_panel_vip.png)
(20 )设窗体的名称为 Form1 ,标题为 Win ,则窗体的 MouseDown 事件过程的过程名是
A ) Form1_MouseDown
B ) Win_MouseDown
C ) Form_MouseDown
D ) MouseDown_Form1
A.Form1_MouseDown
B.Win_MouseDown
C.Form_MouseDown
D.MouseDown_Form1
A.Form1的Capdon属性值为100
B.Form2的Caption属性值为-100
C.Form1的Caption属性值为-100
D.Form2的Capdon属性值为100
Private Sub Command1_Click()
Dim a As Integer
a=10
Call g(Form2,a)
End Sub
Private Sub g(f As Form,x As Integer)
y=IIf(x>10,100,-100)
f,Show
f.Caption=y
End Sub
运行以上程序,正确的结果是()。
A.Form1的Caption属性值为100
B.Form2的Caption属性值为-100
C.Form1的Caption属性值为-100
D.Form2的Caption属性值为100
假定在窗体(名称为Form1)的代码窗口中定义如下记录类型: Private Type animal animalName As String*20 aColor As String*10 End Type 在窗体上面一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim rec As animal Open "c:\vbTest. dat" For Random As #1 Len=Len(rec)rec. animalName="Cat" rec. aColor="White" Put #1, , rec End Sub 则以下叙述中正确的是______。
A.记录类型animal不能在Form1中定义,必须在标准模块中定义
B.如果文件"c:\vbTest. dat"不存在,则Open命令执行失败
C.由于Put命令中没有指明记录号,因此每次都把记录写到文件的末尾
D.语句“Put #1, , rec”将animal类型的两个数据元素写到文件中
假定在窗体(名称为Form1)的代码窗口中定义如下记录类型: Private Type animal animalName As String*20 a Color As String*10 End Type 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Crick() Dim rec As animal Open"c:\vbTest.dat"For Random As #1 Len=Len(rec) rec.animalName="Cat" rec.aColor="White" Put #1,,rec Close #1 End Sub 则以下叙述中正确的是()。
A.记录类型animal不能在Form1中定义,必须在标准模块中定义
B.如果文件c:\vbTest.dat不存在,则Open命令执行失败
C.由于Put命令中没有指明记录号,因此每次都把记录写到文件的末尾
D.语句“Put#l,,rec”将animal类型的两个数据元素写到文件中
假定在窗体(名称为Form1)的代码窗口中定义如下记录类型:
Private Type animal
AnimalName As String*20
AColor As String*10
End Type
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim rec As animal
Open "c:\vbTest.dat" For Random As #1 Len = Len(rec)
rec.animalName = "Cat"
rec.aColor = "White"
Put #1, , rec
Close #1
End Sub
则以下叙述中正确的是()。
A.记录类型animal不能在Form1中定义,必须在标准模块中定义
B.如果文件c:\vbTest.dat不存在,则Open命令执行失败
C.由于Put命令中没有指明记录号,因此每次都把记录写到文件的末尾
D.语句“Put #1, , rec”将animal类型的两个数据元素写到文件中
试题9
若窗体名称为Form1,则将该窗体标题设置为“Access窗体”的语句时__【9】_____。
A.1 5
B.0 5
C.0 0
D.程序有错
为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!