首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label1和 Command1,然后编写如下两个事件过程: Private Sub Command1_Click() str Text=InputBox("请输入"
在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label1和 Command1,然后编写如下两个事件过程: Private Sub Command1_Click() str Text=InputBox("请输入"
admin
2013-01-23
43
问题
在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label1和 Command1,然后编写如下两个事件过程: Private Sub Command1_Click() str Text=InputBox("请输入") Text1.Text=strText End Sub Private Sub Text1_Change() Label1.Caption=Right(Trim(Text1.Text),3) End Sub 程序运行后,如果在对话框中输入abcdef,则在标签中显示的内容是 ______。
选项
A、空
B、abcdef
C、abc
D、def
答案
8
解析
Trim函数返回Variant(String)类型,其中包含指定字符串的拷贝,但不包含前导和尾随空白。Right(字符串,n):返回“字符串”的后n个字符。这里的“字符串”可以是字符串常量、字符串变量、字符串函数或字符串连接表达式。本题中输入的是abcdef,返回后3个字符就是def。
转载请注明原文地址:https://kaotiyun.com/show/J5hp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在设计阶段,当双击窗体上的某一个文本框控件时,系统将在代码窗口中显示该文本框控件的事件过程模板是
编写如下事件过程:PrivateSubFormKeyDown(KeyCodeAsInteger,ShiftAsInteger)If(ButtonAnd3)=3ThenPrint"AAAA"
设根结点的层次为0,则高度为k的二叉树的最大结点数为【】。
当控件的()属性设置为1时,可进行自动拖放。
已知某弹出式菜单名为“p1”,它的Visible属性为False。现在要让它在名为Form1的窗体上弹出,使用的命令是()。
如果文本框的Enabled属性被设置为False,则运行时
设有如下变量声明:DimTestDateASDate为变量TestDate正确赋值的表达方式是
VisualBasic集成开发环境有3种工作状态,不属于3种工作状态之一的是
编写如下事件过程:PrivateSubFormMouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfShift=6And
随机试题
(20ll,2013)质量为m,半径为R的均质圆盘,绕垂直于图面的水平轴O转动,其角速度为ω,在图4—78示瞬时,角加速度为零,盘心C在其最低位置,此时将圆盘的惯性力系向O点简化,其惯性力主矢和惯性力主矩的大小分别为()。
任何单位或者个人都()向负有安全生产监督管理职责的部门报告事故隐患、举报安全生产违法行为。
对环境管理体系的模式建立在一个由( )诸环节构成的动态循环过程的基础上。
建筑的防火设计可以分为建筑被动防火系统、建筑主动防火系统和安全疏散系统三部分,下列属于建筑被动防火系统的是()。
(操作员:李主管;账套:102账套;操作日期:2014年1月31日)设置固定资产变动方式。固定资产变动方式编码:05固定资产变动方式名称:盘盈变动类型:增加固定资产。
主承销商出具的推荐函应当至少应包括( )。
只有当外部审计组织按照有关监管法律的授权或接受监管当局的委托对商业银行进行审计时,其工作才具有风险监管的性质。()
•Lookatthestatementsbelowandthebookreviewsontheoppositepage.•Whichsection(A,B,CorD)doeseachstatement1-7
Thepressure______causesAmericanstobeenergetic,butitalsoputsthemunderaconstantemotionalstrain.
WhenpeoplesaythatCambridgeisauniversitytown,theydonotmeanthatitisatownwithauniversityinit.Auniversityto
最新回复
(
0
)