首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Form1、标题为“鼠标光标形状”的窗体}:添加一个文本框,名称为Text1。请通过属性窗口设置适当属性,使得程序运行时,鼠标在文本框中时,鼠标光标为箭头(Arrow)形状;在窗体中其他位置处,鼠标光标为十字(Cross)形状。 注意
(1)在名称为Form1、标题为“鼠标光标形状”的窗体}:添加一个文本框,名称为Text1。请通过属性窗口设置适当属性,使得程序运行时,鼠标在文本框中时,鼠标光标为箭头(Arrow)形状;在窗体中其他位置处,鼠标光标为十字(Cross)形状。 注意
admin
2015-10-23
47
问题
(1)在名称为Form1、标题为“鼠标光标形状”的窗体}:添加一个文本框,名称为Text1。请通过属性窗口设置适当属性,使得程序运行时,鼠标在文本框中时,鼠标光标为箭头(Arrow)形状;在窗体中其他位置处,鼠标光标为十字(Cross)形状。
注意:存盘时必须存放存考生文件夹下,工程文件名保存为sjt1.vbp,窗体文什名保存为sjt1.frm。
(2)在名称为Form1的窗体上添加两个名称分别为Iabel1、Label2,标题分别为“开始位置”、“选中字符数”的标签;添加三个文本框,名称分别为。Text1、Text2、Text3,再添加一个名称为Command1、标题为“显示选中信息”的命令按钮。程序运行时,在Text1中输入若干字符,并用鼠标选中部分文本后,单击“显示选中信息”按钮,则把选中的第一个字符的顺序号在Text2中显示,选中的字符个数在Text3中显示,如图所示。
要求:画出所有控件,编写命令按钮的Click事件过程。
注意:要求程序中不得使用变量,事件过程中只能写两条语句,分别用于显示第一个字符的顺序号和显示选中的字符个数。存盘时必须存放在考生文件夹下,工程文件名保存为sjt2.vbp,窗体文件名保存为sjt2.frm。
选项
答案
步骤1:新建一个窗体,按照题目要求建立文本框控件并设置其属性,如图3.37所示。 [*] 程序中用到的控件及属性见表3.69。 [*] 步骤2:调试并运行程序,关闭程序后按题目要求存盘。 (2)步骤1:建立界面,添加相应的控件并设置控件的属性。程序中用到的控件及属性见表3.70。 [*] 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 PriVate Sub Commandl Click() Text3=Text1.SelLength ’将Text1中选中的字符长度显示 Text2=Text1.SelStart’将Text1.中选中的字符串首字母的顺序号显示 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
(1)先将窗体的Caption属性设置为“鼠标光标形状”,然后再添加一个名称为Text1的文本框。通过对文本框和窗体的MousePointer属性的设置,使鼠标指针在文本框中时,鼠标光标为箭头(Arrow)形状;在窗体中其他位置处鼠标光标为十字(Cross)形状。
(2)通过标签的Name和Caption属性设置标签的名称和标题,通过命令按钮的Name和Caption属性设置命令按钮的名称和标题。
转载请注明原文地址:https://kaotiyun.com/show/lPLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮command1和两个文本框,名称分别为Text1和Text2。编写如下两个事件过程:DimStr1AsString,str2AsStringPrivateSubform_load()Text1.Text="
在结构化程序设计中,模块划分的原则是
以下程序用来产生20个100以内的随机整数,并将其中的偶数在窗体上显示,请填空。RandomizeFori=1To20x=[5]Ifx/2=[6]ThenPrintXEndI
窗体设计器窗口简称______,是应用程序最终面向用户的窗口,它对应于应用程序的运行结果。各种图形、图像、数据等都是通过窗体或窗体中的控件显示出来的。
如果一个工程含有多个窗体及标准模块,则以下叙述中错误的是()。
在窗体上画一个名称为Filel的文件列表框,并编写如下程序:PrivateSubFUel_DblClick()x=Shell(File1_ileName,1)EndSub以下关于该程序的叙述中,错误的是()。
下列程序运行时输出的结果是()。OptionBase1PrivateSubForm_Click()Dimx(10)ForI=1to10x(i)=10-I+1NextI
设有命令按钮Commandl的单击事件过程,代码如下:PrivateSubCommandl_Click()Dima(30)AsIntegerFori=1To30a(i)=Int(Rnd*100)
下面程序运行后,窗体中显示【】。PrivateSubCommand1_Click()a$="*":b$="$"Fork=1To3x$=String$(Len(a$)+k,b$)Printx$;NextPrint
随机试题
Itwas______hearrivedhome______herealizedthathehadlefthiskeysintheoffice.
A.垂盆草B.石韦C.金钱草D.海金沙E.地肤子既可利水通淋,又能杀虫止痒的中药是
下列药物中,抗菌谱最广的一类抗生素是
白血病患者,查白细胞为26×109/L,今日行第1次化疗。下列护理措施中哪项为最需要关注的内容
下列关于大、小“三阳”描述正确的是()。
经营者销售产品可以给中问人佣金,但在()情况下该行为将被认为是商业贿赂。
从业务范围看,受具有经营出境旅游业务资格的旅行社的委派,全权代表旅行社带领旅游团从事旅游活动的工作人员是()
人气:粉丝
如下图所示,长度均为六分之五千米的三个圆形跑道汇聚于点O,若甲、乙、丙三人分别以5千米/小时、8千米/小时、12千米/小时的速度同时从O点出发分别绕三个圈奔跑,则三人再次相聚于O点需经过多少分钟?
设连续函数f(x),f(0)=0,F(t)=[z2+f(x2+y2)]dxdydz,Ωt:x2+y2≤t2,0≤z≤1,则=_______。
最新回复
(
0
)