กระทู้เก่าบอร์ด อ.Yeadram
2,062 8
URL.หัวข้อ /
URL
เราสามารถล็อค เคอร์เซอร์ ได้ไหมคะ
แบบว่า textbox ไหนยังไม่ได้กรอกข้อมูล ก็ให้เคอร์เซอร์มันค้างอยู่ที่ textbox นั้นๆจะย้าย เคอร์เซอร์ ไปไหนไม่ได้ จนกว่าจะกรอกข้อมูลเสียก่อน
เป็นการบังคับว่า "คุณต้องกรอกข้อมูลก่อน" จึงจะย้ายเคอร์เซอร์ไปตำแหน่งอื่นได้
ขอคำแนะนำจากอาจารย์ด้วยค่ะ ว่าสามารถทำได้ไหม
ขอบคุณค่ะ
เป็นการบังคับว่า "คุณต้องกรอกข้อมูลก่อน" จึงจะย้ายเคอร์เซอร์ไปตำแหน่งอื่นได้
ขอคำแนะนำจากอาจารย์ด้วยค่ะ ว่าสามารถทำได้ไหม
ขอบคุณค่ะ
8 Reply in this Topic. Dispaly 1 pages and you are on page number 1
2 @R07389
ผมใช้วิธี เมือ LostFocus แล้ว textbox = Null ให้ Me.textbox .Setfocus
ไม่รู้จะตรงใจรึปล่าว
ไม่รู้จะตรงใจรึปล่าว
3 @R07390
สมมุติชื่อว่า Text0 โค้ดก็จะเป็น
Private Sub Text0_Exit(Cancel As Integer)
Cancel = (Nz(Me.Text0, "") = "")
End Sub
Private Sub Text0_Exit(Cancel As Integer)
Cancel = (Nz(Me.Text0, "") = "")
End Sub
4 @R07391
ตั้งแต่เช้า หนูเปิดเข้าบอร์ดนี้ไม่ได้เลย พึ่งจะเปิดได้ตอนนี้เอง
ขอรายงานผลค่ะ
โค้คของอาจารย์ weezaa สามารถล็อคเคอร์เซอร์ได้ตามที่ต้องการค่ะ แต่...เกิดผลข้างเคียงเล็กน้อยคือ หากต้องการปิดฟอร์มโดยยังไม่ได้คีย์ข้อมูลที่ Text0 เราจะปิดฟอร์มไม่ได้ จนกว่าจะคีย์ข้อมูล Text0 ก่อนค่ะ
โค้ดของอาจารย์ สันติสุข Cancel = (Nz(Me.Text0, "") = "") สั้นๆ แต่ใช้ได้ดีตามต้องการเลยค่ะ ไม่เกิดผลข้างเคียงใดๆ
งั้น หนูขอใช้โค้ดของอาจารย์สันติสุขนะคะ
ขอขอบคุณทุกท่านที่กรุณาช่วยแนะนำค่ะ
ตั้งแต่เช้า หนูเปิดเข้าบอร์ดนี้ไม่ได้เลย พึ่งจะเปิดได้ตอนนี้เอง
ขอรายงานผลค่ะ
โค้คของอาจารย์ weezaa สามารถล็อคเคอร์เซอร์ได้ตามที่ต้องการค่ะ แต่...เกิดผลข้างเคียงเล็กน้อยคือ หากต้องการปิดฟอร์มโดยยังไม่ได้คีย์ข้อมูลที่ Text0 เราจะปิดฟอร์มไม่ได้ จนกว่าจะคีย์ข้อมูล Text0 ก่อนค่ะ
โค้ดของอาจารย์ สันติสุข Cancel = (Nz(Me.Text0, "") = "") สั้นๆ แต่ใช้ได้ดีตามต้องการเลยค่ะ ไม่เกิดผลข้างเคียงใดๆ
งั้น หนูขอใช้โค้ดของอาจารย์สันติสุขนะคะ
ขอขอบคุณทุกท่านที่กรุณาช่วยแนะนำค่ะ
5 @R07392
อยากชี้แจงปัญหาให้รับทราบทั่วกันครับ
(ให้เหมือนกับว่าทุกคนเป็นเจ้าของเว็บเหมือนๆ กัน)
วันนี้ได้รับข้อความทาง MSN จากคุณ Un ว่าเว็บบอร์ดมีปัญหา ก็เข้ามาดู เห็นปัญหาตามที่แจ้ง (เข้าเว็บดูสารบัญกระทู้ได้ แต่ลิงค์เข้าดูแต่ละกระทู้ไม่ได้) จากที่ดู error ก็ดูไม่ได้ความอะไร ทำให้ไม่รู้จะแก้ไขตรงไหน
จึงแจ้งต่อไปยังเจ้าของผู้ให้บริการเช่าโฮสต์ ได้ความว่า ..
.. ดาต้าเบส เต็มโควต้า! ..
คือปกติเขาจะตั้งโควต้าให้ดาต้าเบสว่าแต่ละเว็บจะใช้ได้กี่เมกกะไบท์ (กรณีเว็บใดๆ จำเป็นต้องใช้ดาต้าเบส) และตอนนี้เว็บบอร์ดของเรา ซึ่งมีเรคคอร์ดใหม่ๆ เพิ่มขึ้นแทบทุกวัน (มีกระทู้ถามตอบแทบทุกวัน) ทำให้ปริมาณข้อมูลในดาต้าเบสมีเยอะจนเกินโควต้า มีผลทำให้เว็บบอร์ดในวันนี้ช่วงเช้าจึงทำงานผิดพลาด
ปัจจุบันนี้ ปัญหาดังกล่าวได้รับการแก้ไขแล้วครับ (ปัญหาโควต้าของดาต้าเบส)
ขอบคุณ คุณ Un ที่แจ้งปัญหาครับ
(ให้เหมือนกับว่าทุกคนเป็นเจ้าของเว็บเหมือนๆ กัน)
วันนี้ได้รับข้อความทาง MSN จากคุณ Un ว่าเว็บบอร์ดมีปัญหา ก็เข้ามาดู เห็นปัญหาตามที่แจ้ง (เข้าเว็บดูสารบัญกระทู้ได้ แต่ลิงค์เข้าดูแต่ละกระทู้ไม่ได้) จากที่ดู error ก็ดูไม่ได้ความอะไร ทำให้ไม่รู้จะแก้ไขตรงไหน
จึงแจ้งต่อไปยังเจ้าของผู้ให้บริการเช่าโฮสต์ ได้ความว่า ..
.. ดาต้าเบส เต็มโควต้า! ..
คือปกติเขาจะตั้งโควต้าให้ดาต้าเบสว่าแต่ละเว็บจะใช้ได้กี่เมกกะไบท์ (กรณีเว็บใดๆ จำเป็นต้องใช้ดาต้าเบส) และตอนนี้เว็บบอร์ดของเรา ซึ่งมีเรคคอร์ดใหม่ๆ เพิ่มขึ้นแทบทุกวัน (มีกระทู้ถามตอบแทบทุกวัน) ทำให้ปริมาณข้อมูลในดาต้าเบสมีเยอะจนเกินโควต้า มีผลทำให้เว็บบอร์ดในวันนี้ช่วงเช้าจึงทำงานผิดพลาด
ปัจจุบันนี้ ปัญหาดังกล่าวได้รับการแก้ไขแล้วครับ (ปัญหาโควต้าของดาต้าเบส)
ขอบคุณ คุณ Un ที่แจ้งปัญหาครับ
6 @R07393
อย่าเรียกผมว่า อาจารย์เลยครับ ผมก็แค่เป็นคนหนึ่งที่เข้ามาศึกษา หาความรู้เพิ่มเติมในบอร์ดแห่งนี้เท่านั้นเอง ไม่ได้เก่งอะไรเลย และบางอย่างผมอาจจะเคยเห็นในบอร์ดนี้มาก่อนเท่านั้น แล้วก็ตอบไปตามความสามารถ อาจรั่วบ้าง ยังไงก็ต้องขออภัยด้วยครับ คนที่สมควรถูกเรียกเป็นอาจารย์ได้ ก็น่าจะเป็น อ.yeadram และ อ.สันติสุขครับ ซึ่งผมก็เรียกอยู่
7 @R07397
ผมก็ไม่ใช่ อ. ครับ ผมเป็นแค่โปรแกรมเมอร์อิสระ ทำตั้งแต่กวาดบ้าน คุยลูกค้า เขียนสเปคงานงาน ทำเอกสาร เขียนโปรแกรม แก้บัก ติดตั้ง เก็บเงิน call center ฯลฯ เท่านั้นเอง
8 @R07401
แหม... สำหรับความรู้สึกของหนูแล้ว ผู้ที่ให้ความรู้ ชี้แนะแนวทางที่ถูกต้องแก่หนู แม้อาจจะเพียงนิดเดียว หนูก็เคารพและยกย่องเป็นอาจารย์ได้ทุกท่านค่ะ ด้วยความจริงใจนะคะ
หากไม่มีบอร์ดนี้ ไม่มีท่านทั้งหลาย หนูก็ไม่อาจสร้างโปรเจ็คดีๆได้ด้วย Access อย่างแน่นอน ทุกวันนี้หนูสามารถพูดคุยกับใครๆ เรื่อง Access ได้ด้วยความมั่นใจค่ะ
ทุกครั้งที่ถึงทางตัน หนูจะเข้ามาที่นี่ แล้วก็จะพบทางออกเสมอ มีท่านทั้งหลายนี่แหละ ที่ช่วยชี้นำแนวทางให้ แม้ไม่เคยเห็นหน้ากันเลย ทุกท่านทำด้วยใจจริงๆ
หนูซาบซึ้งใจเป็นที่สุดค่ะ
หากไม่มีบอร์ดนี้ ไม่มีท่านทั้งหลาย หนูก็ไม่อาจสร้างโปรเจ็คดีๆได้ด้วย Access อย่างแน่นอน ทุกวันนี้หนูสามารถพูดคุยกับใครๆ เรื่อง Access ได้ด้วยความมั่นใจค่ะ
ทุกครั้งที่ถึงทางตัน หนูจะเข้ามาที่นี่ แล้วก็จะพบทางออกเสมอ มีท่านทั้งหลายนี่แหละ ที่ช่วยชี้นำแนวทางให้ แม้ไม่เคยเห็นหน้ากันเลย ทุกท่านทำด้วยใจจริงๆ
หนูซาบซึ้งใจเป็นที่สุดค่ะ
Time: 0.3460s
If Me.Text0 = "" Or IsNull(Me.Text0) Then
MsgBox "คุณต้องกรอกข้อมูลก่อน", vbOKOnly
Me.Text2.SetFocus
Me.Text0.SetFocus
End If
End Sub
สมมุติ textbox ชื่อ Text0
ส่วน Text2 คือ textbox อื่นๆ
ขอบคุณมากครับ