第2章 从零开始编制vb程序.ppt

2.6.5 使用选定的文本 （2） 2. SelLength属性 指定所选文本块的字符个数。若将该属性设置为大于0的值n，则选中并反相显示从当前插入点开始的n个字符。 技巧：若设SelStart=0，SelLength≥文本框中的字符数，则可将文本框中的内容全部选定。 2.6.5 使用选定的文本 （3） 3. SelText属性 是一个字符串，含有选定的文本。如果没有字符被选定，就是空字符串。对该属性赋值可以替换当前选中的文本，如果没有选中的文本，则在当前插入点处插入文本。 设置了SelStart和SelLength属性后，VB会自动将选定的文本送入SelText中存放。 2.6.5 使用选定的文本 （4） 4. HideSelection属性 指定当控件失去焦点时选定的文本是否突出显示。True（默认值）：当控件失去焦点时，选定的文本不突出显示。False：当控件失去焦点时，选定的文本仍突出显示。该属性运行时只读。 2.6.5 使用选定的文本 （5） 【例2.9】在文本框Text1中选定文本，通过命令按钮将选定的内容复制或剪切到文本框Text2中。 （1）设计界面及设置属性 在窗体上放置两个文本框Text1和Text2，将它们的MultiLine属性均设为True，ScrollBars属性均设为2，HideSelection属性均设为False。将文本框Text1的Alignment属性设为2。在属性窗口将文本框Text1的Text属性设为李白的诗“下江陵”。添加三个命令按钮，分别命名为cmdCopy、cmdCut和cmdEnd，设Caption属性分别为“复制到目标区”、“剪切到目标区”和“退出”。用两个标签对文本框作简要说明。 2.6.5 使用选定的文本 （6） （2）编写代码 “复制到目标区”按钮单击事件的代码如下： Private Sub cmdCopy_Click() 将选中的文本复制到Text2中 Text2.SelText = Text1.SelText End Sub “剪切到目标区”按钮单击事件的代码如下： Private Sub cmdCut_Click() 将选中的文本复制到Text2中 Text2.SelText = Text1.SelText 删除Text1中被选中的文本，完成剪切 Text1.SelText = End Sub 2.6.5 使用选定的文本 （7） 在“退出”按钮单击事件中用End语句结束运行。程序运行效果如图2.24所示。 图2.24 使用选定的文本 返回首页 返回本节 2.6.6 文本框的常用事件和方法(1) 1. Change事件 当用户在文本框中编辑文本，或在程序中对文本框的Text属性进行更改时，将触发其Change事件。 2. GotFocus事件 对象获得焦点事件。当运行程序时用Tab键或用鼠标选择对象，或用SetFocus方法使光标定位在对象上时，会触发该事件。其他可接收焦点的控件亦可识别此事件。 2.6.6 文本框的常用事件和方法(2) 3. LostFocus事件 对象失去焦点事件。当按下Tab键或用鼠标选择其他对象使光标离开当前对象时触发该事件。其他可接收焦点的控件亦可识别此事件。 4. KeyPress事件 当焦点在当前文本框中时，在键盘上按下某个按键则触发该对象的KeyPress事件。该事件返回一个参数KeyAscii，表示所按下的键的ASCII码。 2.6.6 文本框的常用事件和方法(3) 5. SetFocus方法 与命令按钮一样，该方法是将光标移动到指定的文本框中，使其获得焦点。这是文本框比较常用的方法，当在窗体中建立了多个控件后，可以使用该方法把光标置于所需要的文本框中。其他可接收焦点的控件也具有此方法。 返回首页 返回本节 2.7 开发VB应用程序的一般步骤 2.7.1 设计应用程序界面 2.7.2 设置属性 2.7.3 编写代码 2.7.4 调试运行程序 2.7.5 保存工程及生成可执行文件 返回首页 结束 2.4.2 命令按钮的常用属性（2） 2. Default和Cancel属性 Default属性用于设置窗体中的命令按钮是否为默认命令按钮，其值为False或True。如果某个命令按钮的Default属性为True，则在窗体启动后，按Enter（回车）键就可以立即执行该命令按钮的功能。 Cancel属性用来设置窗体中某个命令按钮是否为“取消”按钮，其值为True或False。程序运行后，按Esc键与单击活动窗体中Cancel属性为True的按钮所起的作用相同。 2.4.2 命令按钮的常用属性（3） 3. S