vb.net中文符号 vb语言符号

vb.net 让相应的textbox中只能输入“中文字符、英文、数字”

每个textbox都有KeyPress事件（event），每次用户输入一个字符时检测，如不满足则清空

我现在不在vs下，你可以找到这个面板，绑定相应的函数

比如只能显示数字

Private Sub NumBox_KeyPress(KeyAscii As Integer)

    If Not IsNumeric(NumBox.Text) Then

        NumBox.Text = ""

    End If

End Sub

只能显示英语（a-z 97-122； A-Z 65-90； 8（退格）和13（换行））

Private Sub EngBox_KeyPress(KeyAscii As Integer)

    If Not (KeyAscii = 97 And KeyAscii=122) Or (KeyAscii = 90 And KeyAscii=65) Or = 8 Then

        EngBox.Text = ""

    End If

End Sub

只能显示汉字（汉字的ASCII值要么小于0，要么是8（退格）和13（换行））

Private Sub ChineseBox_KeyPress(KeyAscii As Integer)

    If Not KeyAscii  0 Or KeyAscii = 8 Or KeyAscii = 13 Then

        ChineseBox.Text=""

    End If

End Sub

做了一些小修改，不明白请及时追问，满意敬请采纳，O(∩_∩)O谢谢

相关问答

Q1: VB.net 如何获得中文字符串的长度？

上面思路是正确vb.net中文符号的vb.net中文符号， 用ascw 函数也可以

private function LenC( ps as string ) as Integer

Dim n As Integer

Dim StrLen As Integer

For n = 1 To Len(Text1.Text)

If Ascw(Mid(Text1.Text, n, 1)) 256 Then

StrLen = StrLen + 2

Else

StrLen = StrLen + 1

Next n

return strLen

end function

Q2: VB.net 字符转换问题 字符（汉字、数字、字母、符号）>gb2312>unicode>utf8， 以及逆转的方法

字符编码转换吗?

1.字符与gb2312(gbk的子集)：

Public Function GBKEncode(ByVal sInput As String) As String

Dim ret_GBKEncode As String = ""

Dim i As Integer

Dim startIndex As Integer = 0

Dim endIndex As Integer

Dim x() As Byte = System.Text.Encoding.Default.GetBytes(sInput) '字符以及字符串在vb2008中都是以unicode编码存储的

endIndex = x.Length - 1

For i = startIndex To endIndex

ret_GBKEncode = "%" Hex(x(i))

Next

Return ret_GBKEncode

End Function

'GBK解码

Public Function GBKDecode(ByVal sInput As String) As String

sInput = sInput.Replace("%", "")

Dim ret_GBKDecode As String = ""

Dim sLen As Integer = sInput.Length

Dim n As Integer = sLen \ 2

Dim sBytes(0 To n - 1) As Byte

'转化为字节码

For i As Integer = 1 To n

sBytes(i - 1) = CByte("H" sInput.Substring(2 * i - 2, 2))

Next

'将字节码转化为字符串

ret_GBKDecode = System.Text.Encoding.Default.GetString(sBytes)

Return ret_GBKDecode

End Function

2.Unicode字符串为UTF-8

Imports System.Text

Public Function StringAsUtf8Bytes(ByVal strData As String) As Byte()

Dim bytes() As Byte

bytes = Encoding.UTF8.GetBytes(strData)

Return bytes

End Function

'这里可以类推出好几种。

Q3: vb.net怎么判断一个字符串中是否包含汉字

str = "hello,everybody. " 返回false，位置0。（不含汉字和汉语标点符号）

str = "hello,ererybody。 " 返回false，位置16。（最后一个句号是汉语标点符号）

先谢过大家了！

Q4: VB中“:”是什么意思？

在VB中“vb.net中文符号：”并行符号，可以用来连接两行代码。

vb.net中文符号我们知道在VB中，代码是以行为单位，一条语句一行，但行后加上英文冒号后，可以再多加一行vb.net中文符号的语句在后面。

例如vb.net中文符号：

if i= 1 then

a=a+1

b=a+5

end if

可以写成

if i= 1 then a=a+1:b=a+5

VB 的中心思想就是要便于程序员使用，无论是新手或者专家。VB使用了可以简单建立应用程序的GUI 系统，但是又可以开发相当复杂的程序。

VB 的程序可以包含一个或多个窗体，或者是一个主窗体和多个子窗体，类似于操作系统的样子。有很少功能的对话框窗口（比如没有最大化和最小化按钮的窗体）可以用来提供弹出功能。

扩展资料

vb.net 特性：

1、vb.net 完全集成到 Visual Studio 集成开发环境中，在这种集成开发环境与 VB 在若干方面有差异。主要体现在窗体的布局以及菜单等方面都有所不同。

2、vb.net 项目与 VB 不同。它使用基于文件夹的模型，所有项目均放置在项目文件夹层次结构中。

3、vb.net 中使用ado.net来访问数据库，ado.net是.netFramework的一部分。在 vb.net 中实现数据访问的方法主要有两种。

其一是在程序设计阶段，通过创建、配置数据适配器 DataAdapter 和生成数据集 DataSet；其二是在运行中，通过编程方式动态创建配置数据适配器和创建、生成数据集。

4、在 vb.net 中是使用asp.net技术来编写 Web 页面的。在asp.net中使用的也不是脚本语言，而是真正意义的编程语言。

凭借asp.net的 Web 应用程序、XML Web Services 等基于 Web 的功能，使得 vb.net 开发 Web 页面与开发 Windows 应用程序很相似，Web 页面代码也显得有条有理了。

5、vb.net 已经成为完全的面向对象的编程语言，并且新增更多语言特性。

参考资料来源：百度百科—Visual Basic

Q5: VB.NET怎么限制中英文输入长度

Private Sub TextBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox1.KeyPress

If System.Text.Encoding.Default.GetByteCount(TextBox1.Text) = 11 And e.KeyChar Chr(8) Then

e.Handled = True

Else

e.Handled = False

End If

End Sub

这个不太完善，是假设原来文本长度已经有11就不允许继续输入，因为判断当下输入的是汉字还是英文很麻烦。

e.KeyChar Chr(8)这句是保证任何时候Backspace键都要有效。

希望能对你有所帮助。

vb.net中文符号的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vb语言符号、vb.net中文符号的信息别忘了在本站进行查找喔。