【求助】如何用代码读取/写入窗体属性的“说明”的内容？

aslxt · 发表于 2010-11-22 22:11:32

如图，如何用代码读取/写入窗体属性的“说明”的内容？
以下代码只能读取名称、类型、创建时间、修改时间等，
  Dim obj As AccessObject
   For Each obj In CurrentProject.AllForms
      Debug.Print "Name" & ":" & obj.Name '名称
      Debug.Print "DateCreated" & ":" & obj.DateCreated'创建时间
      Debug.Print "DateModified" & ":" & obj.DateModified'修改时间
   next

aslxt · 发表于 2010-11-22 22:26:28

图

红尘如烟 · 发表于 2010-11-23 00:04:53

CurrentDb.TableDefs("表1").Properties("Description")
CurrentDb.QueryDefs("查询1").Properties("Description")
CurrentDb.Containers!Forms("报表1").Properties("Description")
CurrentDb.Containers!Reports("报表1").Properties("Description")
CurrentDb.Containers!Scripts("宏1").Properties("Description")
CurrentDb.Containers!Modules("模块1").Properties("Description")

红尘如烟 · 发表于 2010-11-23 00:05:46

注意，此属性并不是默认的内置属性，第一次设置时需要用Properties.Add方法追加

ui · 发表于 2010-11-23 09:20:20

学习

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[Access本身] 【求助】如何用代码读取/写入窗体属性的“说明”的内容？

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)