首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下程序: Private Sub Form_Load() Text1.Text=””:Text2.Text=””:Text1.SetFocus End
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下程序: Private Sub Form_Load() Text1.Text=””:Text2.Text=””:Text1.SetFocus End
admin
2013-10-16
55
问题
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下程序:
Private Sub Form_Load()
Text1.Text=””:Text2.Text=””:Text1.SetFocus
End Sub
Private Sub Text 1_Change()
Text2.Text=Mid(Text1.Text,6)
End Sub
程序运行后,如果在文本框Text1中输入ChinaBeijing,则在文本框Text2中显示的内容是
选项
A、ChinaBeijing
B、China
C、Beijing
D、ChinaB
答案
C
解析
Mid(string,start[,length])函数用于从已有字符串中取出从指定位置开始的含指定个数字符的字符串,如果start参数超过了string参数中字符的数目,将返回空字符串,如果省略或length参数超过文本的字符数(包括start处的字符),将返回字符串中从start到字符串结束的所有字符。
本题程序运行后,当在文本框Textl中输入字符数达到或超过6时,在文本框Text2中将随即显示输入字符中从第6个字符开始的所有字符,全部字符输入后,文本框Text2中的内容为“Beijing”。
转载请注明原文地址:https://kaotiyun.com/show/RFQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在名为Form1的窗体上绘制两个文本框,名称分别为Text1和Text2,它们都显示垂直滚动条和水平滚动条,都可以显示多行文本;再绘制一个命令按钮,名为Cmd1,标题为Copy如下图所示。请编写适当的事件过程,使得程序在运行时,在Text1中输入多行文本
在名为Form1的窗体上绘制一个名为Text1的文本框控件和一个名为Timer1的计时器控件。程序运行后,文本框中显示的是当前的时间,而且每一秒文本框中所显示的时间都会随时间的变化而改变(如下图所示)。注意:程序中不得使用任何变量:文
在名为Form1的窗体上绘制一个文本框,名为Text1,字体为“宋体”,文本框中的初始内容为VisualBasic:再绘制一个命令按钮,名为Cmd1,标题为“改变字体为黑体”。请编写适当事件过程,使得在运行时,单击命令按钮,则把文本框中文字的字体改为黑体
窗体上有一个名称为CD1的通用对话框控件和由四个命令按钮组成的控件数组Command1,其下标从左到右分别为0、1、2、3,窗体外观如下图所示。命令按钮的事件过程如下:PrivateSubCommand1_Click(IndexAs
执行下列语句s~Input=InputBox(”请输入字符串”,”字符串对话框”,”字符串”)将显示输入对话框。此时如果直接单击“确定”按钮,则变量strInput的内容是
要显示如下图所示的对话框,则下列语句正确的是
设有如下语句:strl=InputBox(“输入”,“”,“练习”)从键盘上输人字符串“示例”后,strl的值是______。
表达式Len(Str(1.3))Mod2的值为______。
随机试题
混合性血栓可见于
维生素D缺乏性佝偻病激期的主要表现是
患者,男性,42岁,3天来右上后磨牙痛重,冷热加剧,夜间痛而来就诊。近1年多来,右上磨牙进食时咬到某特定位置时出现撕裂样痛,冷热敏感,平时咬物不适。检查:咬合面似有近远中方向越过边缘嵴的细裂纹,颊尖高陡,无龋洞,不松动,叩痛(+)。该患牙疾病的病因是
关于脑损伤病人降温的叙述中错误的是
以下对于财产清查表述错误的是()。
()责任保险通常采用“期内发生式”的承保基础。
化学学习评价的根本目的是()。
根据以下资料,回答116—120题2008年哪种农产品的生产价格指数最低?()
去年某地大力招商引资,吸引国内外投资23亿元,国民生产总值增长两个百分点。今年有人提出如果吸引到50亿元的国内外投资,该地的国民生产总值将可以增长四个百分点,对此有人反对,认为即使能够吸引到50亿元的资金,这一愿望也未必能实现。以下能够支持反对者
Helikestoswim______.
最新回复
(
0
)