Visua| Basic可视化覆序设计 文本框一属性(4-3) 创建多行文本框:默认情况下,文本框只显 示单行文本,无滚动条,不支持回车换行 L ScrollBars △0-None无滚动条 1- Horizontal只有水平滚动条 2- Vertical只有垂直滚动条 。.△3-Both具有水平和垂直两种滚动条 只能在设计时(即属性窗口中)设置 设置文本框是否具有水平或垂直滚动条 2021/2/24 耶21页 首页上页目录前页后页末页
Visual Basic 可视化程序设计 首页 上页 目录 前页 后页 末页 2021/2/24 第21页 文本框—属性（4-3） • 创建多行文本框：默认情况下，文本框只显 示单行文本，无滚动条，不支持回车换行。 • MultiLine – 只能在设计时（即属性窗口中）设置 – 只有在ScrollBars为非零值时有效 – 取值为True或False • ScrollBars – 只能在设计时（即属性窗口中）设置 – 设置文本框是否具有水平或垂直滚动条 ScrollBars 0-None 无滚动条 1-Horizontal 只有水平滚动条 2-Vertical 只有垂直滚动条 3-Both 具有水平和垂直两种滚动条
Visua| Basic可视化程序设计 文本框一属性(4-4) Enabled 设置是否相应用户或系统的操作 取值为True或Fase Locked 设置文本框是否可以编辑 取值为True或Fase ·两者的区别? 相同点:两者都不允许用户直接录入内容 不同点: Locked为True时,可以接受焦 点; Enabled为 FAlse时,不能接受焦点。 2021/2/24 耶22页 首页上页目录前页后页末页
Visual Basic 可视化程序设计 首页 上页 目录 前页 后页 末页 2021/2/24 第22页 文本框—属性（4-4） • Enabled – 设置是否相应用户或系统的操作 – 取值为True或False • Locked – 设置文本框是否可以编辑 – 取值为True或False • 两者的区别？ – 相同点：两者都不允许用户直接录入内容 – 不同点：Locked为True时，可以接受焦 点；Enabled为False时，不能接受焦点
Visua| Basic可视化程序设计 属性类型总结 只能在设计阶段设置的属性 MultiLine. ScrollBars 只能在运行阶段设置的属性 Selstart、 SelLength、 SelText 可同时在运行和设计阶段设置的属性 ③问题:设计阶典中某个控件,在属性窗口 中显示该控件的所有属性 2021/2/24 23页 首页上页目录前页后页末页
Visual Basic 可视化程序设计 首页 上页 目录 前页 后页 末页 2021/2/24 第23页 属性类型总结 • 只能在设计阶段设置的属性 MultiLine 、 ScrollBars • 只能在运行阶段设置的属性 SelStart、SelLength、SelText • 可同时在运行和设计阶段设置的属性 问题：设计阶段选中某个控件，在属性窗口 中显示该控件的所有属性
Visua| Basic可视化覆序设计 练习例题 ②示例:文本信息的复制(单击查看代码) △建立4个文本框,其中两个文本框允许多行输 入,两个文本框不允许多行输入 △第一个文本框(源文本框),只有垂直滚动条, 且初始化一段文本信息 △第二个文本框(目标文本框),具有水平和垂 直两种滚动亲。且文本为空 △第三个文本框用来输入要复制文本的起始位置 △第四个文本框用来输入要复制文本的长度 单击“确认”按钮,根据输入的要复制文本的 起始位置和长度,把对应的源文本框的相应信息 放到目标大本框中显示 2021/2/24 耶24页 首页上页目录前页后页末页
Visual Basic 可视化程序设计 首页 上页 目录 前页 后页 末页 2021/2/24 第24页 练习例题 示例：文本信息的复制 建立4个文本框，其中两个文本框允许多行输 入，两个文本框不允许多行输入 第一个文本框（源文本框），只有垂直滚动条， 且初始化一段文本信息 第二个文本框（目标文本框），具有水平和垂 直两种滚动条，且文本为空 第三个文本框用来输入要复制文本的起始位置 第四个文本框用来输入要复制文本的长度 单击“确认”按钮，根据输入的要复制文本的 起始位置和长度，把对应的源文本框的相应信息 放到目标文本框中显示 （单击查看代码）
Visua| Basic可视化程序设计 文本框一事件 ·C|ick和Db|cick Change 在改变文本框的Text属性时触发该事件 问题:如果有Tex1 Change事件过程, 运行时用户在文本框中输入“ Change”, 会触发几次 Text1_ Change事件过程?6次 · LostFocus 当文本框失去焦点时触发 GotFocus 当文本框获得焦点时触发 2021/2/24 耶25页 首页上页目录前页后页末页
Visual Basic 可视化程序设计 首页 上页 目录 前页 后页 末页 2021/2/24 第25页 文本框—事件 • Click和DblClick • Change – 在改变文本框的Text属性时触发该事件 – 问题：如果有Text1_Change事件过程， 运行时用户在文本框中输入“Change”， 会触发几次Text1_Change事件过程？ • LostFocus – 当文本框失去焦点时触发 • GotFocus – 当文本框获得焦点时触发 6次