设窗体上有Text1、Text2两个文本框，并编写了下面的程序代码： Private Sub Text1_KeyPress(KeyAscii As Integer) If”A”

admin2018-10-18 14

问题设窗体上有Text1、Text2两个文本框，并编写了下面的程序代码：
Private Sub Text1_KeyPress(KeyAscii As Integer)
If”A”<=Chr(KeyAscii)And Chr(KeyAscii)<=”Z”Then
KeyAscii=KeyAscii+(Asc(”a”)一Asc(”A”))
End If
n=0
IfKevAscii=13 Then
For k=1 To Len(Text1)
ch$=Mid(Text1，k，1)
If”a”<=ch And ch<=”z”Then n=n+1
Next k
Text2=n
End If
End Sub
运行程序，在Text1中输入“Visual Basic 6．0”后按回车键，则在Text2文本框显示的是

选项 A、11
B、16
C、Visual Basic 6．0
D、visual basic 6．0

答案A

解析本题中的第一个If…Then结构的作用是将所有输入的大写字符转换为小写字符；第二个If结构的条件是按下回车键，里面嵌套了一个For循环，在循环中依次取出文本框中的每一个字符进行判断，若其为小写字符则n自加1，循环结束后n的值就是文本框中字母的个数。

转载请注明原文地址:https://jikaoti.com/ti/Ufm0FFFM

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

设窗体上有Text1、Text2两个文本框，并编写了下面的程序代码： Private Sub Text1_KeyPress(KeyAscii As Integer) If”A”

二级VB

NCRE全国计算机二级

窗体上有一个名称为Combo1的组合框，为了引用Combo1中最后一个列表项，应使用的表达式是

下列叙述中正确的是(　　)。

若已把一个命令按钮的Default属性设置为True，则下面可导致按钮的Click事件过程被调用的操作是(　　)。

在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1)，并把窗体的KeyPreview属性设置为True，然后编写如下代码：DimSaveAllAsStringPrivateSubForm_Load()　　Show

如果在VisualBasic集成环境中没有打开属性窗口，下列可以打开属性窗口的操作是(　　)。

下面属于白盒测试方法的是

某二叉树共有7个结点，其中叶子结点只有1个，则该二叉树的深度为(假设根结点在第1层)(　　)。

设在当前目录下有一个名为"file.txt"的文本文件，其中有若干行文本。编写如下程序：PrivateSubCommand1_Click()　　Dimch$，asciiAsInteger　　Open"file.txt"ForInpu

一棵二叉树共有25个结点，其中5个是叶子结点，则度为1的结点数为(　　)。

A、DYBEAFCZXB、YDEBFZXCAC、ABDYECFXZD、ABCDEFXYZC前序遍历是指在访问根结点、遍历左子树与遍历右子树这三者中，首先访问根结点，然后遍历左子树，最后遍历右子树；并且，在遍历左右子树时，仍然先访问根结点，然后遍历左

全身炎症反应综合症的主要表现为（）

内脏痛最主要的特点是

临床中进行肥达试验最常采用的方法为

预应力混凝土悬臂梁、连续梁、刚构、斜拉桥等结构都可采用（）施工方法。

()的经营形式税负最重。

统计调查对象中，必须取得统计从业资格、持有统计从业资格证书的人员是()。

剩余权益收益等于()。

某夫妻二人因为感情不和提出离婚，那么二人在诉讼离婚时必经的庭审程序是()

关于诉讼时效制度的表述，正确的是()。

设窗体上有Text1、Text2两个文本框，并编写了下面的程序代码： Private Sub Text1_KeyPress(KeyAscii As Integer) If”A”

二级VB

NCRE全国计算机二级

窗体上有一个名称为Combo1的组合框，为了引用Combo1中最后一个列表项，应使用的表达式是

下列叙述中正确的是( )。

若已把一个命令按钮的Default属性设置为True，则下面可导致按钮的Click事件过程被调用的操作是( )。

在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1)，并把窗体的KeyPreview属性设置为True，然后编写如下代码：DimSaveAllAsStringPrivateSubForm_Load() Show

如果在VisualBasic集成环境中没有打开属性窗口，下列可以打开属性窗口的操作是( )。

下面属于白盒测试方法的是

某二叉树共有7个结点，其中叶子结点只有1个，则该二叉树的深度为(假设根结点在第1层)( )。

设在当前目录下有一个名为"file.txt"的文本文件，其中有若干行文本。编写如下程序：PrivateSubCommand1_Click() Dimch$，asciiAsInteger Open"file.txt"ForInpu

一棵二叉树共有25个结点，其中5个是叶子结点，则度为1的结点数为( )。

A、DYBEAFCZXB、YDEBFZXCAC、ABDYECFXZD、ABCDEFXYZC前序遍历是指在访问根结点、遍历左子树与遍历右子树这三者中，首先访问根结点，然后遍历左子树，最后遍历右子树；并且，在遍历左右子树时，仍然先访问根结点，然后遍历左

全身炎症反应综合症的主要表现为（）

内脏痛最主要的特点是

临床中进行肥达试验最常采用的方法为

预应力混凝土悬臂梁、连续梁、刚构、斜拉桥等结构都可采用（）施工方法。

()的经营形式税负最重。

统计调查对象中，必须取得统计从业资格、持有统计从业资格证书的人员是()。

剩余权益收益等于()。

某夫妻二人因为感情不和提出离婚，那么二人在诉讼离婚时必经的庭审程序是()

关于诉讼时效制度的表述，正确的是()。

下列叙述中正确的是(　　)。

若已把一个命令按钮的Default属性设置为True，则下面可导致按钮的Click事件过程被调用的操作是(　　)。

在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1)，并把窗体的KeyPreview属性设置为True，然后编写如下代码：DimSaveAllAsStringPrivateSubForm_Load()　　Show　

如果在VisualBasic集成环境中没有打开属性窗口，下列可以打开属性窗口的操作是(　　)。

某二叉树共有7个结点，其中叶子结点只有1个，则该二叉树的深度为(假设根结点在第1层)(　　)。

设在当前目录下有一个名为"file.txt"的文本文件，其中有若干行文本。编写如下程序：PrivateSubCommand1_Click()　　Dimch$，asciiAsInteger　　Open"file.txt"ForInpu

一棵二叉树共有25个结点，其中5个是叶子结点，则度为1的结点数为(　　)。