请高手解答个疑难问题
运行环境VFP9.0，已有数据库‘mydb.dbc’和表‘lc.dbf’
--------------------------------------------------------------------------
*主窗体中申明
public myarr,no
dimension myarr[20] as string
--------------------------------------------------------------------------
*窗体的load事件
no=1
store .f. to myarr
--------------------------------------------------------------------------
*command1的click事件
myarr[no]=alltrim(str(no))
no=no+1
--------------------------------------------------------------------------
*command2的click事件
use lc
insert into lc.dbf (字段1，字段2) values (myarr[1],myarr[2])
use
open database mydb.dbc
creat table (myarr[2])(字段1 c(50),字段2 c(50),字段3 c(50),字段4 c(50),字段5 c(50))
use (myarr[2]).dbf
for n = 3 to no
alter table (myarr[2]) ADD (myarr[n]) c(50) &&此处出错，提示语法错误
endfor
use
close database
[解决办法]
问题问过吧，你将myarr中的内容显示出来看看，
alter table (myarr[2]) ADD (myarr[n]) c(50)：也显示出来看看
or
上传你的表单、DBF dbc 到www.access911.net/csdn
，用WINRAR压缩
[解决办法]
你这代码具体是要实现什么样的功能？有点看不明白
两个按键又是怎么操作他的？我把你代码拷过来其他地方也有出错的，你看下你的数据类型对不对？
[解决办法]
alter table (myarr[2]) ADD (myarr[n]) c(50) &&此处出错，提示语法错误
刚刚分析了下：
是因为字段名要求是“下划线_”或“字母”开头，您的以下语名
myarr[no]=alltrim(str(no))
no=no+1
转换后的数组中存放的是数字，所以就报错啦！！可改为：
myarr[no]= "f_" + alltrim(str(no))
no=no+1
