ลบข้อมูลออกจากฟิลเมื่อกดปุ่ม ขณะเดียวกันก็เอาข้อมูลนั้นเพิ่มไปอีกฟิล



0 สมาชิก และ 1 บุคคลทั่วไป กำลังดูหัวข้อนี้

18 ส.ค. 64 , 14:26:20
อ่าน 495 ครั้ง

001Jetnipit



ประมาณนี้ครับ เลือกติ๊กคนมาแล้วใส่วันที่ให้เขา ในForm พอกดปุ่ม ก็ให้ลบข้อมูลในฟิลด์ DateTemp(ข้อมูลที่เราเพิ่งกรอกไป) แล้วก็เอาข้อมูลที่กรอกนี้ไปเพิ่มในอีกตาราง
ไม่ทราบว่าต้องเขียน VBA อย่างไรครับ

 

20 ส.ค. 64 , 10:50:56
ตอบกลับ #1

apirak

Private Sub Command4_Click()
Dim db As Database
Dim DBrs As DAO.Recordset
Set db = CurrentDb
Set DBrs = db.OpenRecordset("tbl_test") 'ชื่อตารางที่ต้องการเก็บข้อมูล

DBrs.AddNew
DBrs![DateTime] = txtDateTime.Value   'ชื่อฟิวส์ที่ตาราง และชื่อtext box ที่ฟอร์ม
DBrs![Status] = Check5.Value   'ชื่อฟิวส์ที่ตาราง และชื่อtext box ที่ฟอร์ม

DBrs.Update

'เคลียร์ข้อมูล

Me.txtDateTime = ""
Me.Check5 = ""
End Sub


น่าจะประมาณนี้ครับ ไม่แน่ใจตรงความต้องการหรือเปล่าครับ

 


บอร์ดเรียนรู้ Access สำหรับคนไทย