关于VB使用ActiveX.Exe创建多线程程序的奇怪问题
'这里是启动过程[事件互斥就不写了]
Dim f as frmMain
Sub Main
Set f=New frmMain
f.Show
End Sub
'这里是一个线程类。。。随便写啥。。。
类名:BT
'这里是主窗口
Dim cBT as BT
Sub form_Load
'奇怪的问题就在这里...
Set cBT=CreateObject("工程名.BT")
'在Load事件中创建的对象(这里应该不能这么说,这个Load是由Sub Main中直接调用的... 应该是[在Sub Main中创建的对象]),
'这个对象无论如何,都还是与主线程处于同一线程似
'是否处于同一线程没法证实,但是这里创建的线程只要挂起,主窗口就会挂机
End Sub
'但这行代码
Set cBT=CreateObject("工程名.BT")
放在其它事件中。。比如 form_Active(),Buttom_Click()里面
子线程挂机，主窗口还是正常能接收消息的
就会正常。。。。
郁闷呐。。。 拆了一个上午。。。
总以为是其它类里面调用了啥造成主窗口卡死。。。 没想到会是这样。。 ：（
继续折腾。。。。。。
相关文档：
rnd函数返回或者说产生一个小于1但大于或等于0的single类型的随机数。
产生随机数之前需要一个种子。
·不同的种子，可使随机数生成器生成不同的随机数；
·在一个种子下，生成的随机数相同。
随机数生成器的语句为randomize。格式为：randomize[x]。
·当x>0时，使用前一次调用rnd函数产生的� ......
窗体设置，控件布局时用:
alt+v+x可以快速显示出工具框
Alt+P+N 引用
ctrl+左右键头可以移动控件
shift+左右键头调整控件大小
F7 切换到编辑窗口
Shift+f7 切换代码窗口
开发代码，调试代码都能用的：
Ctrl+C复制
Ctrl+V粘贴
Ctrl+X剪贴
Ctrl+F查找
开发代码时用的:
Tab 向右推
Shi ......
1、创建控件：lbl1、txt1、lbl2、cmd1
2、lbl1.caption=输入日期（任一种正确格式）：
设置lbl1、txt1、lbl2、cmd1的字体大小及颜色；
3、双击按钮“确认”，添加代码，效果为：
Option Explicit
Private Sub cmd1_Click()
&nb ......
'在引用里添加ADODB
Public vscn As ADODB.Connection
Public SQLString As String
SQLString = "Provider=SQLOLEDB.1;Password=密码;Persist Security Info=True;User ID=用" & _
"户;Initial Catalog=数据库名;Data Source=服务器名"
......
