国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 開發(fā) > 綜合 > 正文

怎樣得到文本框（TextBox）中的文本行數(shù)

2024-07-21 02:16:19
字體：大 中 小
來源：轉載
供稿：網(wǎng)友
計算文本框中輸入文本的行函數(shù)數(shù)可以使用sendmessage返回，當一行文字發(fā)生環(huán)繞時，它將被當作新的一行，而被非簡單的計算文本中的換行符個數(shù)。

把以下api函數(shù)的聲明添入模塊文件的general declarations區(qū)域。

option explicit

public declare function sendmessagelong lib _

"user32" alias "sendmessagea" _

(byval hwnd as long, _

byval wmsg as long, _

byval wparam as long, _

byval lparam as long) as long

public const em_getlinecount = &hba

form code

sub text1_change()

dim linecount as long

on local error resume next

'得到/顯示文本行數(shù)

linecount = sendmessagelong(text1.hwnd, em_getlinecount, 0&, 0&)

label1.caption = format(linecount, "##,###")

end sub

注釋：為了使本程序成功，請在設計階段把文本框的multiline屬性設為true。


  • 網(wǎng)站運營seo文章大全
  • 提供全面的站長運營經(jīng)驗及seo技術!
    •

    發(fā)表評論 共有條評論
    用戶名: 密碼:
    驗證碼: 匿名發(fā)表
    主站蜘蛛池模板： 蒲江县| 常山县| 锡林郭勒盟| 施秉县| 黄平县| 大安市| 泾阳县| 扬州市| 资阳市| 西贡区| 文登市| 云阳县| 台中市| 万荣县| 吴桥县| 麻阳| 巴塘县| 新建县| 兴和县| 来安县| 东辽县| 龙井市| 漯河市| 虎林市| 喀什市| 宁强县| 蓬莱市| 普宁市| 景德镇市| 武宁县| 巩留县| 剑阁县| 福鼎市| 屯留县| 阳西县| 宝兴县| 兴化市| 巢湖市| 安乡县| 砚山县| 昌平区|