strPath
=
App.Path
If
Right(strPath,
1)
<>
\"\\\"
Then
strPath
=
strPath
&
\"\\\"
MyData.DatabaseName
=
strPath
&
\"ExampleDB.mdb\"
\'数据库存地址
MyData.RecordSource
=
\"Info\"
\'表名
然后么,使用的就是ado。。。然后,自己来吧,你说的有点问题,这种 *** 作只有显示和添加两种,说读写有点不专业了。。。
1、首先在电脑中,找到并打开“Microsoft Visual Basic 6.0 中文版”软件。
2、然后在打开的页面中,默认状态下,“工具箱”中的控件,只有如图所示的这些。
3、这时单击页面上方“工具”菜单中的“部件”按钮。
4、在“部件”对话框中的“控件”选项卡中,选中“Microsoft Common Dialog Control 6.0”,然后单击“确定”按钮。
5、这时可以看到,工具箱中多了一些控件,这些控件即为高级控件。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)