vb.net SQL数据库操作（读取、修改、删除）
Dim rs As ADODB.Recordset
Dim sqlstr As String
'查询
sqlstr = "select * from 表名 where 字段名 = '" & 查询的内容 & "'"
rs = VScn.Execute("" & SqlStr & "")
If Not rs.EOF Then
TextBox1.Text = rs("字段名").Value.ToString
End If
'修改
sqlstr = "update 表名 set 字段名= '" & 要修改的内容 & "' where 字段名= '" & 查询的内容 & "'"
VScn.Execute(sqlstr)
'删除
sqlstr = "delete from 表名 where 字段名= '" & 查询的内容 & "'"
VScn.Execute(sqlstr)
相关文档：
比较常用的SQL语句语法(Oracle)
一.数据控制语句 (DML) 部分
1.INSERT (往数据表里插入记录的语句)
INSERT INTO 表名(字段名1, 字段名2, ……) VALUES ( 值1, 值2, ……);
INSERT INTO 表名(字段名1, 字段名2, ……) SELECT 字段名1, 字段名2, …&he ......
Option Explicit
Private Const ERROR_CACHE_FIND_FAIL As Long = 0
Private Const ERROR_CACHE_FIND_SUCCESS As Long = 1
Private Const ERROR_FILE_NOT_FOUND As Long = 2
Private Const ERROR_ACCESS_DENIED As Long = 5
Private Const ERROR_INSUFFICIENT_BUFFER As Long = 122
Private Const MAX_PATH As Long ......
RGB函数：RGB是通过指定红绿蓝不同的分量值得到不同的颜色。
·格式：RGB（红色值，绿色值，蓝色值）
·取值范围为0--255，分别代表所要颜色中的红、绿、蓝分量的大小。
QBColor函数：用一个整数值对应RGB的常用颜色值
·格式QBColor（颜色值）
·颜色值是一个整数，取值范围0--15代表16种� ......
'在引用里添加ADODB
Public vscn As ADODB.Connection
Public SQLString As String
SQLString = "Provider=SQLOLEDB.1;Password=密码;Persist Security Info=True;User ID=用" & _
"户;Initial Catalog=数据库名;Data Source=服务器名"
......
