PPT连接access数据库并读取内容

《PPT连接access数据库并读取内容》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、1、打开powerpoint删去幻灯片的两个框框选择后按下delete即可下一步，调出vb绘制一个textbox到幻灯片点击控件后，鼠标放到幻灯片变为十字形状，按下左键绘制一个区域用同样的方法放置两个按钮如图所示修改左侧按钮显示的文字对左侧按钮右键，选择属性修改caption值即可。同理修改右侧按钮显示内容。对查询数据库信息按钮右键选择查看代码打开代码视图要想连接access数据库需要引用选择工具—引用勾选microsoftactivexdataobjects2.0点击确定代码框输入DimrsAsNewADODB.RecordsetDimcnAsNewADO

2、DB.ConnectionDimconstring,sql,jieguoAsStringconstring="provider=microsoft.jet.oledb.4.0;"&"datasource="&"ppt.mdb;"cn.ConnectionString=constringcn.Opensql="select*fromusers"jieguo=""Debug.Printsqlrs.Opensql,cn,adOpenStatic,adLockOptimisticDoWhileNotrs.EOFjieguo=jieguo&"姓名："&rs("name

3、").Value&"性别："&rs("sex")&"爱好："&rs("hobby")&vbCrLfrs.MoveNextLooprs.CloseSetrs=NothingTextBox1.Text=jieguo同样的步骤，在清空显示内容按钮上面写代码然后保存即可。ppt文件做好后，开始建立access数据库，或者先建立数据库也可以。打开access，创建users表，并添加字段和内容对表1：表右键—设计视图修改表名为users如下图填写：右键，保存对users表右键打开如图填写内容右键users保存保存后关闭即可。如图，两个文件已有。打开演示文稿1.ppt浏

4、览即可如出现如下错误，在此引用microsoftactivexdataobjects2.0即可。选择工具—引用勾选microsoftactivexdataobjects2.0点击确定如果打开无反应，是ppt禁用宏了打开即可。仅提供例子，如有其它需求请参照修改即可。