<< 向前        下一页 >>

ID : 5167

SetPublicValue

功能

将值代入Public属性的局部变量中。

格式

SetPublicValue 值, 任务名, Public变量名[, 次元1_Index[, 次元2_Index[, 次元n_Index]]]

指定项目

值
指定代入Public变量值的值。指定与代入的局部变量相符合的数据型数据。
任务名
通过字符串型数据指定任务名。"参照“文件路径和任务”
Public变量名
通过字符串型数据指定需要代入Public属性的局部变量名。
次元n_Index
需要代入Public属性的变量为排列时，通过整数型数据指定各次元的Index编号。

解说

将值代入Public属性的局部变量中。

也可代入排列中。此时，代入数据的数据型、次元数、要素数必须和代入Public属性的局部变量相同。

相关项目

Public属性、 SetPublicValue、 Static属性、 Static、 Dim、 Static、 定义语句、 局部变量

注意事项

通过字符串型数据指定用于指定Public属性局部变量的自变量、“任务名”和“Public变量名”。

应用示例

'过程名Pro1
' 为定义Public属性变量的程序。
	Public pubVal As Integer = 5
	Public pubPos(5) As Position
	

'过程名Test1
Sub Main
	Dim aaa As Integer
	GetPublicValue aaa, "Pro1", "pubVal"	'读取"Pro1"的Public变量"pubVal"
	SetPublicValue aaa + 1, "Pro1", "pubVal"	' +1后代入

	Dim n As Integer
	For n = 0 To 5
		'读取“Pro1”排列的Public变量“pubPos”中Index编号n的要素
		SetPublicValue CurPos, "Pro1", "pubPos", n
		Delay 1000
	Next

	Dim ccc(5) As Position
	For n = Lbound(ccc) To Ubound(ccc)
		ccc(n) = CurPos
		Delay 1000
	Next
	SetPublicValue ccc, "Pro1", "pubPos"	'代入"Pro1"排列的Public变量"pubPos"中
End Sub

ID : 5167

<< 向前        下一页 >>