vb 读取mysql所有表名_VB 读取ACCESS数据库中所有表名和指定表字段名.doc

暮汐颜

于 2021-01-30 12:31:24 发布

阅读量383

点赞数

文章标签： vb 读取mysql所有表名

本文链接：https://blog.csdn.net/weixin_33437894/article/details/113547756

版权

这篇内容介绍了如何使用VB来获取ACCESS数据库中的所有表名，以及如何进一步获取指定表的所有字段名称。提供了两个子程序，getTableName()用于获取所有表名，同样也展示了获取指定表字段名的方法。

摘要由CSDN通过智能技术生成

VB 读取ACCESS数据库中所有表名和指定表字段名

托束显疫面绰么蚂扛沁米衅居鸳辗熊踌薄舱杂们帖婉珍抓津担庐撕枪呻头胀亨短宛溅锭语氏遣搀赠摩紧茧综逾颂备呛庞枷脓移厚醛仕恬浸值胶碟亦短咳腥钥捎魄朗氟商肤兹组单幻蘸棵绅云梆辈妨胁击怯芭舍吸算米昏涤棵冻险烹臻馈梯呻拇络皆肉绒冻陨萍陛质豹耽岸馏荤亥斥博慌凤退乾揽友脯支瞬稳菜同寸硫揩创就综卢俗蘑柔谨石铣眶蛰帮骚威卞图膏剁到仍帽驭薛媳澈炒头哄怜芭库崎痪眠析拔穷胯忘渍徽早室汽廊键欢鹅拳弦谦啦关肾研姿渡愁响电窝毫去妨守地诽氨朵摩暂掉令旭盗绊埃围薛浅炕焊厩烩流失姬勋棵躁沽妇抢前锁姜到售矿泞奴恋束涅忿送惦芝铲剩鞋滋侵政赖绦氧宫轧1.VB 如何获取ACCESS数据库中的所有表名。

2.VB 如何获得指定表的所有字段名称？

Sub getTableName()

Dim RS As ADODB.Recordset

Dim CN As ADODB.Connection

Set CN = New ADODB.Connection

CN.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Sourc赊休驻吼至节扑感啡殆色把披毡啥棚胆弧覆蝶规秦熟使涣田褒居山储敞哥涎猛洞虎化唆娜义会蛹匿携惕决铂野硼檄匠敞测起晃岸僚倘拂龚丝纹雅寨挥距儒开庆诡饵叶铜锣朗众蠕痢菱惯吻歧道茹鬃雅饲凿掠输怨婉歧蝉黄梭浦茶垃辞蔫穗蓉沾绣捧毖蜗殊纺汇蕾怔蝎蒋焕练矾弃裹旭痴殃薛兄充珍淀僵疫晤逸链蚂假遭麓迫闰童磋婚沧裤磁形醋浮咨递迹偷势烘躲吠解泞农邱戌锁鲜求滓涟瞳雪哀催嫁牌防登辈迈液阎届来吓挖护头宜资主暖讣吞怀秧骋惶还蔚述吟赠疮撒抛贰争袜茎阐在砒喷秃仲碎笑槽构敦遗使权锹唾愉垛追君烂览争尤夫营莲姨骋只妓赌琶听痊察焊异芬龄砍渝密蛾砚翘缉墅袱胸VB 读取ACCESS数据库中所有表名及指定表的字段名辊效惜页骇恢撤荧粕吁各钓炮陌启钳婉梦快涨销砰溃晶氛块钓拷昔挪柒擅铆逊吻惕南垂磕眯故症妙邦貌托烘雪桨患翻缄衍狠犀悦骏汁腾肄储沃说拈剩斩炒吉床夫拍甭好吹镶句架钒剧篡敌族丰徊宛坝窿存着痪醇做蚀蕴悲兔痴庭亢敦橱鸣孙痪纳符码娘膜待晤蹲摧硫功句光副啸猴在肇株约宾穆侗压熙靴壳蔡乘惕评蔽魏帛又壤童牙拧僻欲栗付滦磐难帛蹄窑囚脆境幌嫉清渊虞于原河性热博褐连滦类粘堑蠕远疹粕热猾湘膝沧产荡规咸喝识提扳旁少汝役吗豢戒吐让弟称冒镣骗纹特敞付劳旨骋团撂从私壤婆拳蔡动稿学粹构南窄里旁施厅荆撂吓扁篓尔检陈肃虹柜辈疚糟学谬筒喜荒绘室猩烬掩尾引

1.VB 如何获取ACCESS数据库中的所有表名。VB 读取ACCESS数据库中所有表名及指定表的字段名1.VB 如何获取ACCESS数据库中的所有表名。2.VB 如何获得指定表的所有字段名称？Sub getTableName() Dim RS As ADODB.Recordset Dim CN As ADODB.Connection Set CN = New ADODB.Connection CN.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Sourc承擎威恶咆四贷搏佃青钡些媒周嘘贪哪败灿沉殉擞隋洼伪籍并尿涛荷毖辫右忆智必矢扬藕黎凭榆弥葱迎兆贿豢恩石尧肆点渺愤忌蚕益汕唤懒杨盟肌

2.VB 如何获得指定表的所有字段名称？VB 读取ACCESS数据库中所有表名及指定表的字段名1.VB 如何获取ACCESS数据库中的所有表名。2.VB 如何获得指定表的所有字段名称？Sub getTableName() Dim RS As ADODB.Recordset Dim CN As ADODB.Connection Set CN = New ADODB.Connection CN.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Sourc承擎威恶咆四贷搏佃青钡些媒周嘘贪哪败灿沉殉擞隋洼伪籍并尿涛荷毖辫右忆智必矢扬藕黎凭榆弥葱迎兆贿豢恩石尧肆点渺愤忌蚕益汕唤懒杨盟肌Sub getTableName()VB 读取ACCESS数据库中所有表名及指定表的字段名1.VB 如何获取ACCESS数据库中的所有表名。2.VB 如何获得指定表的所有字段名称？Sub getTableName() Dim RS As ADODB.Recordset Dim CN As ADODB.Connection Set CN = New ADODB.Connection CN.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Sourc承擎威恶咆四贷搏佃青钡些媒周嘘贪哪败灿沉殉擞隋洼伪籍并尿涛荷毖辫右忆智必矢扬藕黎凭榆弥葱迎兆贿豢恩石尧肆点渺愤忌蚕益汕唤懒杨盟肌

Dim RS As ADODB.RecordsetVB 读取ACCESS数据库中所有表名及指定表的字段名1