กระทู้เก่าบอร์ด อ.สุภาพ ไชยา
310 1
URL.หัวข้อ /
URL
Access97
วันนี้ผมได้ไปดูที่เว็บบอร์ดเก่า พบว่ามีคำถามทิ้งไว้ตั้งแต่หลายเดือนมาแล้ว คำถามมีดังนี้ครับ
เรียนคุณสุภาพ
ก่อนอื่นต้องบอกว่า เวบนี้มีประโยชน์มากครับ สำหรับคนที่เริ่มต้นอย่างผม
ตอนนี้ผมอยากได้โค้ดปุ่มที่ใช้ในการ "บันทึก" ข้อมูลครับ ซึ่งปกติผมใช้ของ form ในaccessของตัวโปรแกรมเอง ซึ่งมันยังไม่ค่อยครอบคลุมเท่าไหร่ เช่น ถ้าเราคลิ๊กหรือกดปุ่ม บันทึก ก็ให้มีกรอบข้อความขึ้นมาถามก่อนบันทีก อย่างนี้เป็นต้นครับ
ลองใช้โค้ดนี้ครับ
Private Sub cmdSave_Click()
If MsgBox("Save this record?", vbOKCancel, "Saving record") = vbOK Then
DoCmd.RunCommand acCmdSaveRecord
Else
Me.Undo
End If
End Sub
อีกข้อหนึ่ง ในฟอร์มรับข้อมูลของผม ซึ่งเป็นเรื่องของ Hardware หลังจากป้อนรหัสแล้ว ในฟิวที่สอง จะรับว่าเป็น "คอมพิวเตอร์" หรือ "อุปกรณ์ต่อพ่วง" ซึ่งเป็น combo box ให้เลือก ความต้องการของผม ถ้าผมเลือก "คอมพิวเตอร์" ก็ให้มันวิ่งไปที่ฟิว "รุ่น" เลยไม่ต้องมาที่ฟิว "ชื่ออุปกรณ์ต่อพ่วง" เพราะมันเป็นคอมพิวเตอร์ ซึ่งตอนนี้ที่ผมทำมันจะต้องวิ่งมาที่ฟิว "ชื่ออุปกรณ์ต่อพ่วง" ก่อน และ้จึงมา "รุ่น" ถ้าให้มันดี ก็อยากให้มันจางไปเลยในช่วงรับฟิว "ชื่ออุปกรณ์ต่อพ่วง" ครับ
ยังงััยรบกวนหน่อยนะครับ ขอบคุณมากครับ......
ใช้โค้ดนี้ดูครับ
Private Sub mytype_AfterUpdate()
If Me.mytype = "คอมพิวเตอร์" Then
Me.myname.Enabled = False
Else
Me.myname.Enabled = True
End If
End Sub
จากคุณ p_vichan@hotmail.com เมื่อวันที่ 8 มีนาคม 45 เวลา 11:14 น.
ตัวอย่างจริงอยู่ที่ http://agserver.kku.ac.th/basiceng/saverecord.zip ครับ
เรียนคุณสุภาพ
ก่อนอื่นต้องบอกว่า เวบนี้มีประโยชน์มากครับ สำหรับคนที่เริ่มต้นอย่างผม
ตอนนี้ผมอยากได้โค้ดปุ่มที่ใช้ในการ "บันทึก" ข้อมูลครับ ซึ่งปกติผมใช้ของ form ในaccessของตัวโปรแกรมเอง ซึ่งมันยังไม่ค่อยครอบคลุมเท่าไหร่ เช่น ถ้าเราคลิ๊กหรือกดปุ่ม บันทึก ก็ให้มีกรอบข้อความขึ้นมาถามก่อนบันทีก อย่างนี้เป็นต้นครับ
ลองใช้โค้ดนี้ครับ
Private Sub cmdSave_Click()
If MsgBox("Save this record?", vbOKCancel, "Saving record") = vbOK Then
DoCmd.RunCommand acCmdSaveRecord
Else
Me.Undo
End If
End Sub
อีกข้อหนึ่ง ในฟอร์มรับข้อมูลของผม ซึ่งเป็นเรื่องของ Hardware หลังจากป้อนรหัสแล้ว ในฟิวที่สอง จะรับว่าเป็น "คอมพิวเตอร์" หรือ "อุปกรณ์ต่อพ่วง" ซึ่งเป็น combo box ให้เลือก ความต้องการของผม ถ้าผมเลือก "คอมพิวเตอร์" ก็ให้มันวิ่งไปที่ฟิว "รุ่น" เลยไม่ต้องมาที่ฟิว "ชื่ออุปกรณ์ต่อพ่วง" เพราะมันเป็นคอมพิวเตอร์ ซึ่งตอนนี้ที่ผมทำมันจะต้องวิ่งมาที่ฟิว "ชื่ออุปกรณ์ต่อพ่วง" ก่อน และ้จึงมา "รุ่น" ถ้าให้มันดี ก็อยากให้มันจางไปเลยในช่วงรับฟิว "ชื่ออุปกรณ์ต่อพ่วง" ครับ
ยังงััยรบกวนหน่อยนะครับ ขอบคุณมากครับ......
ใช้โค้ดนี้ดูครับ
Private Sub mytype_AfterUpdate()
If Me.mytype = "คอมพิวเตอร์" Then
Me.myname.Enabled = False
Else
Me.myname.Enabled = True
End If
End Sub
จากคุณ p_vichan@hotmail.com เมื่อวันที่ 8 มีนาคม 45 เวลา 11:14 น.
ตัวอย่างจริงอยู่ที่ http://agserver.kku.ac.th/basiceng/saverecord.zip ครับ
1 Reply in this Topic. Dispaly 1 pages and you are on page number 1
1 @R06530
Time: 0.1148s