Sorry but something is not clear... I put a command button on a form and I wrote this: Source code 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 Private Sub Form_load On Error Resume Next Dim driver As Class driver = Class.forName("com.mysql.jdbc.Driver") If driver = Nothing Then MsgBox "Not found!" On Error Goto 0 Call Database1.Connect("jdbc:mysql://localhost/database", "username", "password") End Sub Public Sub Command1_Click() Dim myRes As ResultSet myRes = Database1.ExecuteStatement("S...