请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1、标题为“鼠标光标形状”的窗体上画一个名称为Text1的文本框。请通过属性窗口设置适当属性,使得程序运行时,鼠标在文本框中时,鼠标光标为箭头(Arrow

admin2017-03-27  22

问题 请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1、标题为“鼠标光标形状”的窗体上画一个名称为Text1的文本框。请通过属性窗口设置适当属性,使得程序运行时,鼠标在文本框中时,鼠标光标为箭头(Arrow)形状;在窗体中其他位置处,鼠标光标为十字(Cross)形状。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
(2)在名称为Form1的窗体上画两个标签,名称分别为Label1、Label2,标题分别为“开始位置”、“选中的字符数”;画三个文本框,名称分别为Text1、Text2、Text3,再画一个名称为Command1,标题为“显示选中信息”的命令按钮。程序运行时,在Text1中输入若干字符,并用鼠标选中一些字符后,单击“显示选中信息”按钮,则把选中的第一个字符的顺序号显示在Text2中,选中的字符个数显示在Text3中,如图3—152所示。要求:画出所有控件,编写命令按钮的Click事件过程。

注意:要求程序中不得使用变量,事件过程中只能写两条语句,分别用于显示第一个字符的顺序号和显示选中的字符个数。存盘时必须存放在考生文件夹下,工程文件名为sit2.vbp,窗体文件名为sjt2.frm。

选项

答案第1小题 步骤1:新建“标准EXE”工程。按要求画出控件并设置相应属性。 步骤2:按要求将文件保存至考生文件夹中。 第2小题 步骤1:新建一个“标准EXE”工程,按要求画出控件并设置属性。 步骤2:在代码编辑窗口,编写命令按钮的单击事件过程。 参考代码: Private Sub Command1_CliCk() Text2=Text1.SelStart+1 Text3=Text1.SelLength End Sub 步骤3:按要求将文件保存至考生文件夹中。

解析 第1小题:根据题目要求,要使鼠标指针位于文本框中时,鼠标指针的形状为箭头,需将文本框的MousePointer属性值设置为1。为使鼠标指针位于窗体中其他位置时
第2小题:由于SelStart属性返回的所选文本的起始点位于起始文本的左侧,故所选文本的第一个字符的顺序号应为SelStart属性值加1。选中字符数即为SelLength属性返回值。
转载请注明原文地址:https://kaotiyun.com/show/bhGp777K
0

最新回复(0)