日期:2010-07-19  浏览次数:20415 次

写Unicode控件时发现的传字串参数的问题:
问题描述:
   Unicode的OCX,属性参数Text,类型:BSTR。
   控件的源码(VC中)
   afx_msg void SetText(LPCTSTR lpszText)

   VB调用1:
   Dim strTest As String
   strTest = Text1.Text       ‘Text1文本框为空
   If Not IsNull(strTest) Then
      TestOCX2221.stringTest = strTest
   End If
   结果:
   SetText中lpszText是NULL。

   VB调用2:
   Dim strTest As String
   strTest = ""
   If Not IsNull(strTest) Then
       TestOCX2221.stringTest = strTest
   End If
   结果:
   SetText中lpszText不为NULL,得到指向空串的有效指针。

因此:
   上述调用1时:
   当控件的处理程序直接调用了CString的 == 或 !=,那就有问题了,因为CString这两个操作符不支持NULL,会出错。也就是调用了不支空指针的操作。

好吧,还是采用保险的做法吧: 加多一句:
   If(lpszText==NULL) lpszText = _T("");

很奇怪:
   不知道VB的两种调用为啥会传出不同的值。没明白。
   至于为什么ANSI不会有问题,可能是因为VB调用ANSI的控件时,需要对字串进行内部的转换(由Unicode转ANSI),而去除了可能为空指针的情况。