我用GetPrivateProfileString从文本文件读取一行,但是得到的字符串最后有个尾巴,不知道怎么回事?类似一个字符,但是不能获得。是这样"Γ"的一个东西,有谁遇到过吗?

解决方案 »

  1.   

    你这样写函数就可以解决这个问题
    Function GetIniS(ByVal SectionName As String, ByVal KeyWord As String, iniFileName As String) As String
    Dim ResultString As String * 144, Temp As Long
    Dim s As String, i As Integer
    Temp& = GetPrivateProfileString(SectionName, KeyWord, "", ResultString, 144, iniFileName)
    If Temp& > 0 Then
        s = ""
        For i = 1 To 144
            If Asc(Mid$(ResultString, i, 1)) = 0 Then
                Exit For
            Else
            s = s & Mid$(ResultString, i, 1)
            End If
        Next
    End If
    GetIniS = s
    End Function
      

  2.   

    用你自己的方法获取这一行字符串s
    然后:msgbox asc(right(s,1))
    看看ascii码是多少
      

  3.   

    用定长字符串,并且chr (0)占据空间。Dim strTmp as StringstrTmp = string (255, chr (0))========================
    免费的学习、交流、源码、工具网站,欢迎大家访问!
    http://www.j2soft.cn/
      

  4.   

    //用定长字符串,并且chr (0)占据空间。同意,取出后用left截断