请帮忙把下边的vb 语句 转换为 vfp6的语句
dim a(2) as string
a(0)="A"
a(1)="B"
a(2)="C"
dim i ,j as integer
for i =0 to 2
for j=46 to 50
list1.additem(a(i) & "\" & j)
next j
next i
vb很简单的语句 vfp不会啊 呵呵 帮忙写一下
[解决办法]
DIMENSION a(3)
a(1)="A"
a(2)="B"
a(3)="C"
FOR i = 1 TO 3
FOR j = 46 TO 50
ThisForm.List1.Additem(a(i) + "\" + ALLTRIM(STR(j)))
NEXT j
NEXT i
