เก็บตามหมวดหมู่ 'Uncategorized'
อาทิตย์ 4 มีนาคม, 2012 |
ในตัวอย่างนี้ผมจะแสดงวิธีการทำค้นหาคำหลายในเขตข้อมูลของฟอร์ม
รหัสที่ใช้ในตัวอย่างนี้จะเป็นประโยชน์ในการดำเนินการค้นหาที่สูงขึ้น
1 ต้องการสร้างตาราง
- การสร้าง "tbldados" ตารางที่มีฟิลด์ต่อไปนี้: id (AutoNumber) / ข้อมูล (text)
2 สร้างรูปแบบ "Form1"
- สร้างรูปแบบการใช้ตัวช่วยสร้างและเลือก tbldados เป็นแหล่งข้อมูลให้เลือก "ตารางที่" ถึงคีฟอร์ม
- จากนั้นไปที่การออกแบบรูปแบบและสร้างเขตข้อมูลข้อความที่เป็นอิสระในส่วนท้ายของแบบฟอร์มชื่อ txtpesquisa
- สร้างปุ่มที่อยู่บนสถานที่ให้บริการและใส่รหัสต่อไปนี้:
'************************************************* *************
'จัดทำโดยโฮเซมาร์ติน
เว็บไซต์ ': www.accessexemplos.com
วันที่: 2011/09/22
'หมายเหตุ: อย่าเอาส่วนหัวนี้ เคารพผู้เขียนของรหัส
'************************************************* **************
On Error GoTo Err_Comando8_Click
คำมซำ () As String
x มซำเป็นจำนวนเต็ม
strSQL มซำ As String
strWhere มซำ As String
คำสปลิต = (Me.txtpesquisa, "")
สำหรับ x = 0 ถึง UBound (คำ)
strWhere = strWhere & "Data ชอบ '*" คำ & (x) & "*" หรือ "
ถัดไป x
strWhere = $ ซ้าย (strWhere, Len (strWhere) - 3)
strSQL = "SELECT * FROM tbldados ที่" & strWhere & "ORDER BY [ข้อมูล]"
Me.RecordSource = strSQL
Exit_Comando8_Click:
Exit Sub
Err_Comando8_Click:
Err.Description MsgBox
Exit_Comando8_Click ประวัติส่วนตัว
สิ่งที่รหัสไม่โดยทั่วไปคือการสร้างอาร์เรย์ประกอบด้วยคำใน txtpesquisa ที่ตรวจพบผ่านช่องว่าง หลังจากที่วงจรถูกสร้างขึ้นเพื่อค้นหาทุกคำที่ป้อนใน txtpesquisa
ทดสอบ 3
- ป้อนข้อมูลแล้วเขียนคำหรือคำที่เราพบในกล่องข้อความ (txtpesquisa) คลิกปุ่มและตรวจสอบผลการ
ด้านล่างเชื่อมโยงกับตัวอย่าง dowenlod เป็น คำค้นหาต่างๆ
โพสต์ใน Uncategorized | No Comments »
เสาร์, สิงหาคม 6, 2011 |
วันนี้ฉันเพิ่มปุ่ม Google พลัส 1 นี้เป็นวิธีการที่จะโฆษณาข้อความอื่น ถ้าคุณยังไม่ได้รับเชิญไปยัง Google พลัสได้แสดงความคิดเห็นด้วยที่อยู่อีเมลของคุณเพื่อส่งคำเชิญ
โพสต์ใน Uncategorized | 13 Comments »
พุธ 13 กรกฎาคม, 2011 |
นี่คือฐานข้อมูลที่ง่ายมากที่ทำหน้าที่ในการควบคุมค่าใช้จ่ายในชีวิตประจำวัน
เมนูหลัก
ในภาพหนึ่งที่สามารถมองเห็นเมนูหลักที่ง่ายมากและการทำงาน ที่ด้านบนเราจะเห็นในปีที่เราทำงาน
ปีของการทำงาน
เมื่อต้องการเปลี่ยนการทำงานในปีคลิกที่ปุ่มเพื่อเลือกรูปแบบปีและเปิด (รูปที่ 2), พิมพ์ปีที่เราต้องการ
รายจ่าย
ค่าใช้จ่ายเกี่ยวกับรูปแบบเปิดปุ่ม (รูปที่ 3) สำหรับการป้อนข้อมูล ถัดไปที่ประเภทที่เรามี '+' ปุ่มเพื่อเพิ่มประเภทและประเภทย่อยที่มีด้านหนึ่งของ '+' เพื่อเพิ่มหมวดหมู่ย่อย (โดยการคลิกที่หมวดหมู่ย่อยถ้าคุณไม่ได้เลือก cetegoria ให้ข้อผิดพลาดและขอให้เลือกชนิดที่ต้องการ . หากคุณเลือกหมวดหมู่ประเภทจะเปิดฟอร์มในประเภทที่เลือก)
ในสาขาที่เราสามารถเลือกผู้ให้บริการจากรายการและถ้ามีเขาจะถามว่าคุณต้องการเพิ่ม
หมวดหมู่
รูปแบบตัวเลข (4) นี้จะใช้ในการจัดการ (แทรก / เปลี่ยน / ลบการค้นหา /) ประเภทและประเภทย่อยของพวกเขา
ซัพพลายเออร์
แบบฟอร์มนี้จะถูกใช้ในการจัดการ (แทรก / เปลี่ยน / ลบ / การค้นหา) ชื่อของซัพพลายเออร์
รายงาน
คลิกที่ปุ่มนี้จะเปิดเมนู (5 ภาพ) รายงานที่เราสามารถเลือกสี่ประเภทของรายงาน:
- ค่าใช้จ่ายของปีปัจจุบัน (รูปที่ 6) แสดงรายงานที่มีหมวดหมู่, ประเภทย่อยและมูลค่ารวมต่อเดือนของปีที่เราทำงาน นอกจากนี้ยังแสดงค่าใช้จ่ายรวมต่อเดือนและประเภทย่อยทั้งหมดด้วย
รายงานนี้รวมถึงกราฟสำหรับประเภทย่อยที่แสดงวิวัฒนาการรายเดือนของแต่ละประเภทย่อย กราฟนี้ไม่ได้เป็นของตัวเองในโมดูลที่เกี่ยวข้องมีข้อมูลของผู้เขียนซึ่ง ได้แก่ :
ผู้เขียน: ฟิลิป Bonnardel (ขึ้นอยู่กับความคิดของ Edward Tufte)
- ค่าใช้จ่ายต่อปี (7 รูป): แสดงแบบฟอร์มที่มีค่าใช้จ่ายตามหมวดหมู่ในปีที่ได้รับ เราสามารถเลือกปีของค่าใช้จ่ายให้ว่ามีค่าใช้จ่ายที่บันทึกไว้ในปีนั้นเพื่อดูกราฟ เมื่อคุณดับเบิลคลิกประเภทเปิดรายงานประจำปีของหมวดหมู่ย่อยที่มีรูปแบบเดียวกัน เมื่อคุณดับเบิลคลิกเปิดรายละเอียดในหมวดหมู่ย่อย (รูปที่ 8) ค่าใช้จ่ายที่เกิดขึ้นในประเภทย่อยนี้
รายละเอียด
ค่าใช้จ่ายต่อเดือน -: เท่ากับค่าใช้จ่ายต่อปี แต่ที่นี่เราสามารถเลือกปีและเดือนที่คุณปรารถนา
- รายจ่ายโดยซัพพลายเออร์แสดงให้เห็นถึงรูปแบบที่มีต้นทุนต่อผู้จัดจำหน่ายในปีที่กำหนดและกราฟของมัน ในรายงานนี้เราสามารถเลือกปีที่คุณต้องการดู
เปรียบเทียบรายปี
แสดงให้เห็นวิวัฒนาการของการใช้จ่ายในช่วง 10 ปี จะแสดงค่าเป็นเวลาหลายปีและจะแสดงกราฟ
ผมรอความเห็นจากฐานข้อมูลนี้ แต่ฉันจะเพิ่มฟังก์ชันการทำงานเช่นความสามารถในการพิมพ์รายงาน
ดาวน์โหลดตัวอย่าง: ค่าใช้จ่าย
โพสต์ใน Uncategorized | 12 Comments »
เสาร์ 26 มีนาคม, 2011 |
การปรับปรุงเปลี่ยนแปลงการขายนี้มีดังนี้
การใส่ภาพของ บริษัท ในรายงานซึ่งไม่ได้แสดง
การเปลี่ยนรูปใหม่ด้านการพิมพ์ของการขายและตำแหน่งของ "สินค้า" ที่ไม่ได้ในการพิมพ์
การวาง IVa ตารางและผลรวม
การสร้างรูปแบบการขายประจำวันในรายการที่เราสามารถมองเห็นยอดขายทั้งหมดในวันและรายชื่อตามประเภทของการชำระเงิน
การเปลี่ยนรหัสเพื่อแทรกภาพของโลโก้ บริษัท เพราะภาพจะถูกเชื่อมโยงกับ 'localfoto' ซึ่งเป็นเส้นทางที่อยู่บนดิสก์ที่ภาพหากภาพไม่ได้อยู่บนเว็บไซต์ให้ข้อมูลผิดพลาดและไม่ได้เปิดแบบฟอร์ม "ข้อมูลขององค์กร" ดังนั้นผมจึงใส่ประจำที่จะตรวจสอบข้อผิดพลาดเกิดขึ้นและถ้าเป็นเช่นนั้นจะซ่อนภาพและออกจากฟังก์ชั่นที่จะไม่ให้ข้อผิดพลาด โดยทั่วไปกลับไปที่สถานะเริ่มต้นเหมือนกับว่ามันไม่ได้ภาพ
การเปลี่ยนแปลงในรูปแบบและพิมพ์รายงานการขาย
ซัพพลายเออร์ - แบบฟอร์มถูกสร้างขึ้นสำหรับซัพพลายเออร์ เมื่อใดก็ตามที่คุณป้อนซื้อใหม่และผู้จัดจำหน่ายไม่ได้อยู่ถามว่าคุณต้องการเพิ่ม ถ้าเป็นเช่นนั้นเปิดแบบฟอร์ม "Suppliers" เพื่อป้อนข้อมูล
ช้อปปิ้ง - หากบทความที่ไม่อยู่ถามว่าคุณต้องการแทรก
ดาวน์โหลด: ระบบการขาย
ขอบคุณที่จะทดสอบและแสดงความคิดเห็นเพื่อปรับปรุงระบบ
โพสต์ใน Uncategorized | 10 Comments »
เสาร์ 12 มีนาคม, 2011 |
ในกรณีของ สัตว์ที่พักพิง และเช่น ระบบการขาย ที่มีรูปแบบที่เราสามารถใส่ภาพ หลังจากที่ใช้รหัสนี้ฉันพบว่าเป็นภาพที่เชื่อมโยงกับ 'localfoto' ซึ่งเป็นเส้นทางที่อยู่บนดิสก์ที่ภาพหากภาพไม่ได้อยู่บนเว็บไซต์ให้ข้อมูลผิดพลาดและไม่ได้เปิดแบบฟอร์ม ดังนั้นผมจึงใส่ประจำที่จะตรวจสอบข้อผิดพลาดเกิดขึ้นและถ้าเป็นเช่นนั้นจะซ่อนภาพและออกจากฟังก์ชั่นที่จะไม่ให้ข้อผิดพลาด โดยทั่วไปกลับไปที่สถานะเริ่มต้นเหมือนกับว่ามันไม่ได้ภาพ
ในการโพสต์ต่อไปฉันจะใส่การปรับปรุงต่อไปของระบบการขายที่เราสามารถมองเห็นรหัสการทำงาน แต่เราสามารถทำแบบทดสอบที่จะนำระบบการขายในโฟลเดอร์ที่แตกต่างกันและดูว่าเกิดอะไรขึ้นเมื่อเราเปิดรูปแบบของข้อมูล บริษัท
รหัสที่มีการปรับปรุงดังนี้
'Www.accessexemplos.com
'มาร์ตินโฮเซ
'2011-02-28
On Error GoTo Err_mostraimagem
หาก IsNull (Me.Localfoto) = เท็จแล้ว
Me.FOTO.Picture = Me.Localfoto
FOTO.Visible = True
SEMFOTO.Visible = False
อื่น
Me.FOTO.Picture = ""
SEMFOTO.Visible = True
FOTO.Visible = False
End If
Exit_mostraimagem:
Exit Sub
Err_mostraimagem:
เลือก Err.Number กรณี
2220 กรณี 'ไม่เห็นภาพ
FOTO.Visible = False
SEMFOTO.Visible = True
สมัครงาน Exit_mostraimagem:
ข้อผิดพลาดอื่น ๆ อีกกรณี '
MsgBox Err.Number & "" & Err.Description
สมัครงาน Exit_mostraimagem:
END เลือก
โพสต์ใน Uncategorized | No Comments »
เสาร์ 12 มีนาคม, 2011 |
สำหรับผู้ใช้เมื่อป้อนข้อมูลเสมอเขียนในเมืองหลวงเพียงแค่ใส่รหัสต่อไปนี้ในคุณสมบัติของเขตข้อมูลในเหตุการณ์ 'เมื่อคุณกด' (onkeypress):
KeyAscii = Asc (UCase (Chr (KeyAscii)))
ที่ KeyAscii จะได้รับรหัส ASCII ใหม่
chr = แสดงโค้ดอักขระ ASCII
ฟังก์ชั่น 'asc': ส่งกลับจำนวนเต็มที่แสดงถึงรหัสอักขระ (ASCII) ที่สอดคล้องกับตัวอักษรตัวแรกในสตริง
ฟังก์ชั่น UCase: แปลงสายอักขระตัวพิมพ์ใหญ่
ฟังก์ชัน Chr: มันแสดงให้เห็นลักษณะของรหัส ASCII
เมื่อต้องการแปลงเป็นตัวพิมพ์เล็กเพียงแค่เปลี่ยน LCase UCase โดย:
KeyAscii = Asc (LCase (Chr (KeyAscii)))
โพสต์ใน Uncategorized | No Comments »
เสาร์ 30 ตุลาคม, 2010 |
ฉันพบว่าผู้อ่านบางคนส่งข้อความเดียวกันหลายครั้งเพราะพวกเขาคิดว่าครั้งแรกที่ไม่ได้ถูกส่งเรียบร้อยแล้ว
ถ้ามันเป็นครั้งแรกที่จะแสดงความเห็นข้อความนี้จะต้องมีการอนุมัติซึ่งยังอนุมัติแบบเต็มเป็นที่แสดงความเห็น
นี่คือการป้องกัน SPAM ข้อความไม่ปรากฏว่าไม่มีอะไรจะทำอย่างไรกับบล็อก
ดังนั้นหลังจากที่ส่งข้อความแรกเพียงแค่ต้องรอจนกว่าจะได้รับการอนุมัติและหลังจากนั้นข้อความต่อไปนี้ปรากฏขึ้นโดยอัตโนมัติ
มืดยังคงออก 252 ข้อความสแปม ...
โพสต์ใน Uncategorized | 8 Comments »
เสาร์ 23 ตุลาคม, 2010 |
ที่ถูกกล่าวไว้ในข้อความก่อนหน้านี้ผมเปลี่ยนสถานที่ที่ไฟล์เพื่อดาวน์โหลด
ตั้งแต่วันนี้ตั้งอยู่ในบริการของ BOX.NET ที่อย่างน้อยไม่ต้องรอให้ดาวน์โหลดและมีการโฆษณาไม่มี
คุณยังมีการปรับปรุงการเชื่อมโยงบางอย่างซึ่งสัปดาห์หน้าจะแล้วเสร็จ และใส่ลิงค์ในเมนูของ "Downloads" บล็อกที่เชื่อมต่อกับโฟลเดอร์บน BOX.NET ที่ไฟล์ทั้งหมดสามารถดาวน์โหลดได้
คำถามหรือข้อพบไฟล์ที่มีการเปลี่ยนแปลงขอขอบคุณที่แจ้งให้ฉัน
โพสต์ใน Uncategorized | 2 Comments »
พุธ 19 สิงหาคม, 2009 |
วันนี้ผมจะแสดงให้เห็นถึงวิธีการสร้างแถบเมนูทีละขั้นตอนเพื่อให้มืออาชีพมากขึ้นและเพียงแค่ให้เข้าถึงตัวเลือกต่างๆที่จริงๆเรื่องที่ผู้ใช้ปลายทางของโครงการในการเข้าถึง
ในตอนท้ายเราจะมีแถบเมนูที่มีลักษณะเหมือนภาพด้านล่าง
1 - ไปที่เมนู Tools และเลือก 'ปรับแต่ง' เมนูต่อไปนี้ปรากฏขึ้น:
2 - เลือกแท็บ 'แถบเครื่องมือ' และเลือก 'ใหม่' และป้อนชื่อที่คุณต้องการให้ไปยังแถบเครื่องมือที่ผมเลือก "เมนู" คลิกที่ OK และปรากฏบนแถบเครื่องมือที่จะทำงานซึ่งสำหรับในตอนนี้มีตัวเลือกไม่มี
3 - ด้วยแถบเครื่องมือเลือกคลิกที่ 'สมบัติ' และเมนูต่อไปนี้ปรากฏขึ้น:
4 - เปลี่ยน 'ประเภท' เป็น 'ของ Toolbar' แล้วคลิกปิด
5 - คลิกที่ 'คำสั่ง' และรายการที่ด้านซ้ายว่า 'ประเภท' เลือก 'เมนูใหม่' ซึ่งควรจะอยู่ในตำแหน่งสุดท้าย จากนั้นคลิกที่กล่องที่ 'คำสั่ง' สิทธิ 'และ' เมนูใหม่ 'ลากขึ้นไปบนแถบเมนูของเราเป็นตัวอย่าง แต่โดยภาพด้านล่าง
ขึ้น 'เมนูใหม่' ลากบนแถบเมนูที่เวลาที่กำหนดโดยจำนวนของเมนูที่เราต้องการในตัวอย่างนี้ผมจะลากสามครั้งเพื่อให้ทั้งสองเมนูและเมนูย่อยของเรา เมนูใหม่ที่จะทำให้เมนูย่อยก็เพียง แต่ลาก 'ลงในเมนู หมายเหตุ: จำนวนของเมนูสามารถเปลี่ยนแปลงได้ในภายหลังคุณสามารถเพิ่มหรือลดตามที่คุณต้องการ
6 - คลิกปุ่มขวาของเมาส์ที่ด้านบนของ 'เมนูใหม่' ของแถบเครื่องมือและเปลี่ยนชื่อเป็นที่ต้องการของเรา ในตัวอย่างผมเลือก 'ลูกค้า' สำหรับ 1 และ 'ซัพพลายเออร์' สำหรับ 2
7 - ตอนนี้ขอนำเมนูในรูปแบบที่เราตั้งใจจะเปิด คลิกที่ 'คำสั่ง' และเลือก 'ทุกรูปแบบ' หมวดหมู่และด้านขวาจะแสดงฟอร์มที่มีอยู่ทั้งหมดในโครงการปัจจุบัน คลิกที่รูปแบบที่คุณต้องการและลากแถบเครื่องมือ ในตัวอย่างผมเลือกรูปแบบต่างๆและรายงานและยัง EXIT ตัวเลือก (ที่จะปิด Access) ในขั้นตอนนี้เราสามารถเลือกสิ่งที่เราต้องการบนแถบเครื่องมือของเราเปิดคุณก็ต้องเลือกสิ่งที่เราต้องการในประเภท (ตารางฟอร์มรายงานแบบสอบถามเมนูการดำเนินการเข้าถึงที่จะปรากฏเป็นแถบเมนูตามค่าเริ่มต้นและอื่น ๆ )
8 - หลังจากเลือกทุกสิ่งที่คุณต้องการมีอยู่บนแถบเมนูของเราคุณสามารถคลิกที่แต่ละคนด้วยปุ่มเมาส์ขวาเพื่อดูคุณสมบัติที่สามารถเปลี่ยน ดูภาพด้านล่าง
'รีเซ็ต' - ทำหน้าที่ในการวางรายการที่ แต่เดิมก่อนที่คุณจะเปลี่ยนชื่อของภาพ ฯลฯ
'ลบ' - ลบรายการเมนู
'ชื่อ' - เพื่อเปลี่ยนชื่อของรายการเมนู ที่นี่เรายังสามารถตั้งค่าทางลัดไปยังรายการที่ใช้เครื่องหมายไว้หน้าตัวอักษรที่คุณต้องการใช้เป็นทางลัด ตัวอย่างเช่นตัวเลือก Exit โดยปริยายอยู่แล้วเป็นอย่างดี & อกเมนูจะปรากฏตัวอักษร 'R' ขีดเส้นใต้ที่บอกเราว่าเมื่อใช้แป้น ALT + R ทำงานรายการเมนู Exit ในตัวอย่างผมเลือกที่จะเปิดลูกค้าและลูกค้าที่มีทางลัด ALT + C
'คัดลอก / วาง / ตั้งค่า / แก้ไข / เปลี่ยนรูปปุ่ม' - คำสั่งเหล่านี้จะใช้ในการทำงานตรงภาพที่เราต้องการที่จะเห็นต่อไปกับแต่ละรายการ เราสามารถคัดลอกและวางภาพที่จะใช้ในรายการอื่นคืนค่ารูปภาพต้นฉบับ, แก้ไขภาพและทำการแก้ไขไอคอน (พิกเซลหนึ่งพิกเซล) หรือเลือกภาพที่มีการเปลี่ยนแปลงเมนู
แล้วเรายังสามารถเลือกรูปแบบของรายการเช่นถ้าเราต้องการให้ข้อความเพียงข้อความและภาพหรือ
'เริ่มที่กลุ่ม "- ทำหน้าที่ในการแยกรายการโดยแถบแนวนอนหรือสร้างกลุ่มของรายการ
Link "ทุน" - การกำหนดเชื่อมโยงกับทั้ง URL หรือวัตถุใด ๆ ในฐานข้อมูล
'Properties' - จะแสดงคุณสมบัติทั้งหมดของรายการ
9 - ตอนนี้เรามีแถบเมนูที่เรามีพร้อมที่จะใส่ในสถานที่ เมื่อต้องการทำเช่นนี้คลิกที่ปุ่มปิดและลากเมนูของเราไปด้านบนของหน้าจอจนกว่าคุณจะวางในตำแหน่งที่แถบคือการเข้าถึงเริ่มต้น
10 - การเริ่มต้นบาร์เพื่อเปิดฐานข้อมูลจะต้องให้คำแนะนำเพื่อเปิดขึ้นเมื่อคุณเริ่ม Access ขอให้ 'Tools' และ 'เริ่มต้น' และ 'แถบเมนู' เลือกชื่อของเมนูของเราใน 'เมนู' ตัวอย่างนี้
11 - เมื่อต้องการเปลี่ยนภาพของแต่ละรายการเมนูที่เราสามารถใช้วิธีอื่นคือการแทรกรูปภาพลงในแบบฟอร์มเดียวกันและสำเนาสำหรับรายการ นั่นคือ:
- การสร้างแบบฟอร์มในรูปแบบของโครงสร้าง
- ไปที่เมนูแทรกและเลือกภาพ
- เลือกภาพใด ๆ และกดปุ่ม Enter
- เลือกภาพและด้วยปุ่มเมาส์ขวาเลือก Copy
- ไปที่เมนู Tools และเลือกตัวเลือกเพื่อปรับแต่ง
- คลิกที่ปุ่มขวาของเมาส์ในรายการที่คุณต้องการเปลี่ยนรูปและเลือกรูปปุ่มวาง
- คลิกเข้าใกล้ชิดและใกล้ชิด
- เริ่มที่ฐานข้อมูลเพื่อดูผล
หมายเหตุ: เมื่อเปลี่ยนแถบเมนูเมนูหายไปในการเข้าถึงฐานข้อมูลจะทำ เมื่อต้องการทำการเปลี่ยนแปลงในนั้นเป็นสิ่งที่จำเป็นในการเริ่มต้นฐานข้อมูลแป้น SHIFT
เมนูของฉันลักษณะเช่นนี้:
ดาวน์โหลด: เมนูบาร์
โพสต์ใน Uncategorized | 9 Comments »
พุธ 20 พฤษภาคม, 2009 |
เราสามารถป้องกันไม่ให้รายงานที่เปิดถ้าไม่มีข้อมูลที่จะแสดงและสำหรับครั้งนี้เราจะใช้สองรูปแบบขึ้นอยู่กับรุ่นของ Access:
1 - ทุกรุ่น ACCESS
วางโค้ดด้านล่างในคุณสมบัติของรายงาน, 'เปิดใช้' เหตุการณ์
ใช้เหตุการณ์ทำให้รายงาน (Activate):
ตำบลเอกชน Report_Activate ()
หาก DCount ("*", Me.RecordSource) = 0 แล้ว
MsgBox "ไม่มีระเบียนที่ต้องการแสดง" vbDefaultButton1, "ผิดพลาด!"
AcReport DoCmd.Close, "ชื่อรายงาน"
End If
ย่อยสิ้นสุด
2 - ตั้งแต่ 7 รุ่น (95 ชั่วโมง) ถูกบันทึกอยู่ในเหตุการณ์ 'ถ้าไม่มีข้อมูล' แล้วเราสามารถ urilizar รหัสต่อไปนี้:
Private Sub Report_NoData (ยกเลิก As Integer)
MsgBox "ไม่มีข้อมูลในรายงาน.", VbInformation, "ผิดพลาด!"
ยกเลิก = True
ย่อยสิ้นสุด
หากต้องการดูตัวอย่างการเรียกใช้ดาวน์โหลด: การป้องกันไม่ให้รายงานการเปิด
โพสต์ใน Uncategorized | 13 Comments »
