VB写入SQL

VB写入SQL

结构化查询语言(Structured Query Language)简称SQL(发音：/ˈes kjuː ˈel/ "S-Q-L")，是一种特殊目的的编程语言，是一种数据库查询和程序设计语言，用于存取数据以及查询、更新和管理关系数据库系统。
VB可将Sql查询语句赋值给Adodc数据控件的属性或提供给Ado数据对象，完成存取数据以及查询、更新和管理关系数据库系统。

建立一个ADO数据库连接，然后用SQL语句插入数据...
如：

Private Sub Commmand1_Click()
Dim adoConn As New ADODB.Connection
Dim adoConStr AS String
Dim mySQL AS String
adoConStr="Provider=SQLOLEDB.1;Persist Security Info=True;User ID=sa; Password=123;
Data Source =服务器名;Initial Catalog=xsda;"
mySQL="INSERT INTO cj(yw,sx,wl,ID) Values ('"+Text1+"','"+Text2+"','"+text3+"',005)"
adoConn.Open adoConStr
adoConn.Execute mySQL
...

据我观察你录入是成绩数据，如果数据字段是“数值”型的话，那SQL语句就要变一下了...
一是数值转换，二是保留了2位小数
mySQL="INSERT INTO cj(yw,xs,wl,ID) Values ("
mySQL=mySQL + Format(text1,"#0.00")+","
mySQL=mySQL + Format(text2,"#0.00")+","
mySQL=mySQL + Format(text3,"#0.00")+",005)"
在执行插入的SQL 语句

adoConn.Execute mySQL

End Sub