我们专注攀枝花网站设计 攀枝花网站制作 攀枝花网站建设
成都网站建设公司服务热线:400-028-6601

网站建设知识

十年网站开发经验 + 多家企业客户 + 靠谱的建站团队

量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决

vb.net做数据库软件 vb数据库控件

怎么通过VB设计一款数据库软件

数据库用VB6编程语言,对新手而言,如何用好ADODC控件和DATAGRID控件相当重要。

创新互联坚持“要么做到,要么别承诺”的工作理念,服务领域包括:成都网站设计、网站建设、外贸网站建设、企业官网、英文网站、手机端网站、网站推广等服务,满足客户于互联网时代的平泉网站设计、移动媒体设计的需求,帮助企业找到有效的互联网解决方案。努力成为您成熟可靠的网络建设合作伙伴!

具体做法:

新建数据工程,此时VB6集成调试环境左边工具箱内已加载了有关数据库编程必须的控件和引用。

然后在FORM1窗体中添加ADODC控件和DATAGRID控件,将DATAGRID1的属性DATASOURCE选ADODC1,打开ADODC1控件属性页使用连接字符串,选生成,在提供者选项中选MICROSOFT jet 4.0 OLE DB Provider,然后按要求连接数据库等。在ADODC1控件属性页使用连接字符串空白文本窗口中就有一长串字符串,注意该字符串可复制到程序代码用于编程。ADODC1控件属性页的数据源内有命令文本(SQL)编写窗口可编写SQL查询语言。该窗口的SQL语句可复制到程序代码用于编程。

SQL查询语言主要结构为:

Select 查询字段 from 表名 Where 查询条件语句 [排序语句或分组语句]

查询字段必须分别用(西文)逗号分开或就用一个*号代替,上述查询中排序语句建议最好应用。

SQL查询语言如有错程序运行时告诉你出错,作相应改动即可。

一般先按上述连接,SQL用"SELECT * FROM TabelName"作调试,无问题,用一个按钮控件将前述需复制的连接字符串和SQL查询语言先复制于按钮控件的CLICK事件中备着,以便放着以后使用。然后删去ADODC1控件,再添加ADODC1控件再添其他内容。

SQL查询语言多写多用就会熟练,以上供提问者参考。

开发绿色单机版VB.net 如何选用数据库?

MSDE是要安装的,所以不能算绿色版。VB.NET做的软件,要.net的支持。

在一定程度上,我是这么认为的:如果你的软件在单机使用,和其他电脑没关系,则用ACCESS。如果数据量很小,那,XML也可以够用。如果你的软件在网络上使用,比如企业的一个小型管理系统,则用SQLSERVER这类网络数据库来支持。

至于绿色:无非是不用安装。VB.net写的软件,把引用的DLL复制到程序所在的文件夹就可以运行。当然.net必须装。

用vb.net 怎样建立一个mdb数据库及一张表

首先在项目的VB.NET界面,使用菜单【项目】--【添加引用】--【COM】

选择  Microsoft ADO Ext. 2.x for DDL and Security

然后单击【确定】,完成引用。

完整代码如下:

Imports ADOX

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

'创建空的access数据库文件--数据库文件.mdb,密码为123

Dim Mycat As Catalog = New Catalog()

Mycat.Create("Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Engine Type=5;Data Source= 数据库文件.mdb;Jet OLEDB:Database Password=123")

'以下代码创建一个名为“实验数据表”

Dim MyTable As ADOX.Table = New ADOX.Table         '定义新表

MyTable.Name = "实验数据表"    '表命名

'给表“实验数据表” 创建一个字符串字段,字段名“姓名”

MyTable.Columns.Append("姓名", , ADOX.DataTypeEnum.adWChar)

'给表“实验数据表” 创建一个整数字段,字段名“学号”

MyTable.Columns.Append("学号", ADOX.DataTypeEnum.adInteger)    '追加一个数字型字段

'给字段“学号”创建一个主键“PimaryKey_Field”        

MyTable.Keys.Append("学号", ADOX.KeyTypeEnum.adKeyPrimary, "学号")

Mycat.Tables.Append(MyTable) '把所有的新字段追加到表

MyTable = Nothing

Mycat = Nothing

End Sub

End Class


文章名称:vb.net做数据库软件 vb数据库控件
文章起源:http://mswzjz.cn/article/hischh.html

其他资讯