|
InStr Function
VBA Function, ค่าที่ส่งออกเป็นประเภทข้อมูล Variant (String) ที่ระบุตำแหน่งที่พบตัวอักษรของข้อความ
ที่อ้างถึงภายในข้อความที่ค้นหา
ไวยากรณ์
InStr([start,] string1, string2 [,compare] )
อากิวเมนต์ของฟังก์ชัน InStr มีรายละเอียด คือ
ส่วน |
รายละเอียด |
start |
ไม่บังคับ, เป็น Expression ของตัวเลขที่กำหนดตำแหน่งเริ่มในการค้นหา
ถ้าไม่ได้ระบุการค้นหาจะเริ่มจากอักษรตัวแรก ถ้า start เป็นค่าว่างจะปรากฏข้อผิดพลาด
อากิวเมนต์ start ต้องระบุถ้ามีการกำหนด compare |
string1 |
บังคับ, เป็น Expression ของข้อความที่ถูกค้นหา |
string2 |
บังคับ, เป็น Expression ของข้อความอ้างอิงในการค้นหา |
compare |
ไม่บังคับ, เป็นการระบุวิธีการเปรียบเทียบ อากิวเมนต์
compare ไม่จำเป็นต้องกำหนด หรือกำหนดเป็น 0, 1 หรือ 2 การกำหนดเป็น
0 เป็นกำหนดการค้นหาแบบไบนารี ระบุเป็น 1 กำหนดการค้นหาแบบข้อความที่ไม่พิจารณาอักษรตัวเล็กหรือใหญ่
ระบุเป็น 2 สำหรับ Microsoft Access โดยเฉพาะ เป็นค้นหาตามสารสนเทศที่มีอยู่ในฐานข้อมูล
ถ้า compare เป็นค่าว่าง จะปรากฏข้อผิดพลาด ถ้าcompare ไม่ได้ระบุ ฟังก์ชันจะค้นหาวิธีการเปรียบเทียบ |
ค่าที่ส่งออก
ถ้า |
ค่าส่งออกของ Instr |
string1 เป็น Zero-length string |
0 |
string1 เป็นค่าว่าง |
ค่าว่าง (Null) |
string2 เป็น Zero-length string |
start |
string2 เป็นค่าว่าง |
ค่าว่าง (Null) |
string2 ไม่พบ |
0 |
string2 พบใน string1 |
ตำแหน่งที่ค้นพบ |
start > string2 |
0 |
หมายเหตุ
- ฟังก์ชัน InStrB ใช้ในการค้นหาข้อมูลแบบไบต์
ดูเพิ่มเติม
Option Compare Statement, ฟังก์ชัน StrComp
ตัวอย่าง
ฟังก์ชัน InStr นำมาใช้ในการค้นหาตำแหน่งตัวอักษรของ 2 ข้อความ
Dim SearchString, SearchChr, myStr
' ข้อความที่ถูกค้นหา หรือ string1
SearchString = "XXpXXpXXPXXP"
' ข้อความอ้างอิง หรือ string2
SearchChr = "P"
' ค้นหาแบบตัวอักษร โดยตำแหน่งเริ่มต้น คือ 4
' ค่าส่งออก คือ 6
myStr = Instr(4, SearchString, SearchChr, 1)
' ค้นหาแบบไบนารี โดยตำแหน่งเริ่มต้น คือ 1
' ค่าส่งออก คือ 9
myStr = Instr(1, SearchString, SearchChr, 0)
' ค้นหาแบบไบนารี โดยใช้ค่าเริ่มต้น (default)
' ค่าส่งออก คือ 9
myStr = Instr(SearchString, SearchChr)
' ค้นหาแบบไบนารี โดยใช้ค่าเริ่มต้น (default)
' ค่าส่งออก คือ 0
myStr = Instr(1, SearchString, W)
|
|