vb学生信息管理体系，ACCESS数据库，做一个信息添加到数据库中，在TEXT中输入信息，单击肯定按钮

Private Sub Command1_Click()Dim con As Connectioncon.ConnectionString = Provider=Microsoft.Jet.OLEDB.4.0;Data Source=[这里填写你的数据库路径];Persist Security Info=Falsecon.opencon.execute(insert into tablename(属性[,属性2,属性3。。。]) values(' + text1.text + '[,value2,value3...]))'里面是sql语句，问题没解释清晰，自己依据须要修改End Sub