Thread.SetShareVar 设置共享变量

文章目录
  1. 1. 功能
  2. 2. 语法
  3. 3. 参数
  4. 4. 返回值
  5. 5. 示例
  6. 6. 备注

功能

设置全局共享的键值。

语法

Thread.SetShareVar 键名, 键值

参数

参数 数据类型 解释
键名 字符串 类似于ini配置中的键名。
键值 任意类型 任意有效数据,与键名相配对。

返回值

示例

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Dim 线程ID1, 线程ID2, i
i = 2
//设置全局共享键值
Thread.SetShareVar "我是键名", "我是键值"

//启动子线程,主线程与子线程之间的变量互不影响
线程ID1 = Thread.Start(多线程, 1, "紫猫编程学院")
Delay 100
TracePrint "在主线程中读取结果共享变量为:" & Thread.GetShareVar("我是键名")

For i = 0 to 5
TracePrint "主线程的i=" & i
Delay 1000
Next
//主线程停止,所有的子线程都会停止

Sub 多线程(序号, 显示内容)
Dim s
i = 100
//读取全局共享键值
s = Thread.GetShareVar("我是键名")
TracePrint "在多线程中读取结果共享变量为:" & s
TracePrint "在多线程中读取结果普通变量i为:" & i
End Sub

备注