WINDOWS的API:SendMessage，已编写成通用DLL

'取得文本框的总行数

Private Declare Function GetTotalLine Lib "d:/SendMessage.dll" (ByVal Txt As TextBox) As Long
'自动下拉组合框

Private Declare Function ComboDown Lib "d:/SendMessage.dll" (ByVal Cmb As ComboBox, Flag As Boolean)
'为列表添加横向滚动条

Private Declare Function AddScroll Lib "d:/SendMessage.dll" (ByVal Lst As ListBox)

'在列表中查找字符串
Private Declare Function FindString Lib "d:/SendMessage.dll" (ByVal Lst As ListBox, Text As String) As Long

'取得光标在文本框中的行列数
Private Declare Function FindCur Lib "d:/SendMessage.dll" (ByVal Txt As TextBox) As String 

下载链接：http://xiaoshiyi.9999mb.com/sendmessage.zip