如何扩展VB标准控件的功能
日期:09-03  来源:
中国设计秀 作者:cnwebshow.com
同样的,因为这个消息不带任何的参数,我们还是把参数wParam和lParam都置为0: CMx中国设计秀
CMx中国设计秀
Public Const EM_GETLINECOUNT = &HBA CMx中国设计秀
CMx中国设计秀
Public Function LineCount(txtBox As TextBox) As Long CMx中国设计秀
CMx中国设计秀
LineCount = SendMessage( _ CMx中国设计秀
CMx中国设计秀
TxtBox.hWnd, EM_GETLINECOUNT, 0&, 0&) CMx中国设计秀
CMx中国设计秀
End FunctionCMx中国设计秀