vb6 - 如何将数据接受到仅接受文化代码的文本框中，例如 vb 6 中的 en-US

Question

请告诉我一些建议，如何限制输入数据以仅接受文本框中的 en-US 等文化代码。

我已经尝试过此代码，但它接受所有 5 个字母字符...我希望它只接受格式为 en-US 的文化代码

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

Answer 1

使用 KeyPress 事件，您可以检查输入符号的 ASCII 值。如果它的值不正确，则将其设置为 0。

Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii > 190 Then KeyAscii = 0 End Sub

您可以包括更多检查 - 数字符号等。

您可能会发现这很有用：http ://www.asciitable.com/