vb6 - 如何设置文本框输入长度

Question

使用 VB6

在我的表单中使用文本框。

我想限制文本框中的输入，所以最大值应该是6。
用户最多应输入六个字符，否则应显示错误消息

Button1.click

if Length(textbox1.text) > 6 then
  enter only six chars
else if Length(textbox1.text) < 6 then
  enter up to six chars

如何为上述条件编写代码。

Answer 1

VB6 中的文本框有一个 MaxLength 属性。将其设置为 6，然后用户不能输入超过 6。