国产探花免费观看_亚洲丰满少妇自慰呻吟_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ā)表
    主站蜘蛛池模板： 金堂县| 辛集市| 南充市| 田东县| 依安县| 德州市| 卢氏县| 鄂托克旗| 新乡市| 拉萨市| 呼伦贝尔市| 临沧市| 磴口县| 南康市| 绥阳县| 湘阴县| 垣曲县| 华池县| 玛曲县| 泸溪县| 昌乐县| 新安县| 沂南县| 定兴县| 香河县| 城步| 临沂市| 高要市| 云阳县| 澳门| 溧阳市| 贵溪市| 林州市| 旌德县| 桂阳县| 图片| 垫江县| 葫芦岛市| 福清市| 深圳市| 岳阳县|