一开始 以为VB的线程 不是像网上人说的那么脆弱。。。哎 现在领略到了。。。VPrivate Declare Function CreateThread Lib "kernel32" (lpThreadAttributes As Any,ByVal dwStackSize As Long,ByVal lpStartAddress As Long,ByVal lpParameter As Long,ByVal dwCreationFlags As Long,lpThreadId As Long) As Long Private Sub Command1_Click() Dim threadid1 As Long Call CreateThread(Null,ByVal O&,AddressOf StartConn,VarPtr(0),ByVal 0&,threadid1) End Sub Sub StartConn() Dim x As String x = Left("dasdasd",4) '这句都不行 直接崩溃 End Sub B 退休吧