| 查看: 1147 | 回复: 0 | ||
[求助]
利用VB6.0创建Access新表并且新表每列的“必填字段”为否
|
|
dim MyCatalog as ADOX.Catalog dim Mytable as table dim Myrecordset as Recordset Set Mytable = New table '新建表并写好名字与字段名 Mytable.Name = "abcde" Mytable.Columns.Append "a", adInteger Mytable.Columns.Append "b", adVarWChar, 20 Mytable.Columns.Append "c", adVarWChar, 20 Mytable.Columns.Append "d", adInteger Mytable.Columns.Append "e", adVarWChar, 20 MyCatalog.Tables.Append Mytable '将新表添加到目录 Set Mytable = Nothing Set MyCatalog = Nothing Set MyRecordset = New ADODB.Recordset '新建记录集并设置 MyRecordset.CursorType = adUseClient MyRecordset.LockType = adLockOptimistic MyRecordset.CursorLocation = adUseClient MyRecordset.Open "abcde", MyConnection, adOpenDynamic, adCmdTable MyRecordset.Fields("a"  .Properties("Required".Value = False MyRecordset.AddNew MyRecordset.MoveFirst ' 往下开始逐条写记录 如红色语句显示的，本人用vb6.0对Access2007新建表，想在表打开后，对字段属性的“必填字段”由默认值“是”修改为“否”，在网上查了一些写法，但没成功，这里请教各位高手了。 |
回复此楼» 猜你喜欢
欢迎发来filecode的Mz6后的代码验证其规律
已经有65人回复
-
时间戳又变了8-15
已经有23人回复
-
filecode=后面第一个是大写字母
已经有7人回复
-
有时候，自然基金真的不能太认真 （我的申报经验）
已经有10人回复
-
filecode
已经有12人回复
-
小木虫上这么多卖论文的，真有人买论文么？感觉没必要啊
已经有13人回复
-
哪位老哥知道今年的国自然具体哪一天放榜？
已经有7人回复
-
关于Filecode分析方法
已经有13人回复
-
各位道友，我要去昆明玩几天，回来见。
已经有8人回复
-
咱们一起用铁证分析2026国家社科基金中标与否
已经有22人回复
点击这里搜索更多相关资源
