文本框(TextBox)根据行数多少来自动显示/隐藏滚动条

有时候我们在使用多行模式的文本框时，不希望在不超行的情况下看到滚动条，那么如何实现呢，其实很简单，只需要一个API函数就可以搞定，首先在窗体上添加一个Text1，将其属性MultiLine设为True，代码如下：
Option Explicit

Private Declare Function ShowScrollBar Lib “user32” (ByVal hwnd As Long, ByVal wBar As Long, ByVal bShow As Long) As Long
Private Const SB_HORZ = 0 '水平
Private Const SB_VERT = 1 '垂直
Private Const SB_BOTH = 3 '两者都有

Private Sub Text1_Change()
Text1.SelStart = Len(Text1.Text)
If TextHeight(Text1.Text) > Text1.Height Then
ShowScrollBar Text1.hwnd, SB_VERT, True '显示
Else
ShowScrollBar Text1.hwnd, SB_VERT, False '隐藏
End If
End Sub

文本框(TextBox)根据行数多少来自动显示/隐藏滚动条相关推荐

点击文本框内容消失，移开内容自动显示（两种方法）（原创）
<html > <head> <script type="text/javascript"> /* author:luoqinglong E-m ...
限制文本框(TextBox)只能输入数字(VB6代码)
在一些要求只允许输入数值的场合,就用得上了. 基本思路是,先在文本框的keyPress事件里过滤键盘输入,再使用子类化将粘贴剪切等剪贴板操作吃掉. 窗体frmMain.frm内代码(窗体包含一个文本框 ...
excel 单元格如何获取textbox中的值 java,把excel表格数据定义为文本框-excel中如何将单元格里的数值显示在文本框(textbox)里...
excel中如何将单元格里的数值显示在文本框(textbox)里 sheets("Sheet2").range("b3")=textbox ---------- ...
css实现input文本框与图片行内水平居中对齐
css实现input文本框与图片行内水平居中对齐如图输入框与图片不对齐 css样式添加 input,img {vertical-align:middle;}
PyQt5随笔：QTextEdit和QTextBrowser文本框多次设置输入内容时，显示全部内容的方法
PyQt5随笔:QTextEdit和QTextBrowser文本框多次设置输入内容时,显示全部内容的方法 1.前言 QTextEdit 和 QTextBrowser 文本控件方法基本一样,只不过 QT ...
TextBox 单行文本框，多行文本框
把TextBox的TextMode属性设置为MultiLine就变成了多行文本了 SingleLine - 默认.表示单行输入模式. MultiLine - 表示多行输入模式. Password - ...
VB文本框textbox的那点事
1.限制文本框中只允许输入数字在textbox的keypress事件里面写上 (1)判断输入的数字是否为小数 IfkeyAscii=46 and not(InStr(txtnumber," ...
c# 设置文本框textBox自动检索
这个方法是目前找到最简单的一种,如果想要更复杂的自动检索那就要自己去定制方法了使用控件:winform的textBox 以及Dev的TreeList 先上效果: 实现过程: 在窗体load时先将tr ...
[原创]C#应用WindowsApi实现查找(FindWindowEx)文本框(TextBox、TextEdit)。
/// <summary> /// 获取文本框控件 /// </summary> /// <param name="hwnd">文本框所在父窗口 ...

文本框(TextBox)根据行数多少来自动显示/隐藏滚动条

文本框(TextBox)根据行数多少来自动显示/隐藏滚动条相关推荐

最新文章

热门文章