程序如下:
str:="a\rb\rc\r"
字符串有三行,三个值a,b,c.我想把这三个值设为变量并赋值为1.
现在的程序是这样写的:
repeat with hang:=1 to LineCount(str)
zhi:=GetLine(str,rhang)
if zhi=a then
a:=1
end if
if zhi=b then
b:=1
end if
if zhi=c then
c:=1
end if
repeat end
但是我的程序有点大,变量有几百个.要是每个变量都写一遍太累了,不知道大家有什么简单点的办法没有？

result:=NewVariable("variable name",initial value, "description",[IconID@"IconTitle"])
说明  NewVariable创建了一个新的自语法函数。 如果省略IconID@"IconTitle"这个变量为全局变量。如果新变量创建成功，返回TRUE，否则返回FALSE。错误信息存储在两个系统变量EvalStatus和EValstatus。NewVaiable只能在计算图标中使用,可能与CallTarget函数一起使用，它只在编辑时可用。