题目内容（请给出正确答案）

[主观题]

编写以下两个事件过程，在一般情况下（即不按住Shift键和锁定大写)，运行程序，如果按A键，则程序的输

编写以下两个事件过程，在一般情况下(即不按住Shift键和锁定大写)，运行程序，如果按A键，则程序的输出是 ______。 Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer) Print Chr(KeyCode) End Sub Private SubForm_KeyPress(KeyAscii As Integer) Print KeyAscii End Sub

A．A 65

B．a 65

C．A 97

D． a 97

查看答案

如果结果不匹配，请联系老师获取答案

您可能会需要：

重置密码查看订单联系客服

安装优题宝APP，拍照搜题省时又省心！

更多“编写以下两个事件过程，在一般情况下（即不按住Shift键和锁…”相关的问题

第1题

编写如下两个事件过程。 Private Sub Form_KeyDown（KeyCode As Integer,Shift As Integer)Print C

编写如下两个事件过程。

Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)

Print Chr(KeyCode)

End Sub

Private Sub Form_KeyPress(KeyAcii As Integer)

Print Chr(KeyAscii)

End Sub

在一般情况下(即不按住Shift键和锁定大写键时)运行程序,如果按"A"键,则程序输出的结果是

A．A A

B．a A

C．A

D．a a

点击查看答案

第2题

编写如下两个事件过程：Private Sub Form_KeyDown（KeyCode As Integer，Shift As Integer)Print Ch

编写如下两个事件过程：

Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer)

Print Chr(KeyCode)

End Sub

Private Sub Form_KeyPress(KeyAscii As Integer)

Print Chr(KeyAscii)

End Sub

在一般情况下(即不按住"Shift"键和锁定大写键时)运行程序，如果按“A”键，则程序输出的结果是

A．AA

B．Aa

C．Aa

D．aa

点击查看答案

第3题

编写如下两个事件过程：Private Sub Form_KeyDown（KeyCode As Integer，Shift As Integer) Print C

编写如下两个事件过程： Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) Print Chr(KeyAscii) End Sub 在一般情况下(即不按住“Shift”键和锁定大写键时)运行程序，如果按“A”键，则程序输出的结果是

A． A A

B．a A

C． A a

D．a a

点击查看答案

第4题

在窗体上画一个命令按钮Command1和两个文本框，名称分别为Text1和Text2。编写如下两个事件过程：Dim

在窗体上画一个命令按钮Command1和两个文本框，名称分别为Text1和Text2。编写如下两个事件过程： Dim Str1 As String，str2 As String Private Sub form_load() Text1.Text="" Text2.Text="" Text1.Enabled=False Text2.Enabled=False End Sub Private Sub Form_KeyPress(KeyAscii As Integer) str1=str1&Chr(KeyAscii) End Sub Prirate Sub Form_KeyDown(KeyCode As Integer，Shift As Integer) str2=str2&Chr(KeyCode) End Sub Private Sub Command1_Click() Text1.Text=str1 Text2.Text=str2 str1="" str2="" End Sub 当在设计阶段的窗体的KeyPreview属性设置为True时，程序运行过程中，在键盘上输入小写字母abc，然后单击命令按钮，则文本框Text1中显示的内容为

A．abc

B．不显示任何信息

C．ABC

D．出错

点击查看答案

第5题

在窗体上有一个名称为Command1的命令按钮，并编写有如下事件过程：记录类型定义如下：下列叙述

在窗体上有一个名称为Command1的命令按钮，并编写有如下事件过程：记录类型定义如下：下列叙述中正确的是（）。

A. 记录类型animal不能在Form1中定义，必须在标准模块中定义

B. 如果文件c：\vbTest．dat不存在，则Open命令执行失败

C. 由于Put命令中没有指明记录号，因此每次都把记录写到文件的末尾

D. 语句“Put#1,,rec”将animal类型的两个数据元素写到文件中

点击查看答案

第6题

窗体上添加有3个命令按钮，分别命名为Commandl、Command2和Command3，编写Commandl的单击事件过程，

完成的功能为：当单击按钮Commandl时，按钮Command2可用，按钮Command3不可见。以下正确的是（）。

A. 窗体上添加有3个命令按钮，分别命名为Commandl、Command2和Command3，编写Com

B. 窗体上添加有3个命令按钮，分别命名为Commandl、Command2和Command3，编写Com

C. 窗体上添加有3个命令按钮，分别命名为Commandl、Command2和Command3，编写Com

D. 窗体上添加有3个命令按钮，分别命名为Commandl、Command2和Command3，编写Com

点击查看答案

第7题

假定在窗体（名称为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(reCreC.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类型的两个数据元素写到文件中

点击查看答案

第8题

在窗体中绘制两个文本框和一个命令按钮，然后在命令按钮的代码窗口中编写如下事件过程：Private Su

在窗体中绘制两个文本框和一个命令按钮，然后在命令按钮的代码窗口中编写如下事件过程：

Private Sub Command1_Click()

Text1＝"VB programming"

Text2＝Text1

Text1＝"ABCD"