16,554
社区成员
发帖
与我相关
我的任务
分享
Public Class Class1
Public a As String '全局变量
Dim myThread As Threading.Thread ‘线程
Public Function SetText() As Boolean
a="abc"
End Function
'启动线程
Public Sub Thread_Start()
myThread = New Threading.Thread(AddressOf SetText)
myThread.Start()
End Sub
End Class