Question

vb中如何限定textbox的输入长度？

不是用它的属性进行限制，而是手写，当长度大于20个字节的时候就输入不了了，应该在什么事件里写呢，该怎么写呢？
那请问Text1.hwnd里的hwnd是什么呢？
关键是 SendMessage Text1.hwnd, &HC5&, 20&, 0&
放到form_load事件中时，hwnd这里报错阿

Answer 1

This function sends the specified message to a window or windows. SendMessage calls the window procedure for the specified window and does not return until the window procedure has processed the message. The PostMessage function, in contrast, posts a message to a thread's message queue and returns immediately.

LRESULT SendMessage(
HWND hWnd,
UINT Msg,
WPARAM wParam,
LPARAM lParam
);
Parameters
hWnd
[in] Handle to the window whose window procedure will receive the message. If this parameter is HWND_BROADCAST, the message is sent to all top-level windows in the system, including disabled or invisible unowned windows, overlapped windows, and pop-up windows; but the message is not sent to child windows.
Msg
[in] Specifies the message to be sent.
wParam
[in] Specifies additional message-specific information.
lParam
[in] Specifies additional message-specific information.
Return Values
The return value specifies the result of the message processing and depends on the message sent.

【参数表】
hwnd ----------- Long，要接收消息的那个窗口的句柄

wMsg ----------- Long，消息的标识符

wParam --------- Long，具体取决于消息

lParam --------- Any，具体取决于消息

函数功能：该函数将指定的消息发送到一个或多个窗口。此函数为指定的窗口调用窗口程序，直到窗口程序处理完消息再返回。而函数PostMessage不同，将一个消息寄送到一个线程的消息队列后立即返回。

函数原型：LRESULT SendMessage（HWND hWnd，UINT Msg，WPARAM wParam，LPARAM IParam）；

参数：

hWnd：其窗口程序将接收消息的窗口的句柄。如果此参数为HWND_BROADCAST，则消息将被发送到系统中所有顶层窗口，包括无效或不可见的非自身拥有的窗口、被覆盖的窗口和弹出式窗口，但消息不被发送到子窗口。

Msg：指定被发送的消息。

wParam：指定附加的消息指定信息。

IParam：指定附加的消息指定信息。

返回值：返回值指定消息处理的结果，依赖于所发送的消息。

