VB中回调函数的一个问题
之前碰到一个问题，VB中向一个C++写的DLL中注册一个Callback，C++在调用这个Callback时有些问题，具体问题描述和下面这个帖子中的情况是一样的: http://topic.csdn.net/t/20051104/09/4370840.html
经过尝试以后发现，在VB中写的回调函数必须是用Function关键字，并且，必须要设置返回值，如下：
Public Function Callback () As Long
’TODO: Here
Callback = 0
End Function
如果这个回调中没有声明返回值，并且没有Callback = 0这个情况，就会出现上述帖子中的问题.
相关文档：
Microsoft VBScript 运行时错误 '800a0046' 没有权限: 'CreateObject'
显示错误：没有权限: 'CreateObject'
记得将组件加入 Users 组权限（如果将 C 盘去掉 Users 组权限的话）。
开始。。。运行。。。regsvr32 jscript.dll (命令功能： 修复Java动态链接库)
开始。。。运行。。。regsvr32 vbscript.dll(� ......
很多时候,我们不想一开始就显示滚动条,当文本到达指定行数文本框无法完全显示的时候再显示它,由于Scrollbar属性是只读的,无法在运行时的代码中改变这个属性,只能使用下面的API实现这个功能:
Public Declare Function ShowScrollBar Lib "user32" (ByVal hwnd As Long, ByVal wBar As Long, ByVal bShow As Long) As Long
......
VB中的Unicode 和 Ansi 格式
Visual Basic 32-bit 版本的字串处理采用 Unicode，也就是说字串在 VB 内部是以Unicode 的格式来存放。何谓 Unicode？简单的说，就是每一个字符都是以 2-byte 的形式表示，而每个「实体字符」就是一个「字符」。因此，
Len("大家好")
Len("abc")
& ......
去年曾写过一篇博文，名称叫《用VB无窗口透明Usercontrol编写透明浮动按钮》，该文有一个观点是错误的，即透明无窗口Usercontrol不支持设计时点选。其实，通过在UserControl_HitTest过程里加入HitResult = vbHitResultHit语句，就可以实现设计时的点选了，为此，修改代码如下：
'* ******************* ......
