首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上有一个文本框,其名称为Text1,编写下列事件过程: Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String str=Chr(KeyAscii) KeyAscii=Asc(
在窗体上有一个文本框,其名称为Text1,编写下列事件过程: Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String str=Chr(KeyAscii) KeyAscii=Asc(
admin
2013-04-11
69
问题
在窗体上有一个文本框,其名称为Text1,编写下列事件过程:
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim str As String
str=Chr(KeyAscii)
KeyAscii=Asc(UCase(str))
Text1.Text=Stririg(2,KeyAscii)
End Sub
程序运行后,如果在键盘上输入字母“a”,则在文本框Text3中显示的内容为( )。
选项
A、aaa
B、AAA
C、AA
D、aa
答案
B
解析
UCase(str)将str转成大写的字符串;String(n,character)返回n个重复的字符,如果character是ASCII码,则返回其对应的字符。程序运行过程为:首先输入字母“a”,并通过“str=Chr(KeyAscii)”语句将a的ASCII值转换成字符串;然后通过“KeyAscii=Asc(UCase(str))”求得大写A的ASCII值,并显示在文本框中;最后通过“Text1.Text=String(2,KeyAscii)”语句为文本框输入了两个字母“A”,所以最后在文本框中显示出3个大写字母“A”。
转载请注明原文地址:https://jikaoti.com/ti/pUO0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
VisualBasic中的控件分为3类,它们是标准控件、【】和可插入对象。
用链表表示线性表的优点是______。
一个项目具有一个项目主管,一个项目主管可管理多个项目,则实体“项目主管”与实体“项目”的联系属于【】的联系。
设A="123456",则表达式Val(Left(A,4)+Mid(A,4,2))的值为
把窗体的KeyPreview属性设置为True,然后编写如下过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)En
程序流程图(PFD)中的箭头代表的是______。
在VisualBasic中,要设置菜单项的快捷访问键,应使用的符号是______。
表达式2*4^2-2*6/3+3\2的值是【】。
在名为Form1的窗体上绘制一个标签,名为Lab1,标题为“体育生活”;再绘制一个名为Chk1的复选框数组,含3个复选框,它们的Index属性分别为0、1、2,标题依次为“足球”、“篮球”和“排球”,请设置复选框的属性,使其初始状态如下表所示。注
随机试题
显示溶血存在的检验是
患者戴用全口义齿2周,复诊自述义齿易松动。询问病史时,最重要的应了解患者
关于隐性感染,下列哪一项是不正确的
白某一日在街上购物时捡到一个钱包,打开发现包内有现金8000元,遂将钱包交给路过的巡逻民警吴某。吴某见财起意,将这8000元据为己有。吴某的行为构成:
下列选项中,属于附加刑的有()。
游客是服务的主体,旅游团的一切旅游设计、日程安排、导游服务准备的具体实施,都是以游客为中心来实现的。()
______isthestudyofhowwordscombinetoformsentencesandtheruleswhichgoverntheformationofsentences.
1 Humanbeingshaveusedtoolsforaverylongtime.Insomepartsoftheworldyoucanstillfindtoolsthatpeopleusedmore
Haveyoueverheardthecolorblue?OrtastedthemusicalnoteF-sharp?Formostpeople,inbothcasestheansweris"no".But
A、Thestudentsdidn’tenjoyit.B、Theprofessordidn’tgetwellprepared.C、Notallthestudentsshowedup.D、Theprofessorfail
最新回复
(
0
)