Question

怎么用VB.net修改access数据库？？

If TextBox2.Text = Nothing Or TextBox3.Text = Nothing Or TextBox4.Text = Nothing Or TextBox5.Text = Nothing Then
MsgBox("请选择学生学号和其它成绩", 48, "提示")
Exit Sub
End If
Dim da As DataSet
Try
da = Query("select * from 成绩信息 where 学号='" & ComboBox1.Text & "' ")
If da.Tables(0).Rows.Count > 0 Then
MsgBox("此学号已经录入好成绩!", MsgBoxStyle.Exclamation, "提示")
Exit Sub
End If
sqlstring = String.Format("insert into 成绩信息(学号,姓名,高等数学,英语,体育,必修课) values('{0}','{1}','{2}','{3}','{4}','{5}')", _
ComboBox1.Text.Trim(), TextBox1.Text.Trim(), TextBox2.Text.Trim, _
TextBox3.Text.Trim, TextBox4.Text.Trim, TextBox5.Text)
da = Query(sqlstring)
Call Data_显示()
Call C_Clear()
MsgBox("资料保存完成！", MsgBoxStyle.Information, "提示")
Catch ex As Exception
MsgBox(ex.Message)
End Try
运行的时候出现“标准表达式数据类型不匹配”

Answer 1

{2}','{3}','{4}','{5}'不要单引号