vfp表单向怎么表添加日期型数据？ 我的代码在下面。执行命令按钮的时候总显示数据类型不匹配。

appe blan

repl 学号 with allt(thisform.text1.value),学生姓名 with allt(thisform.text2.value),性别 with allt(thisform.combo1.value),出生日期 with allt(thisform.text3.value),所在专业 with val(allt(thisform.text4.value)),班级 with val(allt(thisform.text5.value))

建议这句用insert into 替代

set date to ansi

text3的format 属性输入 D，程序不用allt()

在运行时刻向一个对象添加一个新属性。

ADDPROPERTY( ) 用于向有效的 Visual FoxPro 对象添加新属性和值，对象包括由 Visual FoxPro 类生成的类，COM 类，以及 SCATTER...NAME 命令生成的类。

ADDPROPERTY(oObjectName, cPropertyName, [, eNewValue ])

参数

oObjectName

指定要加属性的对象的名称。如果 oObjectName 不是一个有效的对象，Visual FoxPro 将产生适当的提示信息。

cPropertyName

指定要添加到对象中的新属性的名称。如果指定的属性名不存，该属性将被创建并添加。

eNewValue

指定新属性的设置值。当省略 eNewValue时，如果该属性已经存在，Visual FoxPro保持该属性值不变；如果该属性是新添加的，Visual FoxPro 将该属性值设为“假”(.F.)。

返回值

逻辑型数据类型。下表中列出了ADDPROPERTY( )的返回值，及添加一个已经存在的属性到对象时的表现。

返回值 说明

真 (.T.)

当 ADDPROPERTY( ) 成功添加属性时。

当新属性是一个数组属性，并且该数组已经存在，ADDPROPERTY( ) 根据cPropertyName中指定的情况重新调整数组的大小。如果用eNewValue指定了属性值，数组中所有元素都将设为该值。如果省略 eNewValue，所有的数组元素都将被设为假(.F.)。

如果新属性不是一个数组属性，但已经存在的属性是一个数组属性，该属性将保持同样大小的数组属性。如果用 eNewValue指定了新值，数组中全部元素将被设为该值。如果省略eNewValue，所有数组元素将被设为假(.F.)。

如果新属性不是一个数组属性，并且已存在的属性是不是数组属性或者不是一个只读的 Visual FoxPro 自带属性，如果eNewValue中指定了新值，已存在的属性将被设为该值。如果省略eNewValue，已存在的属性值将保持不变。

如果指定的属性是一个已经存在，被标为Hidden (隐藏)或 Protected(受保护)的对象成员， Visual FoxPro 产生一个错误，"name 属性没有找到(Error 1734)"并且该属性不能被 ADDPROPERTY( )设置。

假 (.F.)

当 ADDPROPERTY( ) 未能成功添加属性时。

当新属性是数组属性，已存在的属性不是数组属性，已存在的属性将保持不变。

说明

用 ADDPROPERTY( ) 可以为对象创建属性数组。如果提供了eNewValue，每个数组元素初始化为该值。否则，数组中每个属性的值都被设为假(.F.)。更多的关于为对象创建属性数组的信息，请参见示例。

Visual FoxPro新添加的属性将做为Public(公共)属性。该属性可以被指定为 Protected 或 Hidden。

如果已存在的属性是只读的 Visual FoxPro 自带属性，比如BaseClass 属性，Visual FoxPro 将产生一个错误，"属性名是只读的(Error 1743)"。

如果属性名不是效的，例如，属性名中包含空格或其它非法字符，Visual FoxPro 将产生一个错误，"不正确的属性名(Error 1470)"。

对于由Visual FoxProFor类继承而来的对象的实例，ADDPROPERTY( ) 将保持AddProperty方法中的可视化设置。如果AddProperty 被标为 Hidden 或 Protected， ADDPROPERTY( ) 不创建新属性并返回假(.F.)。如果 AddProperty 方法被标为Public (默认)，ADDPROPERTY( ) 创建数组并返回真(.T.)。这保护了原始的类设计。

注意：

这个不能应用到由 Visual FoxPro OLEPUBLIC 类创建的 COM 对象。

　

对于FOR EACH命令中的对象引用，不能使用ADDPROPERTY( )函数，但可以用AddProperty 方法程序来实现该功能。

示例

示例 1

下面的示例向SCATTER命令创建的对象添加一个新的属性。

USE customers

SCATTER NAME oCust

ADDPROPERTY(oCust,"MyProperty")

示例 2

下面的示例向 oMyForm 对象添加了一个属性数组，并且显示它的内容，1 和 "Two"。

oMyForm = CREATEOBJECT('Form')

ADDPROPERTY(oMyForm, 'MyArray(2)', 1)

oMyForm.MyArray(2) = "Two"

CLEAR

? oMyForm.MyArray(1)

? oMyForm.MyArray(2)

请你们提问题时要表达清楚，最好贴图，

一、列表框，additem和addlistitem两种方法都可以向列表框中添加数据，其中additem方法可以按索引号添加记录，而addlistitem方法是用ID号添加记录，使用这两种方法添加数据项时必须要求ROWSOURCETYPE属性值为0或为1.

control.additem(cItem [,nIndex] [,nColumn]) 其中，cItem是要添加的数据项内容，nIndex是索引号。如果指定了有效的nIndex值，cItem将放置在控制的正确位置；如果指定的nIndex已经存在，数据项将插入到这个位置，在这个数据项后面的其它所有数据项在组合框或列表框控制的列表区中向下移一个位置。nColumn将指定数据项要加入的列，默认值为1.

addlistiem方法的语法如下

control.addlistiem(cItem [,nItemID] [,nColumn])

其中，cItem和nColumn是要添加的数据项内容和要加入的列。nItemID是要添加数据项的惟一ID号，如果指定的nItemID已经存，则用cItem覆盖当前ID数据项的内容。

二、文本框

thisform.text1.value="你好"

以上用命令的方式添加，也可以直接添加

可以设置文本框的数据类型，

thisform.text1.value="" &&设置为字符型

thisform.text1.value=0 &&设置为数值型

thisform.text1.value={} &&设置为日期型

---