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

admin2015-08-28 69

问题设窗体上有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
      If KeyAscii = 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

解析 Text1_KeyPress过程中，先把输入的字符串中大小字母变成小写字母。当按下回车键后，执行For循环统计小写字母的个数。退出循环后把n值赋给Text2。选A）。

转载请注明原文地址:https://www.kaotiyun.com/show/QILp777K

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

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

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

二级VB

NCRE全国计算机二级

在VisualBasic应用程序中，以下正确的描述是______。

已知变量boo1Var是一个布尔型的变量，如果要给其赋值为True，则正确的赋值语句是______。

设a="a"，b="b"，c="c"，d="d"，执行语句x=Iif((a＜b)Or(c＞d)，"A"，"B")后，x的值为______。(2005年4月)

设窗体上有一个文本框，名称为Text1，程序运行后，要求该文本框只能显示信息，不能接收输入信息，以下能实现该操作的语句是______。

下列关于线性链表的描述中正确的是()。

只能用来显示文本信息的控件是()。

记时器控件能有规律的以一定时间间隔触发【】事件，并执行该事件过程中的程序代码。

设有如下变量声明：DimTestDateAsDate为变量TestDate正确赋值的表达方式是______。

在深度为5的满二叉树中，叶子结点的个数为______。

在深度为5的满二叉树中,叶子结点的个数为

患者男，56岁，近3年来尿频、尿急伴急迫性尿失禁，排尿不畅，尿不尽感，单位体检发现“前列腺增大”。在体格检查中与前列腺癌最一致的发现是

氯化钾静滴浓度不得超过

主要用于缓解胆汁淤积的药物是()

除享有单独关境地区的我国全部领域属于我国的关境范围。()

近年来实行综合监管体制的国家越来越多，这主要是由于金融业出现了()。

木块在水平恒力F作用下，由静止开始在水平路面上前进S，随即撤去此恒力后又前进2S才停下来，设运动全过程中路面情况相同，则木块在运动中所获得的动能的最大值为()。

A.attheminimumcostB.reinforcedbythefactoryC.crowedtogetherD.asself-reliantfarmersPhrases:A.wheretoolargem

【S1】【S5】

Chimp(黑猩猩)ShowHallmarkofHumanCulture,StudyFindsResearchershavediscoveredthatchimpanzeesnotonlyteacheachoth