我想请教VB中的TEXT是否有可以绑定汉语的属性,如没有则如何办?

解决方案 »

  1.   

    是不是文本框只能输入汉语?Private Sub Text1_Validate(Cancel As Boolean)
    if 0<ASC(Text1.text)<255 then Cancel=true
    End Sub
      

  2.   

    写法错了,应该是
    Private Sub Text1_Validate(Cancel As Boolean)
    If Asc(Text1.Text) > 0 And Asc(Text1.Text) < 255 Then Cancel = True
    End Sub
      

  3.   

    GetKeyboardLayoutList 函数可以取得所有输入法
    GetKeyboardLayoutname可以返回当前输入法的KeyboardlayoutName
    activateKeyboardlayout函数设置当前输入法
    LoadKeyboardLayout函数改变输入法的顺序Private Declare Function GetKeyboardLayoutList Lib ″user32″ _  
    (ByVal nBuff As Long, lpList As Long) As Long
    Private Declare Function GetKeyboardLayoutName Lib ″user32″ Alias _  
    ″GetKeyboardLayoutNameA″ (ByVal pwszKLID As String) As Long    
    Private Declare Function ActivateKeyboardLayout Lib ″user32″ _  
    (ByVal hkl As Long, ByVal flags As Long) As Long  
    Private Declare Function LoadKeyboardLayout Lib ″user32″ Alias ″LoadKeyboardLayoutA″ _  
    (ByVal pwszKLID As String, ByVal flags As Long) As Long
      

  4.   

    设置textbox的IMEMODE属性是可以的。无论用什么方法,前提是系统有中文输入法。但你不能保证系统中装有中文输入法或者说你不能保证任何使用过这台机器的人不把中文输入法卸载。除非你自己来处理输入。