vfp中如何用表单给一个表增加字段

VFP可在表单上的某个按钮的Click事件中使用ALTER TABLE - SQL命令来给一个表增加字段。

ALTER TABLE - SQL命令

编程修改一个表的结构。

ALTER TABLE <表名> ADD <字段名> <字段类型>

例如 ：

ALTER TABLE 成绩表 ADD 数学成绩 C(8)

是在成绩表中加一个字段名叫 数学成绩， 字段类型为字符型， 宽度为8。

把表添加到数据环境中，再拖到表单中新建控件command1 ，command2讲它们的caption属性修改为 “保存添加”和“退出”在form的INit事件中输入代码use <你要赋值的表>

public temp(表内的字段数)&&这里是设置你想修改或保存的字段数

thisform.txt<字段名1>.readonly=.f.

thisform.txt<字段名2>..readonly=.f.

thisform.txt<字段名x>..readonly=.f.

thisform.txt1.setfocus()&&让表单中

thisform.refresh &&设置刷新表单

scatter to temp &&把值赋值给数组 temp在command1的click事件中输入一下代码m=messagebox("是否要保存修改？",4+48,"信息提示")&&d出信息提示，提示用户是否保存修改

if m=6 &&当用户按确定时执行下面的代码。

messagebox("保存修改完成",4+48,"信息提示")

scatter to temp

else

gather from temp

thisform.refresh

endif

在command2的click事件中输入以下代码release thisform &&释放表单

use&&关闭表

---