การใช้งานของ regexp:
regexptest (patrn, strng)
Dimregex, Match, Matches 'สร้างตัวแปร
setregex = newregexp 'สร้างนิพจน์ทั่วไป
regex.pattern = โหมด Patrn'set
regex.ignorecase = true 'ตั้งค่าไม่ว่าจะเป็นตัวพิมพ์เล็กหรือไม่
regex.global = true 'ตั้งค่าความพร้อมใช้งานทั่วโลก
setMatches = regex.execute (strng) 'ทำการค้นหา
การสำรวจของคอลเลกชันที่ตรงกัน
retstr = retstr & "matchfoundatposition"
retstr = retstr & match.firstindex & ". matchis '"
retstr = retstr & match. & "'." & vbcrlf
ต่อไป
regexptest = retstr
จบ
msgbox (regexptest ("IS.", "IS1IS2IS3IS4")))))))))))))
คุณสมบัติของวัตถุ regexp
◎คุณลักษณะทั่วโลก
ชุดคุณสมบัติทั่วโลกตั้งค่าหรือส่งคืนค่าบูลีนที่ระบุว่ารูปแบบตรงกับทั้งหมดหรือเพียงตัวแรกในระหว่างสตริงการค้นหาทั้งหมด
ไวยากรณ์
Object.global [= true | false]
พารามิเตอร์วัตถุเป็นวัตถุ regexp เสมอ หากการค้นหาถูกนำไปใช้กับสตริงทั้งหมดคุณสมบัติทั่วโลกมีค่าของจริงมิฉะนั้นค่าของมันจะเป็นเท็จ การตั้งค่าเริ่มต้นเป็นจริง
การใช้แอตทริบิวต์ทั่วโลก (เปลี่ยนค่าที่กำหนดให้กับแอตทริบิวต์ทั่วโลกและสังเกตผลกระทบ):
regexptest (patrn, strng)
Dimregex 'สร้างตัวแปร
setregex = newregexp 'สร้างนิพจน์ที่เป็นที่ยอมรับ
regex.pattern = โหมด Patrn'set
regex.ignorecase = true 'ตั้งค่าว่าตัวอักษรมีความอ่อนไหวหรือไม่
regex.global = true 'ตั้งค่าธรรมชาติเต็มรูปแบบ
regexptest = regex.execute (strng) 'ทำการค้นหา
จบ
msgbox (regexptest ("IS.", "IS1IS2IS3IS4")))))))))))))
◎คุณลักษณะที่ไม่รู้
คุณสมบัติที่ไม่รู้ว่าตั้งค่าหรือส่งคืนค่าบูลีนที่ระบุว่าการค้นหาโหมดนั้นมีความละเอียดอ่อนตัวพิมพ์ใหญ่หรือไม่
ไวยากรณ์
Object.ignorecase [= true | false]
พารามิเตอร์วัตถุเป็นวัตถุ regexp เสมอ หากการค้นหาเป็นกรณีที่มีความละเอียดอ่อนคุณสมบัติที่ไม่รู้จะเป็นเท็จ มิฉะนั้นจะเป็นจริง ค่าเริ่มต้นเป็นจริง
การใช้แอตทริบิวต์ที่ไม่รู้ (เปลี่ยนค่าที่กำหนดให้กับแอตทริบิวต์ที่ไม่รู้เพื่อสังเกตผลของมัน):
regexptest (patrn, strng)
Dimregex 'สร้างตัวแปร