• 所有问题

    • 我如何知道VB中的文本框中有多少行文本

    如题所述

    举报该问题
    推荐答案   2018-12-14

    以文本框Text1为例：

    思路：寻找回车换行符号；

    注意：1，一个回车换行符号占两个字符。2，可能有空白行

    Dim n As Integer
    Dim L As Integer
    n = 0
    L = InStr(TextBox1.Text, vbCrLf)
    Do While L > 0
        n = n + 1
        L = InStr(L + 1, TextBox1.Text, vbCrLf)
    Loop
    MsgBox(n + 1)

    温馨提示：答案为网友推荐，仅供参考
    相似回答
    vb 怎么判读有多少行答：MsgBox "文本框的行数一共有" & UBound(Split(Text1.Text, vbCrLf)) + 1 & "行"
    在VB中怎样取得富文本框控件中的文本行数?答：使用 Mid 函数，一个字符一个字符的比较。速度比较慢。Option Explicit Public Function CalcNewLine(ByVal AString As String) As Long Dim size As Long Dim i As Long CalcNewLine = 0 size = Len(AString)For i = 1 To size If Mid(AString, i, 1) = vbCr Then CalcNewLine = CalcN...
    求问vb6.0中如何实现文本框中的段落数,字符数,字母数,和数字个数的统计...答：'用正规表达式对象操作'首选引用 Microsoft VBScript Regular Expressions 5.5 库'放1个文本框,4个按钮Dim regEx As New RegExpPrivate Sub Form_Load() regEx.Global = True regEx.MultiLine = True regEx.IgnoreCase = TrueEnd SubPrivate Sub Command1_Click() '统计行数 regEx.Patte...
    VB 如何判断字符所在的行数?答：Dim LineCount As Integer '获取文本框中的字符总数 Dim Length As Integer '要查找的字符串 Dim strFind As String '因为不输入任何字符，文本框也有第一行，所以初始化行数为1 LineCount = 1 '获取文本框中字符的个数 Length = Len(txtShow.Text)'输入要查找的字符串 strFind = InputBox("...
    大家正在搜
    VB中怎么给文本框设置为多行vb在文本框中输入文本文本框如何自动换行html多行的文本框vb多行文本框VB文本框自动换行符vb如何隐藏文本框vb中的文本框文本框多行
    相关问题
    怎样在VB.NET中设置多行文本框中显示的行数
    VB如何让一个文本框可以输入多行文本
    VB如何将文本框中的数据准确布局到多行文本中
    在VB中，如何使文本框能够使输入多行文字？
    在VB中怎样取得富文本框控件中的文本行数？
    VB６.０中怎么使文本框里的文字多行显示？
    VB中文本框如何换行
    vb里面添加文本框，让文本框可以多行显示，满了换行，有一个竖...