تطبيق امر ال Sql داخل كود Vba

السلام عليكم و رحمة الله و بركاته

اريد ان اطبق اوامر ال sql داخل كود ال vba

بعد بحثي في المنتدى حصلت هذا البرنامج

صراحة برنامج ممتاز

و هو تحويل كود sql الى كود vba

/index.php?showtopic=161793

بس مشكلتي كيف اخلي الكود يشتغل

Private Sub ÃãÑ0_Click()

  Dim strSQL As String
  strSQL = "select name " & vbCrLf
  strSQL = strSQL & "        FROM [ table] " & vbCrLf
  strSQL = strSQL & "       WHERE age=18"


  text3 = strSQL

End Sub

في المثال انا سويت الاستعلام ، و ابغى النتيجة تطلع في مربع النص الي اسمه "text3"

و عند الضغط على زر الامر ، راح كتب لي كود ال sql في مربع النص

ارجو الافادة