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

admin2018-10-15 62

问题设窗体上有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
IfKeyAscii=13 Then
   For k=1 To Len(Text1)
      ch$=Mid(Textl，k，1)
      If”a”<=ch And ch<=”z”Then n=n+1
Next k
Text2=n
  End If
End Sub
运行程序，在Textl中输入“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://www.kaotiyun.com/show/lFFp777K

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

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

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

二级VB

NCRE全国计算机二级

某人编写了下面的程序，希望能把Text1文本框中的内容写到out.txt文件中：PrivateSubCommand1_Click()　　Open"out.txt"ForOutputAs#2　　Print"Text1"　　Close

设窗体文件中有下面的事件过程：PrivateSubCommand1_Click()　　Dims　　a%＝100　　PrintaEndSub其中变量a和s的数据类型分别是(　　)。

在数据管理的三个发展阶段中，数据的共享性好且冗余度最小的是

表达式Int(5.3)+Int(-5.8)>Fix(5.3)+Fix(-5.8)的值是

窗体上已有1个名称为Picture1的图片框，要求实现下面2个功能之一：（1）在窗体上移动鼠标时，立即将Picture1显示在鼠标位置（2）在窗体上单击鼠标时，立即将Picture1显示在鼠标位置下面不能实现上述任何功能的事件过程是

数据字典（DD)所定义的对象都包含于

为了使每秒钟发生一次计时器事件，可以将其Interval属性设置为(　　)。

设窗体上有名称为Option1的单选按钮，且程序中有语句：IfOpfion1．Value=TrueThen下面语句中与该语句不等价的是()。

正在活动的整体滑坡，剪切裂缝多出现在滑坡体的哪一个部位?

菲利普斯曲线反映的是通货膨胀与失业率之间的正相关关系。(　　)

下列几位申请人，不满足申请国家助学贷款资格的是()。

下列关于资本的作用的说法，正确的有（）

导游语言要“动情”。“动情”就是导游人员要善于运用富有感染力的语言，消除导游人员与旅游者的心理距离，尽快接近旅游者，取得旅游者的信任，帮助旅游者尽快进入旅游的最佳角色状态，保持旺盛的旅游兴趣。()

简述电影音乐的功能

生产资料是由()。

MostofthefirstBlackslavesthatbecamecowboys______.Whatdoyouthinkmostslavesthoughtaboutlivingandworkingonra

80386微处理器的通用寄存器有(　　　)个。

在ARM汇编语言中，小端模式下，通过伪指DataTabDCW0x1234，0x5678，0x9ABC，0xDEF0在内存中定义了这4个16位无符号数，R1=0x00000089，则在执行伪指令LDRR0，=MyData后再执行指令STR．R1，[R

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

二级VB

NCRE全国计算机二级

某人编写了下面的程序，希望能把Text1文本框中的内容写到out.txt文件中：PrivateSubCommand1_Click() Open"out.txt"ForOutputAs#2 Print"Text1" Close

设窗体文件中有下面的事件过程：PrivateSubCommand1_Click() Dims a%＝100 PrintaEndSub其中变量a和s的数据类型分别是( )。

在数据管理的三个发展阶段中，数据的共享性好且冗余度最小的是

表达式Int(5.3)+Int(-5.8)>Fix(5.3)+Fix(-5.8)的值是

窗体上已有1个名称为Picture1的图片框，要求实现下面2个功能之一：（1）在窗体上移动鼠标时，立即将Picture1显示在鼠标位置（2）在窗体上单击鼠标时，立即将Picture1显示在鼠标位置下面不能实现上述任何功能的事件过程是

数据字典（DD)所定义的对象都包含于

为了使每秒钟发生一次计时器事件，可以将其Interval属性设置为( )。

设窗体上有名称为Option1的单选按钮，且程序中有语句：IfOpfion1．Value=TrueThen下面语句中与该语句不等价的是()。

正在活动的整体滑坡，剪切裂缝多出现在滑坡体的哪一个部位?

菲利普斯曲线反映的是通货膨胀与失业率之间的正相关关系。( )

下列几位申请人，不满足申请国家助学贷款资格的是()。

下列关于资本的作用的说法，正确的有（）

导游语言要“动情”。“动情”就是导游人员要善于运用富有感染力的语言，消除导游人员与旅游者的心理距离，尽快接近旅游者，取得旅游者的信任，帮助旅游者尽快进入旅游的最佳角色状态，保持旺盛的旅游兴趣。()

简述电影音乐的功能

生产资料是由()。

MostofthefirstBlackslavesthatbecamecowboys______.Whatdoyouthinkmostslavesthoughtaboutlivingandworkingonra

80386微处理器的通用寄存器有( )个。

在ARM汇编语言中，小端模式下，通过伪指DataTabDCW0x1234，0x5678，0x9ABC，0xDEF0在内存中定义了这4个16位无符号数，R1=0x00000089，则在执行伪指令LDRR0，=MyData后再执行指令STR．R1，[R

某人编写了下面的程序，希望能把Text1文本框中的内容写到out.txt文件中：PrivateSubCommand1_Click()　　Open"out.txt"ForOutputAs#2　　Print"Text1"　　Close

设窗体文件中有下面的事件过程：PrivateSubCommand1_Click()　　Dims　　a%＝100　　PrintaEndSub其中变量a和s的数据类型分别是(　　)。

为了使每秒钟发生一次计时器事件，可以将其Interval属性设置为(　　)。

菲利普斯曲线反映的是通货膨胀与失业率之间的正相关关系。(　　)

80386微处理器的通用寄存器有(　　　)个。