20268.html

来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· HTML 代码 · 共 23 行

HTML
23
字号
<html>  <head>    <title>Re: 如何可以快速取得文字档的行数呢??</title>  </head>  <body bgcolor="#FFFFFF" vlink="#808080">    <center>      <h1>Re: 如何可以快速取得文字档的行数呢??</h1>    </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by <a href="mailto:jtomail@tomail.com.tw">j</a> on October 17, 1999 at 11:09:14:<p>In Reply to: <a href="20260.html">如何可以快速取得文字档的行数呢??</a> posted by JR on October 17, 1999 at 00:16:45:<p>: 如何可以快速取得文字档的行数呢??<p>先把文字档开启,然后放在 Text1 内<p>Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long<p>Private Const EM_GETLINECOUNT = &HBA<p>Dim N As Long<p>N = SendMessage(Text1.hwnd, EM_GETLINECOUNT, 0&, 0&)<p>MsgBox N & " 行"<br><br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 20268--></ul><!--end: 20268--><br><hr size=7 width=75%><p></body></html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?