首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个文本框,然后编写如下事件过程: Private Sub Textl_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(K
在窗体上画一个文本框,然后编写如下事件过程: Private Sub Textl_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(K
admin
2020-06-30
37
问题
在窗体上画一个文本框,然后编写如下事件过程:
Private Sub Textl_KeyPress(KeyAscii As Integer)
Dim char As String
char=Chr(KeyAscii)
KeyAscii=Asc(UCase(char))
Textl.Text=String(6,KeyAscii)
End Sub
程序运行后,如果在键盘上输入字母“a”,则文本框中显示的内容为( )。
选项
A、a
B、A
C、aaaaaa
D、AAAAAA
答案
D
解析
本题考查KeyPress事件过程和字符串函数。KeyPress事件的过程格式为:Sub obje2013w47/ct_KeyPress([Index As Integer,]KeyAscii As Intoger),其中KeyAscii为字符ASCⅡ码。当在文本框中输入字符a后,UCase函数把输入的字符转化为大写字符,Asc函数则把字符转化为ASCⅡ码值。String函数则产生6个同样的字符A。
转载请注明原文地址:https://kaotiyun.com/show/6UHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有名称为Commandl的命令按钮和名称为Textl的文本框PrivateSubCommand1Click()PrivateSubTextlGotFocus0Text1.Text=“程序设计”Textl.Text=“等级考试”T
下列叙述中正确的是()。
在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的KeyPreview属性设置为True,然后编写如下代码:DimSaveAllAsStringPrivateSubForm_Load()Text1.Te
阅读程序:PrivateSubForm_Click()a=0Forj=1To15a=a+jMod3NextjPrintaEndSub程序运行后,单击窗体,输出结
己知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分,某人编写程序如下:OptionBase1PrivateSubCommand1Click()DimsumAsInteg
VisualBasic控件一般都规定一个默认属性,在引用这样的属性时,只写对象名而不必给出属性名。默认属性为Caption的控件是
设循环队列的存储空间为Q(1:35),初始状态为front=rear=35。现经过一系列入队与退队运算后,front=15,rear=15,则循环队列中的元素个数为
在医院,每个医生只属于某一个诊疗科,医生同一天可为多位患者看病,而一名患者可在多个科室治疗。则实体医生和患者之间的联系是
将E-R图转换为关系模式时,实体和联系都可以表示为( )。
随机试题
下列选项中,属于劳动争议当事人权利的是()。
患儿,男,3岁,体重13kg。近1月来食欲不振,面色少华,倦怠乏力,大便偏稀,夹有不消化食物,舌质淡,苔薄白。应首先考虑的中医诊断是
男,4岁。近3个月发现右侧腹部有一肿物,增长迅速,行经腹肾切除术,病理为肾母细胞瘤。术后首选的辅助治疗方法是
患者,女性,30岁,患乙型肝炎住院60d,痊愈出院。消毒患者的毛巾,最佳的方法是
某项目部专职安全生产管理人员经公路水运安全生产三类人员培训及考核合格后,取得()考核合格证书。
在如图7—7所示电路中,当未接10V理想电压源时,I=5A,接入后,I将变为()A。
确定档案的保管期限的工作属于()
阅读《游褒禅山记》教学实录的片段,回答问题。案例:师:大家说说你们平时游览山川的目的是什么?(学生纷纷积极回答)生:游览山川纯粹就是为了赏风景呗,晨起登山看日出,傍晚登山等日落,感觉可以一览众山小,欣赏祖国的大好河山。生:距离我
判定表和判定树是数据流图中用以描述加工的工具,它常描述的对象是()。
Now,youngpeoplearegrabbingtheirpassportsandtravelaroundtheworldontheirown,notbecausetheyhavenoonetotravel
最新回复
(
0
)