| 如何更改表的某一个字段的属性比如允许空字符 |
|
| 作者：cg1『文章… 文章来源：Access911 点击数： 本日：{$DayHits} 更新时间：2005-2-4 16:08:33 |
|
原文：http://access911.net/73FABF1E1BDC.htm
问题：
回答：
|
首先说一下“必填”和“允许空”的概念
相信大家已经知道在 VBA 里面 NULL 与 ""（零长度字符串）的区别了吧？
Null 表示未设置数据
"" 表示有数据，数据为一个零长度字符串
请参考帮助内的说明：
Null 值与零长度字符串的区别 (MDB)
注释 本主题中的信息仅适用于 Microsoft access 数据库 (.mdb)。
在查看含有 Null （Null：可以在字段中输入或用于表达式和查询，以标明丢失或未知的数据。在 Visual Basic 中，Null 关键字表示 Null 值。有些字段（如主键字段）不可以包含 Null 值。） 值和零长度字符串 （零长度字符串：不含字符的字符串。可以使用零长度字符串来表明您知道该字段没有值。输入零长度字符串的方法是键入两个彼此之间没有空格的双引号 (" ")。）的数据时，字段看起来是相同的，都没有任何值。但可以用表达式 （表达式：算术或逻辑运算符、常数、函数和字段名称、控件和属性的任意组合，计算结果为单个值。表达式可执行计算、操作字符或测试数据。）来区分 Null 值和零长度字符串。
在“设计”视图 （“设计”视图：显示数据库对象（包括：表、查询、窗体、宏和数据访问页）的设计的窗口。在“设计”视图中，可以新建数据库对象和修改现有数据库对象的设计。）中打开窗体、报表或数据访问页。
在查询设计网格 （设计网格：在查询“设计”视图或“高级筛选/排序”窗口中设计查询或筛选时所用的网格。对于查询，该网格以前称为“QBE 网格”。）的字段中，或在未绑定控件 （未绑定控件：未与基础表、查询中的字段或 SQL 语句连接的控件。未绑定控件通常用于显示信息性文本或装饰性图片。）的控件来源中，键入下列表达式。将 fieldname 替换为包含 Null 值和零长度字符串的字段名称。
=IIf(IsNull([fieldname]),"Unknown",Format([fieldname],"@;\ZLS"))
如果字段包含 Null，则表达式返回 “Unknown”，如果字段包含零长度字符串，则表达式返回“ZLS”。否则，表达式将值返回到该字段中。
|
“必填” 为“是” 表示不允许 NULL
“允许空” 为 “是” 表示允许 ""（零长度字符串）
参考下面函数
Function ChengTableFieldPro_ADO()
Dim MyTableName As String
Dim MyFieldName As String
MyTableName = "表 ds1"
MyFieldName = "aa"
Dim MyDB As New ADOX.Catalog
Dim MyTable As ADOX.Table
Dim MyField As ADOX.Column
On Error GoTo Err_GetFieldDescription
MyDB.ActiveConnection = CurrentProject.Connection
Set MyTable = MyDB.Tables(MyTableName)
GetFieldDesc_ADO = MyTable.Columns(MyFieldName).Properties("Description")
Dim pro
For Each pro In MyTable.Columns(MyFieldName).Properties
Debug.Print pro.Name & pro.Value
Debug.Print pro.Type
Next
MyTable.Columns(MyFieldName).Properties("Jet OLEDB:Allow Zero Length") = True
Set MyDB = Nothing
Bye_GetFieldDescription:
Exit Function
Err_GetFieldDescription:
Beep
MsgBox Err.Description, vbExclamation
GetFieldDescription = Null
Resume Bye_GetFieldDescription
End Function |
|
|
| 文章录入：tm 责任编辑：tm |
|
上一篇文章： 如何在任意位置插入记录
下一篇文章： 如何恢复误删除了含有自动编号字段的记录 |
| 【字体：小 大】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】 |
用户登录 
新用户注册 
网友评论：（只显示最新10条。评论内容只代表网友观点，与本站立场无关！）
