Question

Visual Foxpro 中如何快速给数组赋值

在其它的语言如C语言中，可以这样赋值数组a(2,2)={1,2,3,4},我想问的是在vfp中可以这样赋值吗。如果没有这种方式，那vfp有没有给数组赋值快速简便的方法？ 而不用单独给每一个数组元素一次次的赋值。

Answer 1

将数据存入内存变量、数组或数组元素中。
STORE eExpression TO VarNameList | ArrayNameList或者
VarName | ArrayName = eExpression
参数
eExpression
指定一个表达式，该表达式的值将存入内存变量、数组或数组元素中。如果指定内存变量不存在，则创建该内存变量，并且将其初始化为 eExpression。数组必须先用 DIMENSION 命令定义。STORE 命令用新值替换现有的内存变量、数组或数组元素中的值。
VarNameList
指定内存变量或数组元素的列表，将 eExpression 存入这些内存变量或数组元素中。内存变量名或数组元素之间用逗号分隔。
ArrayNameList
指定 eExpression 所要存入的、已存在的数组名，数组名之间用逗号分隔。
如果 SET COMPATIBLE 为 OFF，那么 STORE 命令用指定值初始化数组中的每一个元素；如果 SET COMPATIBLE 为 ON，STORE 命令将指定值存入指定名称的内存变量中，并改写任何已存在的同名数组。
备注
等号 (=) 赋值操作符可代替 STORE 命令。内存变量、数组或数组元素必须位于等号的左边，其值位于等号的右边。
使用花括号可以将日期直接存入内存变量、数组或数组元素:
STORE {^1998-12-25} TO gdXMas
帮助中的“系统容量”列出了能够创建的变量或数组的最大数。在 Visual FoxPro 配置文件中可以增加或减少此限制。有关配置 Visual FoxPro 的详细内容，请参阅 配置 Visual FoxPro。
示例
STORE DATE() TO gdDate
STORE 50 TO gnNumeric
STORE 'Hello' TO gcCharacter
STORE .T. TO glLogical
STORE $19.99 TO gyCurrency

DIMENSION gaMyArray(2,2)
SET COMPATIBLE OFF
STORE 2 TO gaMyArray

CLEAR
DISPLAY MEMORY LIKE g*

Answer 2

如果你是赋相同的值的话,可以,但如果赋不同的值,只能一个一个来了,没有什么简单的方法了
比如
dime a(2,2)
a=2
这样就对数组中所有的位置都赋上2这个值了.