..


ลิงก์ผู้สนับสนุน

คำนวณว่าค่าที่เป็นตัวเลขอยู่ระหว่างค่าสองค่าใน VBScript

บทความที่เขียนโดย Luca Ruggiero

ไม่กี่วันที่ผ่านมาผมพบว่าการทำงานในและใช้ SQL ระหว่างการตรวจสอบว่าพารามิเตอร์การค้นหาที่อยู่ระหว่างค่าสองค่าและผมก็ตระหนักว่ามันอาจจะมีประโยชน์ในบางกรณีแม้จะอยู่ในฟังก์ชั่นที่ต้องการที่ของ การเขียนโปรแกรมรหัสและไม่เพียง แต่ในสตริงการค้นหาในฐานข้อมูล

ณ สิ้นฉันเขียนฟังก์ชันที่ดำเนินงานเดียวกันโดยใช้ VBScript

หลังจากที่แนะนำนี้"ทั้งหมดในลมหายใจ"ฉันจะทำให้สถานที่ : ฉันเลือกที่จะตั้งค่าบทความในฝั่งไคลเอ็นต์ VBScript นี้เพื่อให้ทุกคนมีโอกาสที่จะทดสอบได้ทันที แต่รหัสเดียวกันยังสามารถใช้ใน ASP กว่าใน Visual Basic หรือ แม้ต่อไปนี้ตรรกะเดียวกันที่ฉันได้ปฏิบัติตามก็กลายเป็นง่ายมากในการเขียนหนึ่งใน PHP, Java, JavaScript หรืออื่น ๆ ซึ่งเช่น VBScript, ไม่ได้มีคุณสมบัตินี้ natively ระหว่างการเริ่มต้น

ลองดูโค้ดของฟังก์ชันที่กำหนดเองระหว่าง






 ฟังก์ชั่นระหว่าง (MyValue, StartValue, EndValue)



    



 หาก isEmpty (MyValue) จากนั้น



        



 ระหว่าง 0 =



    



 ElseIf isEmpty (StartValue) จากนั้น



        



 ระหว่าง 0 =



    



 ElseIf isEmpty (EndValue) จากนั้น



        



 ระหว่าง 0 =



    



 ElseIf IsNumeric (MyValue) = เท็จแล้ว



        



 ระหว่าง 0 =



    



 ElseIf IsNumeric (StartValue) = เท็จแล้ว



        



 ระหว่าง 0 =



    



 ElseIf IsNumeric (EndValue) = เท็จแล้ว



        



 ระหว่าง 0 =



    



 อื่น



        



 ถ้า MyValue => StartValue และ MyValue <= แล้ว EndValue



            



 ระหว่างวันที่ 1 =



        



 อื่น



            



 ระหว่าง 0 =



        



 End If



    



 End If







 ฟังก์ชั่นการสิ้นสุด



การทำงานจะใช้เวลาสามพารามิเตอร์ : แรกเป็นตัวเลขเพื่อประเมินว่ารวมหรือไม่รวมถึงค่าเริ่มต้นและค่าเป้าหมายที่สองและพารามิเตอร์ที่สาม แต่มีตัวเลขที่แม่นยำของการเดินทางและปลายทาง

จากนั้นใช้ฟังก์ชั่นดังต่อไปนี้นิด ๆ

 



 ระหว่าง document.write (1, 0, 10)

 
เราตรวจสอบที่ 1 อยู่ระหว่าง 0 และ 10, และแน่นอนมันเป็นแล้วผลจะเป็น"1"(จริง)

ในกรณีนี้อย่างไรก็ตาม

 



 ระหว่าง document.write (25, 0, 10)

 
ได้รับ"0"(เท็จ) เพราะไม่ได้เป็น 23 ระหว่าง 0 และ 10

เรายังคงตรวจสอบการทำงานของ เราดำเนินการชุดของการทดสอบเงื่อนไขเพื่อตรวจสอบว่าพารามิเตอร์ที่จะไม่ได้ซ้ายที่ว่างเปล่าและที่เป็นตัวเลข

ที่จะยอมรับหรือไม่ในการกรองพารามิเตอร์ตัวเลขของสตริงชนิดสามารถใช้ภายในฟังก์ชันที่กำหนดเอง, การแปลงค่าเริ่มต้น"ฟังก์ชัน CInt"

สำหรับเหตุผลของพื้นที่ผมได้ตั้งค่าชุดของเงื่อนไขสำหรับเขตข้อมูลแต่ละบุคคล แต่คุณสามารถใช้เป็นเงื่อนไขเดียวบาง, การแยกการตรวจสอบบุคคลที่มีการดำเนินการ"หรือ"

ตอนนี้ขอดูการใช้งานจริงของฟังก์ชันนี้มีการทดสอบ






 จำนวนมซำ, เริ่มต้น, สิ้นสุด







 จำนวน = 1







 start = 0







 = 10 ปลาย







 ถ้าระหว่าง (จำนวน, เริ่มต้น, สิ้นสุด) = 1 แล้ว



    



 อื่น



    



 End If



โดยเฉพาะตัวเลขในการประเมินค่าของการเดินทางและจุดหมายของตัวแปรที่มีชื่อที่มีความหมายที่จุดที่ฉันจะทำให้สภาพดีใช้ฟังก์ชันในตัวของเราเป็นตัวกรองตามเงื่อนไข

ในประเภทเดียวกัน ...
E - Learning
ASP ศูนย์ (Ebook) ASP ศูนย์ (Ebook)
การเรียนรู้ Microsoft ASP และ VBScript จากรอยขีดข่วน ที่เพียง 29 €
Visual Basic 6 (หลักสูตร) Visual Basic 6 (หลักสูตร)
ทำให้การใช้งาน Desktop กับ VB6 จาก 39 €
ลิงก์ผู้สนับสนุน