Online Reference

Home

Microsoft Reference
Knowledge Developer Database Internet Resource Forum
VBA
Text Function
ดาวน์โหลดคู่มือ

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”)