首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个文本框,其名称为Text1,然后编写以下程序: Private Sub Form_Load() Show Text1.Text = "" Text1.SetFocus End Sub Private Sub Text1
在窗体上画一个文本框,其名称为Text1,然后编写以下程序: Private Sub Form_Load() Show Text1.Text = "" Text1.SetFocus End Sub Private Sub Text1
admin
2019-03-14
66
问题
在窗体上画一个文本框,其名称为Text1,然后编写以下程序:
Private Sub Form_Load()
Show
Text1.Text = ""
Text1.SetFocus
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
Char = Chr(KeyAscii)
KeyAscii = Asc(UCase(Char))
End Sub
以上程序的功能是
选项
A、把输入到文本框中的字母转换为小写显示
B、把从键盘上输入的字符在文本框中原样显示
C、把输入到文本框中的字母转换为大写显示
D、把输入到文本框中的字符转换为其ASCII码显示
答案
C
解析
Chr() 是把ASCII码转换为对应的字符。UCase转换成大写。Asc求字符串表达式的第一个字符的ASCII 编码。答案选C)。
转载请注明原文地址:https://kaotiyun.com/show/rEUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Textl的文本框,一个名称为Commandl的命令按钮。窗体文件的程序如下:PrivateTypeXPrivateSubCommandlClick()aAsInteger:bAsIntegerDimYAsx
软件(程序)调试的任务是
在数据管理技术发展的三个阶段中,数据共享最好的是
有下面程序代码:PrivateSubCommandl—Click()DimxAsInteger,sAsIntegerx=1Fork=1To3x=x+1:proex:s=s+xNextkPrintsEndSubP
下面是求最大公约数的函数的首部Functiongcd(ByValxAsInteger,ByValyAsInteger)AsInteger若要输出8、12、16这3个数的最大公约数,下面正确的语句是
执行下列语句strlnput=InputBox(“请输入字符串”,“字符串对话框”,“字符串”)将显示输入对话框。此时如果直接单击“确定”按钮,则变量strlnput的内容是
运行下列程序时,输出的结果是()。PrivateSubFormClick()Dimxx=Array(“Software”,“and”,“Hardware“,”System”)Fori=LBound(x,1)ToUBound(x
窗体上有1个名称为Commandl的命令按钮,事件过程及函数过程如下:PrivateSubCommandlClick()DimmAsStringm;InputBox(“请输入字符串”)Printpick_str(m)EndSub
下列关于键盘事件的说法中,正确的是()。
随机试题
患者,男性,68岁。高血压病史10年,1周前查体心电图显示窦性心动过速,可用于治疗的药物是
在考生文件夹下有一个数据库文件“samp3.accdb”,里面已经设计了表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。同时,给出窗体对象“fEmp”上一个按钮的单击事件代码,请按以下功能要求补充设计:设置窗体对象“
保证在组织中“事事有人做”体现了下面的哪个职能()
医疗保险制度改革的主要任务是
DDN的数字交叉连接设备的作用包括()。
某项工程业主与承包商签订了工程施工合同,合同中含两个子项工程,估算工程量甲项为2300m3,乙项为3200m3,经协商合同单价甲项为180元/m3,乙项160元/m3。合同工期为4个月。合同约定:(1)开工前业主应向承包商支付合同价20%的预付款
下列情况应视同销售缴纳消费税的有( )。
某商场在一楼和二楼间安装一自动扶梯,该扶梯以均匀的速度向上行驶,一男孩与一女孩同时从自动扶梯走到二楼(扶梯本身也在行驶),假设男孩与女孩都做匀速运动,且男孩每分钟走动的级数是女孩的两倍,已知男孩走了27级到达扶梯顶部,而女孩走了18级到达扶梯顶部(设男孩、
请从所给的四个选项中,选择最合适的一个填入问号处,使之呈现一定的规律性:
WhatwouldMaryliketodo?
最新回复
(
0
)