กำหนดให้ button ในฟอร์ม 1 ชื่อ cmdOpenForm2
และ textbox ชื่อ text1

Private Sub cmdOpenForm2_Click()
On Error GoTo Err_cmdOpenForm2_Click

    Dim stDocName As String
    Dim stLinkCriteria As String

    stDocName = "Form2"
    DoCmd.OpenForm stDocName, , , stLinkCriteria, , , Text1

Exit_cmdOpenForm2_Click:
    Exit Sub

Err_cmdOpenForm2_Click:
    MsgBox Err.Description
    Resume Exit_cmdOpenForm2_Click

End Sub

เวลาเปิด ฟอร์ม2 ขึ้นมา เขียน vba ตอนเปิดฟอร์ม
Private Sub Form2_load
      dim statement as string
     statement=openargs
   ....
     แล้วก็นำค่า statement ไปใช้งาน ต่อไป
   ....
end sub

statement ไม่เข้าใจว่าเอามาใช้ยังไงครับช่วยอธิบายให้ละเอียดหน่อยครับ

จากคำถาม ต้องการส่งค่าจาก ฟอร์ม1 มาฟอร์ม 2
statement ก็คือค่าที่ส่งมายังฟอร์ม2 แล้วทางคุณ gonsaamon ต้องการ
ส่งค่ามาฟอร์ม 2 เพื่ออะไร ก็นำค่า statement ไปใช้

เช่น ใน ฟอร์ม 2 มี textbox ชื่อ text2

   ก็กำหนด    text2=statement
   text2 ก็แสดงค่าที่ส่งมา เมื่อฟอร์ม 2 เปิดขึ้นมา
ลองทำดูก่อนนะครับ
แล้วถามตัวเองว่าต้องการส่งค่ามาเพื่ออะไร
แล้วจึงนำค่า statement มาใช้