散分了,来者有分,不过要回答我的问题,特招hamadou(闵峰),我是软件黄牛的马甲,还记得我吗,有求于大家。

vbnetyjs 2005-03-23 10:03:16
我是个菜鸟,我现在用了Textbox控件,Multiline设置为True,有什么办法给Textbox设置一个下来滚动轴,当我的文字范围多出Textbox当前的行数时,它就自动出现滚动轴。可以拉动操作,而不是只能用鼠标选中文字往上拉这么老土。
...全文
110 10 打赏 收藏 转发到动态 举报
写回复
用AI写文章
10 条回复
切换为时间正序
请发表友善的回复…
发表回复
hidejay 2005-03-23
  • 打赏
  • 举报
回复
ScrollBars 调出来就可以了吧~这么简单的问题,问我就好了呀~闵峰那么厉害的人回答这问题的话,我觉得还是大材小用的
hamadou 2005-03-23
  • 打赏
  • 举报
回复
呵呵,没有关系!
DeltaCat 2005-03-23
  • 打赏
  • 举报
回复
呵呵
vbnetyjs 2005-03-23
  • 打赏
  • 举报
回复
啊,hamadou(闵峰) ,不好意思,我结束的时候你刚过来,我也是结完才看到的,不好意思,我下次多给你一点啊。也谢谢 landlordh() 了。
hamadou 2005-03-23
  • 打赏
  • 举报
回复
Private Sub TextBox1_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
If Me.TextBox1.Lines.GetUpperBound(0) > 0 Then
Me.TextBox1.ScrollBars = ScrollBars.Vertical
Else
Me.TextBox1.ScrollBars = ScrollBars.None
End If
End Sub
vbnetyjs 2005-03-23
  • 打赏
  • 举报
回复
成功了,散分。
vbnetyjs 2005-03-23
  • 打赏
  • 举报
回复
什么啊,根本不行啊。写在formload里还是哪里啊。而且你写的这个什么.bo属性我翻遍字典好象滚动轴都没有这个属性的。耍人那你。
landlordh 2005-03-23
  • 打赏
  • 举报
回复
.ScrollBars = ScrollBars.Both
vbnetyjs 2005-03-23
  • 打赏
  • 举报
回复
顶呀。
landlordh 2005-03-23
  • 打赏
  • 举报
回复

.ScrollBars = ScrollBars.Bo

16,555

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