vb里怎样实现传递函数地址？
具体如下，我想初始化时创建一个线程
Private Declare Function CreateThread Lib "kernel32" (_
ByVal lpThreadAttributes As Object,_
ByVal dwStackSize As Long ,_
ByVal lpStartAddress As Long ,_
ByVal lpParameter As Integer,_
ByVal dwCreationFlags As Long,_
ByVal LpthreadId As Long) As Long
线程调用函数：
Private Function ThreadFunc1(_
ByVal hwnd As Long,_
ByVal wMsg As Long,_
ByVal wParam As Long,_
ByVal lParam As Long) As Long
MessageBox(0,"thread1","info",0)
End Function
初始化函数：
public Sub Initialize(ByRef lpfnBasFunc As Long)
'定义省略
lNull = 0
lStackSize = 0
lCreationFlags = 0
hThread = CreateThread(lNull,lStackSize,lpfnBasfunc,lNull,lCreationFlags,lpThreadId)
End Sub
有几个问题我不理解，
1，怎样才能定义C语言里的PVOID变量？即返回类型不确定的变量，AS ANY在vs2005里不能用了；
2，怎样实现传递函数地址？我想把ThreadFunc1这个函数的地址传进initialize里，然后再initialize里调用CreateThread来创建线程，我试过addressof，编译提示addressof不能转换为long，因为long不是委托类型。。。。不解（我传进来的函数地址不是给我自己调用的，而是作为参数传给windows API CreateThread的）；
3，vb里有没有NULL？或者说有没有什么常量是相当于VC里的NULL的？
以上代码我想实现创建线程，如果有哪里需要修改请指出来，本人今天才刚接触VB --!不胜感激
相关问答：
想在warcraft3里进行写屏操作【如对战平台中的胜负提示信息】，效果就像游戏平台中一样，我试过在一窗口中写入文字，然后一直让窗口强制最前，虽然能实现文字显示，但是文字会不断闪烁，而且有不确定BUG，通过论坛搜 ......
用VB怎么只针对windows自带的文件的右键添加菜单 如（.txt .doc)
这个是只针对以这两个为扩展名的文件操作
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\txtfile\shell\[随便起名]\command]
@= ......
在vb这编程里似乎有很多的东西是相联系的，为什么有些人对vb的编程摸不到头脑啊！并且有些事很容易的，但是却把它们的代码变成复杂，也去想一些不能实现的东西啊！
没分了，楼主多来点分！
来接点分
......
比如说要在1表中的第三列第二行单元中输入“一二三”一要粗体宋体12号字，二 不要粗体 15号字 三斜体5号字
代码应该怎么打？
LZ指的是个什么表格控件呢，貌似只能设置整个表的字体，或者某几行或几列，没有单独设� ......
在vb中怎么判断，插入到数据库中的值是重复的，本人才刚接触VB语言，甚是有好多地方还不懂，还请各位大侠们给出代码，谢谢了呀！！！
插入之前select一下阿。
或者写一个组合SQL插入语句，例如
IF not Exist(
& ......
