กระทู้เก่าบอร์ด อ.Yeadram
1,199 4
URL.หัวข้อ /
URL
สอบถามเรื่องคำนวนเวลาค่ะ
เรียนอาจารย์ค่ะ
หนูจะทำการคำนวนเวลา โดยศึกษาจากกระทู้เก่า แต่ทำไมมันไม่ค่ะไม่มีอะไรเกิดขึนค่ะ
มีรายละเอียดการทำดังนีคjะ
T1=เลือกค่าเวลา
W1=เก็บวันที่T1อัตโนมัติคือ=Date()
CB=ตัวแอคชั่นให้การคำนวนค่ะ
T2=คือเก็บเวลาCBอัตโนมัติ=Time()
W2=เก็บวันที&CBอัตโนมัติคือ=Date()
ANS=คำตอบที&คำนวนได้เป็นนาทีค่ะ
ANS.Value = Datediff("m",(W1 + T1), (W2 + T2)) / 60 มันไม่มีError หรืออะไรเกิดขึน* ค่ะ
ANS.Value = ((([W1] + [T1]) - ([W2] + [T2])) * 24) * 60 มันไม่มีError หรืออะไรเกิดขึน* เหมือนกันค่ะค่ะ
หรือหนูจะต้องเขียนอย่างไรค่ะ เห็นอาจารย์ yeadram,กับ TTT แนะนำที่่
http://www.thai-access.com/yeadram_view.php?topic_id=3057&PagePosition=2
ว่าให้รวมวันทีและเวลาเป็นฟิวส์เดียวกันจะดีกว่า แต่ของหนูติดทีT1 ต้องเลือกเองโดย W1เก็บเวลาวันทีทำ หากจะ
เอามารวมกันได้หรือไม่ค่ะประมาณว่าเลือกเวลา T1 แล้วได้ค่าวันที่ทำรวมกันเลยและจะเขียน Code เพือให้โปรแกรมทำงานหรือแก้ไขจากที่หนูทำยังไงค่ะยังไงค่ะ
มีรูปมาให้ดูด้วยค่ะ
ขอบคุณเจ้า
หนูจะทำการคำนวนเวลา โดยศึกษาจากกระทู้เก่า แต่ทำไมมันไม่ค่ะไม่มีอะไรเกิดขึนค่ะ
มีรายละเอียดการทำดังนีคjะ
T1=เลือกค่าเวลา
W1=เก็บวันที่T1อัตโนมัติคือ=Date()
CB=ตัวแอคชั่นให้การคำนวนค่ะ
T2=คือเก็บเวลาCBอัตโนมัติ=Time()
W2=เก็บวันที&CBอัตโนมัติคือ=Date()
ANS=คำตอบที&คำนวนได้เป็นนาทีค่ะ
ANS.Value = Datediff("m",(W1 + T1), (W2 + T2)) / 60 มันไม่มีError หรืออะไรเกิดขึน* ค่ะ
ANS.Value = ((([W1] + [T1]) - ([W2] + [T2])) * 24) * 60 มันไม่มีError หรืออะไรเกิดขึน* เหมือนกันค่ะค่ะ
หรือหนูจะต้องเขียนอย่างไรค่ะ เห็นอาจารย์ yeadram,กับ TTT แนะนำที่่
http://www.thai-access.com/yeadram_view.php?topic_id=3057&PagePosition=2
ว่าให้รวมวันทีและเวลาเป็นฟิวส์เดียวกันจะดีกว่า แต่ของหนูติดทีT1 ต้องเลือกเองโดย W1เก็บเวลาวันทีทำ หากจะ
เอามารวมกันได้หรือไม่ค่ะประมาณว่าเลือกเวลา T1 แล้วได้ค่าวันที่ทำรวมกันเลยและจะเขียน Code เพือให้โปรแกรมทำงานหรือแก้ไขจากที่หนูทำยังไงค่ะยังไงค่ะ
มีรูปมาให้ดูด้วยค่ะ
ขอบคุณเจ้า
4 Reply in this Topic. Dispaly 1 pages and you are on page number 1
2 @R20953
ดูจากรูปปัญหาน่าจะอยู่ที่ T1 มั้ง เพราะเห็นเป็นการเลือกแบบใช้ Combo Box ไม่รู้ว่าผูกข้อมูลมาจากอะไร และ Data Type เป็นอะไร ยังไงลองแบบนี้ดูก่อนครับ
บนฟอร์ม กำหนด Property ที่ Text Box ที่ชื่อ ANS
Data > Control Source: =DateDiff("n",[W1]+CDate([T1]),[W2]+[T2])
ส่วนช่อง Format ที่คุณกำหนดเป็น Shot time ให้ลบออกไม่ต้องกำหนด
บนฟอร์ม กำหนด Property ที่ Text Box ที่ชื่อ ANS
Data > Control Source: =DateDiff("n",[W1]+CDate([T1]),[W2]+[T2])
ส่วนช่อง Format ที่คุณกำหนดเป็น Shot time ให้ลบออกไม่ต้องกำหนด
3 @R20954
ขอบคุณอาจารญ์ TTT ค่ะ
ได้แล้วค่ะ
ตามที่อาจารย์แนะนำเลยค่ะ
ขอบคุณค่ะ
ได้แล้วค่ะ
ตามที่อาจารย์แนะนำเลยค่ะ
ขอบคุณค่ะ
4 @R20961
เรียนอาจารย์มีเงื่อนไขมาเพิ่่มค่ะ ช่วยหนูคิดอีกทีค่ะ
คือตัวเปลี่ยบเทียบมีแค่ช่องเดียวหนูจะทำยังไงค่ะ คือ
=DateDiff("n",[W1]+CDate([T1]),[W2]+[T2])
=DateDiff("n",[เลือกช่วงเวลา]+CDate([วันที่ปัจจุบัน]),[์Nowวันเวลาขณะทำ])
คือจะให้มันคำนวนอย่างไรค่ะ หนูทดลองให้เอา W1 & T1 ต่อกันแล้วคำนวณ
ด้วย =DateDiff("n",[W1]+CDate([T1]),[์N1]) ผลที่ได้ =0:00
=DateDiff("n",CDate[W1]+CDate([T1]),CDate[์N1]) ผลที่ได้ =0:00
จะต้องคิดยังไงค่ะ
ขอบคุณค่ะ
คือตัวเปลี่ยบเทียบมีแค่ช่องเดียวหนูจะทำยังไงค่ะ คือ
=DateDiff("n",[W1]+CDate([T1]),[W2]+[T2])
=DateDiff("n",[เลือกช่วงเวลา]+CDate([วันที่ปัจจุบัน]),[์Nowวันเวลาขณะทำ])
คือจะให้มันคำนวนอย่างไรค่ะ หนูทดลองให้เอา W1 & T1 ต่อกันแล้วคำนวณ
ด้วย =DateDiff("n",[W1]+CDate([T1]),[์N1]) ผลที่ได้ =0:00
=DateDiff("n",CDate[W1]+CDate([T1]),CDate[์N1]) ผลที่ได้ =0:00
จะต้องคิดยังไงค่ะ
ขอบคุณค่ะ
Time: 0.3406s
เหลือแค่ให้คำนวน2ฟิวส์
ANS.Value = DateDiff("N", CDate([EXT]), CDate([TCK]))
มันออกมาแบบนี้ค่ะ ANS = 05/12/1898 พอไปเปลี่ยนให้เป็น Format ShotTime
มันออกมาเป็น 0:00 หมดเลยคะ หนูต้องแก้ไขอย่างไรค่ะ
ขอบคุณค่ะ (อยากให้มันคำนวณออกมาเป็นนาทีค่ะ)
รบกวนช่วยดูหน่อยค่ะ
ขอบคุณค่ะ