wMsg函数
★WM_CREATE 创建一个窗口
★WM_DESTROY 当一个窗口被破坏时发送
★WM_MOVE 移动一个窗口
★WM_SIZE 改变一个窗口的大小
★WM_ACTIVATE 一个窗口被激活或失去激活状态
★WM_SETFOCUS 一个窗口获得焦点
★WM_KILLFOCUS 一个窗口失去焦点
★WM_ENABLE 一个窗口改变成Enable状态
★WM_SETREDRAW 设置窗口是否能重画
★WM_SETTEXT 应用程序发送此消息来设置一个窗口的文本
★WM_GETTEXT 应用程序发送此消息来复制对应窗口的文本到缓冲区
★WM_GETTEXTLENGTH 得到与一个窗口有关的文本的长度（不包含空字符）
★WM_PAINT 要求一个窗口重画自己
★WM_CLOSE 当一个窗口或应用程序要关闭时发送一个信号
★WM_QUERYENDSESSION 用户选择结束对话框或程序自己调用ExitWindows函数
★WM_QUIT 用来结束程序运行
★WM_QUERYOPEN 用户窗口恢复以前的大小位置时，把此消息发送给某个图标
★WM_ERASEBKGND 当窗口背景必须被擦除时（例在窗口改变大小时）
★WM_SYSCOLORCHANGE 当系统颜色改变时，发送此消息给所有顶级窗口
★WM_QUERYENDSESSION 消息后，此消息发送给应用程序，通知它对话是否结束
★WM_SHOWWINDOW 当隐藏或显示窗口是发送此消息给这个窗口
★WM_ACTIVATEAPP 发此消息给应用程序哪个窗口是激活的，哪个是非激活的
★WM_FONTCHANGE 当系统的字体资源库变化时发送此消息给所有顶级窗口
★WM_TIMECHANGE 当系统的时间变化时发送此消息给所有顶级窗口
★WM_CANCELMODE 发送此消息来取消某种正在进行的摸态（操作）
★WM_SETCURSOR 如果鼠标引起光标在某个窗口中移动
★WM_ENDSESSION 当系统进程发出且鼠标输入没有被捕获时，就发消息给某个窗口
★WM_MOUSEACTIVATE 当光标在某个非激活的窗口中而用户正按着鼠标的某个键发送此消息给当前窗口
★WM_CHILDACTIVATE 送此消息给MDI子窗口当用户点击此窗口的标题栏，或当窗口被激活，移动，改变大小
★WM_QUEUESYNC 此消息由基于计算机的训练程序发送,通过 WH_JOURNALPALYBACK的hook程序分离出用户输入消息
★WM_GETMINMAXINFO 此消息发送给窗口当它将要改变大小或位置
★WM_PAINTICON 发送给最小化窗口当它图标将要被重画
★WM_ICONERASEBKGND 此消息发送给某个最小化窗口，仅当它在画图标前它的背景必须被重画
★WM_NEXTDLGCT★发送此消息给一个对话框程序去更改焦点位置
★WM_SPOOLERSTATUS 每当打印管理列队增加或减少一条作业时发出此消息
★WM_DRAWITEM 当button，combobox，listbox，menu的可视外观改变时发送
★WM_MEASUREITEM 当button, combobox, listbox, listview control, or menuitem 被创建时
★WM_VKEYTOITEM 此消息有一个LBS_WANTKEYBOARDINPUT风格的发出给它的所有者来响应WM_KEYDOWN消息
★WM_CHARTOITEM 此消息由一个LBS_WANTKEYBOARDINPUT风格的列表框发送给他的所有者来响应WM_CHAR消息
★WM_SETFONT 当绘制文本时程序发送此消息得到控件要用的颜色
★WM_GETFONT 应用程序发送此消息得到当前控件绘制文本的字体
★WM_SETHOTKEY 应用程序发送此消息让一个窗口与一个热键相关连
★WM_GETHOTKEY 应用程序发送此消息来判断热键与某个窗口是否有关联
★WM_QUERYDRAGICON 此消息发送给最小化窗口，当此窗口将要被拖放而它的类中没有定义图标，应用程序能返回一个图标或光标的句柄，当用户拖放图标时系统显示这个图标或光标
★WM_COMPAREITEM 发送此消息来判定combobox或listbox新增加的项的相对位置
★WM_COMPACTING 显示内存已经很少了
★WM_WINDOWPOSCHANGING 发送此消息给那个窗口的大小和位置将要被改变时，来调用setwindowpos函数或其它窗口管理函数
★WM_WINDOWPOSCHANGED 发送此消息给那个窗口的大小和位置已经被改变时，来调用setwindowpos函数或其它窗口管理函数
★WM_POWER 当系统将要进入暂停状态时发送此消息
★WM_COPYDATA 当一个应用程序传递数据给另一个应用程序时发送此消息
★WM_CANCELJOURNA 当某个用户取消程序日志激活状态，提交此消息给程序
★WM_NOTIFY 当某个控件的某个事件已经发生或这个控件需要得到一些信息时，发送此消息给它的父窗口
★WM_INPUTLANGCHANGEREQUEST 当用户选择某种输入语言，或输入语言的热键改变
★WM_INPUTLANGCHANGE 当平台现场已经被改变后发送此消息给受影响的最顶级窗口
★WM_TCARD 当程序已经初始化windows帮助例程时发送此消息给应用程序
★WM_HELP 此消息显示用户按下了F1，如果某个菜单是激活的，就发送此消息个此窗口关联的菜单，否则就发送给有焦点的窗口，如果当前都没有焦点，就把此消息发送给当前激活的窗口
★WM_USERCHANGED 当用户已经登入或退出后发送此消息给所有的窗口，当用户登入或退出时系统更新用户的具体设置信息，在用户更新设置时系统马上发送此消息
★WM_NOTIFYFORMAT 公用控件，自定义控件和他们的父窗口通过此消息来判断控件是使用ANSI还是UNICODE结构

Answer 2

Sub s()
    Text1.MaxLength = 8'设置Text输入最长为8个字符
End Sub

Answer 3

1. 创建一个change事件，代码如下：
Private Sub Text1_Change()
If Len(Text1.Text) > 20 Then
Text1.Text = Left(Text1.Text, 20)
Text1.SelStart = 20
End If
End Sub
2. 窗体刚被加载时，text1还不存在，所以报错。

Answer 4

textbox.maxleng =20
在20个字符之内
汉字也最多只能输入20个

Answer 5

Private Sub Text1_Change()
If Len(Text1.Text) > 20 Then
Text1.Text = Left(Text1.Text, 20)
Else
Text1.Text = Text1.Text
End If
End Sub
这里的20是你限定的最大字符数。