If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed.
Private Sub Command6_Click()
Dim ssql As String
ssql = "insert into table1(name,rollno,reason) values('" & Text0.Value & "'," & Text2.Value & ",'" & Text4.Value & "')"
DoCmd.RunSQL ssql
End Sub