我目前在制作一个管理系统,将汉字输入,将text属性的maxlength设为10,由于vb的dbcs对汉字的识别是每个字节一个。但存入数据库时,SQL对汉字时两字节一个汉字,存储出现错误,怎么解决,可否屏蔽dbcs??请各位大虾请教!!

解决方案 »

  1.   

    自己做一个计算长度的函数不就行了吗?'* -----------------------------------------------
    '* 计算出 含中文字符的字符串长度
    '* -----------------------------------------------
    Public Function LenC(ByVal AString as string) as Long  Dim lngStringLen
      Dim lngI
      Dim intACharASC  LenC = 0
      lngStringLen = Len(AString)  If lngStringLen = 0 Then
        Exit Function
      End If  For lngI = 1 To lngStringLen
        intACharASC = Asc(Mid(AString, lngI, 1))
        If (intACharASC >= 0) And (intACharASC <= 128) Then
          LenC = LenC + 1
        Else
          LenC = LenC + 2
        End If
      NextEnd Function或者在数据库中使用 nvarchar 类型.