Private Sub btnADD_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnADD.Click ds = New DataSet da = New SqlDataAdapter("insert into Customers(ID_Customers, Name_Customers,LastName_Customers, Phone_Customers) values ('" & TxtID.Text.Trim() & "','" & TxtName.Text.Trim() & "','" & TxtLname.Text.Trim() & "','" & txtPhone.Text.Trim() & "')", sqlcon) 'ให้ da เชื่อมต่อการเพิ่มข้อมูลที่ตาราง TableMember ทุกฟิวด์ และให้รับค่าจาก txt ที่กำหนดไว้ใน textBox' da.Fill(ds, "Customers") MsgBox("::เพิ่มข้อมูลสำเร็จ กำลังบันทึกข้อมูล::") Call ShowData() Call ClearData() End Sub
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง