vb.net数据字典,vbnet 字典

vb.net 读取sql数据库字段

我是用C#.net写出来的

创新互联公司于2013年开始，是专业互联网技术服务公司，拥有项目成都网站设计、网站建设网站策划，项目实施与项目整合能力。我们以让每一个梦想脱颖而出为使命，1280元南京做网站,已为上家服务,为南京各地企业和个人服务,联系电话:13518219792

SqlConnection myConn = new SqlConnection(sqlconnstring);

myConn.Open();

SqlDataAdapter thisAdapter = new SqlDataAdapter("SELECT * from 表名", myConn);

thisAdapter.MissingSchemaAction = MissingSchemaAction.AddWithKey;

DataTable thisDataTable = new DataTable();

thisAdapter.Fill(thisDataTable);

DataTableReader thisReader = new DataTableReader(thisDataTable);

DataTable schemaTable = thisReader.GetSchemaTable();

foreach (DataRow dr in schemaTable.Rows)

{

MessageBox.Show(dr["ColumnName"].ToString());获取字段名称(f1 f2 f3)

MessageBox.Show(dr["ColumnSize"].ToString());获取字段长度(2 2 2)

MessageBox.Show(dr["DataType"].ToString());获取字段类(str str int)

}

数据库中创建一个学生表

SQL语言创建数据库和学生表

建立：

[sql]

create database zxl  

create table 学生表

(

学号 char(12) primary key,

姓名 char(6) not null,

性别 char(2) check(性别 IN ('男','女')),

班级 char(15)

)  

create table 成绩表

(

学号 char(12)references 学生表(学号),

课程号 char(2)references 课程表(课程号) ,

成绩 int default(30),

primary key (学号,课程号)

)

create table 课程表

(

课程号 char(2) primary key,

课程名 char(20),

学分 int check(学分=1 and 学分=5 )

)

操作：

[sql]

insert into 学生表 values('201190609112','张xl','男','文专计1111')

insert into 学生表 values('201190609113','张**','女','文专计1111')

insert into 成绩表 values('201190609112','01',100)

insert into 成绩表 values('201190609112','02',99)

insert into 成绩表 values('201190609112','03',88)

insert into 课程表 values('01','数据库系统',3)

insert into 课程表 values('02','vb.net',4)

insert into 课程表 values('03','java',4)

select *from 成绩表

select 姓名,课程名,成绩

from 学生表,课程表,成绩表

where (学生表.学号=成绩表.学号 and 课程表.课程号=成绩表.课程号)

order by 成绩 desc

select avg(成绩) 平均分,max(成绩) 最高分,min(成绩) 最低分

from 成绩表

where 学号='201190609112

创建一个名为教学管理的数据库创建学生表要求定义主码 

一、简答

1、DBA的职责是什么？

2、视图的作用有哪些？

3、数据库的完整性和安全性有什么区别？

4、SQL语言的特点是什么？

5、数据字典通常包括哪几部分？

6、什么是基本表，什么是视图，二者的区别和联系是什么？

7、DBMS的主要功能是什么？

8、什么是数据库备份和恢复？为什么要备份和恢复数据库？

9. 什么是事务？事务的作用？SQL中事务的语法结构是怎样的？

10、举出实体之间具有一对一、一对多、多对多的联系的例子。

11、 数据库的并发操作会带来哪些问题？如何解决？

12、什么是日志文件？简述日志文件恢复事务的过程（即：事务故障的恢复的过程）。

13、关系完整性约束规则有哪三类？

14、 数据库管理技术发展的三个阶段？

15、写出数据库的设计的五个阶段。

16、根据3NF的定义及规范化方法，对关系模式R（U，F） U={学号，姓名，所在系，系主              任，课程号，成绩} F= { 学号 → 姓名 ， 学号 → 所在系，所在系 → 系主任（学号，课程        号） → 成绩} 进行分解，使其满足3NF。

17、 什么是事务？事务有哪些特征？

18、写出关系型数据库的第一、第二、第三范式的各自要求。

19、举三个例子分别说明二元联系的三种情况( 1:1、1:M、M:N ) 。

运行sql文件出错

解决办法：使用Notepad++打开文件，选择 格式-无BOM的UTF8格式编码

vb.net 中如何使用SQL语句查询数据库中的数据

1、首先打开Visual Studio 2008代码窗口，添加引用。

2、输入以下代码：Public conn1  As SqlConnection = New SqlConnection 。

3、声明关键字 Public；（因为是全局变量，所以用Public 来声明）。

4、如果SQL 数据库就在本机，则用以下代码连接。

5、如果代码太长，影响可读性，可以用空格加"_"后，回车换行即可。

VB.NET数据库删除数据和修改数据

Dim myconn As New OleDb.OleDbConnection

Dim mycommand As New OleDb.OleDbCommand

myconn.ConnectionString = "Provider=Microsoft.ace.OLEDB.12.0;Data Source=C:\Users\Administrator\Documents\账号密码.accdb "

myconn.Open()

mycommand.Connection = myconn

Dim sql5 As String = "delete from 表3 where userid='"  (TextBox1.Text)  "'"

mycommand.CommandText = sql5

mycommand.CommandType = CommandType.Text

mycommand.ExecuteNonQuery()

Dim sql3 As String = "update 表2 set Balance=Balance-2 where UserID='"  (TextBox1.Text)  "'"

mycommand.CommandText = sql3

mycommand.CommandType = CommandType.Text

mycommand.ExecuteNonQuery()

myconn.Close()

VB.net连接数据库创建新字段并对其进行赋值

首先打开数据源，然后使用alter table语句即可，具体范例如下：

Set cn = New ADODB.ConnectionSet rs = New ADODB.Recordsetconstr = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" 数据库路径及文件名 ""cn.Open constrDim str As Stringstr = "alter table 表名 add 字段 类型"rs.Open str, cn, adOpenStaticmsgbox"添加字段成功",vbokonly

vb.net 怎么操作数据库

如果楼主熟悉VB6，可以直接在项目中添加ADODB的Com引用，这样你就可以像VB6那样操作数据库了！

另外

.NET Framework中连接数据库要用到ADO.NET。如果要操作Access数据库，要用到System.Data.OleDb命名空间下的许多类。

比如按楼主所说，“我想在textbox1中显示表一中【一些数据】字段下的第一个内容”：

'首先导入命名空间

Imports System.Data

Imports System.Data.OleDb

'然后在某一个事件处理程序中写：

Dim conn As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=数据库.accdb;Jet OLEDB:Database Password=MyDbPassword")

Dim command As New OleDbCommand("Select * From 数据表", conn)

conn.Open() '打开数据库连接

Dim reader As OleDbDataReader = command.ExecuteReader() '执行SQL语句，返回OleDbDataReader 对象

Do While reader.Read() '读取一条数据

textbox1.Text += reader("一些数据") VbCrLf

Loop

reader.Close() '关闭OleDbDataReader

conn.Close() '关闭连接