Question

vb6.0中text中滚动条的用法

我建立了一个文本框，每点击一次按钮都会换行增加显示一个数据。
我想要当数据多到超出文本框的长度时，用上下滚动条来调节显示数据。
但我从来没用过滚动条，是新手，哪位高手能帮助我啊~

Answer 1

MultiLine 属性多行

ScrollBars 属性

返回或设置一个值，该值指示一个对象是有水平滚动条还是有垂直滚动条。在运行时是只读的。

语法

object.ScrollBars

object 所在处代表一个对象表达式，其值是“应用于”列表中的一个对象。

设置值

对于 MDIForm 对象，ScrollBars 属性的设置值为：

设置值 描述
True （缺省值）窗体有一个水平滚动条或垂直滚动条，或两者都有。
False 窗体没有滚动条。

对于 TextBox 控件，ScrollBars 属性的设置值为：

常数 设置值 描述
VbSBNone 0 （缺省值）无
VbHorizontal 1 水平
VbVertical 2 垂直
VbBoth 3 两种

说明

对于 ScrollBars 的属性设置值为 1（水平）、2（垂直）、或 3（两种）的 TextBox 控件，必须将 MultiLine 属性设置为 True。

在运行时，Microsoft Windows 操作环境自动地实现一个标准键盘界面以允许在 TextBox 控件中使用箭头键（上箭头、下箭头、左箭头、和右箭头）、HOME 和 END 键等来定位。

滚动条只在对象的内容超过对象的边框时才被显示在对象上。例如，在 MDIForm 对象中，如果子窗体的一部分被隐藏在父 MDI 窗体的边框之后，那么一个水平滚动条（HScrollBar 控件）将被显示。该情况的例外是总显示滚动条的 TextBox 控件。如果 ScrollBars 被设为 False，那么对象将没有滚动条，而不管其内容如何。

Answer 2

text1.multiline = true
text1.scrollbars = 2

或者选中文本框，在右下角的属性页里可以设置

Answer 3

把text1的mulitline属性改为true，scrollbars设为2就行了