ข้ามไปที่เนื้อหาหลัก
Office

ฟังก์ชัน Len

ส่งกลับค่ายาวที่มีจำนวนอักขระในสตริงหรือจำนวนไบต์ที่จำเป็นสำหรับการจัดเก็บ TE000127656

ไวยากรณ์

เลน ( สตริง | varname)

ไวยากรณ์ของฟังก์ชันเลนมีอาร์กิวเมนต์เหล่านี้:

อาร์กิวเมนต์

คำอธิบาย

สตริง

TE000127596 ที่ถูกต้องใดๆ ถ้าสตริงที่มี Null ค่า null จะถูกส่งกลับ

varname

ชื่อ TE000127656 ที่ถูกต้องใดๆ ถ้าvarnameมีค่า Null ค่า null จะถูกส่งกลับ ถ้าvarnameเป็นตัวแปรเลนจะถือว่าเหมือนกับสตริงหรือจะส่งกลับจำนวนอักขระที่มีอยู่เสมอ

ข้อสังเกต

หนึ่ง (และมีเพียงหนึ่งรายการเท่านั้น) ของอาร์กิวเมนต์ที่เป็นไปได้สองอาร์กิวเมนต์จะต้องถูกระบุ ด้วยชนิดของผู้ใช้ที่กำหนดจะส่งกลับขนาดตามที่จะถูกเขียนไปยังไฟล์

หมายเหตุ:  ใช้ฟังก์ชันLenBกับข้อมูลไบต์ที่มีอยู่ในสตริงที่เป็นภาษาของชุดอักขระไบต์คู่ (DBCS) แทนที่จะส่งกลับจำนวนอักขระในสตริLenBจะส่งกลับจำนวนของไบต์ที่ใช้ในการแสดงสตริงที่ ด้วยชนิดที่ผู้ใช้กำหนดเองLenBจะส่งกลับขนาดของหน่วยความจำรวมถึงการปรับระหว่างองค์ประกอบต่างๆ สำหรับตัวอย่างโค้ดที่ใช้LenBให้ดูตัวอย่างที่สองในหัวข้อตัวอย่าง

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

ตัวอย่างคิวรี

นิพจน์

ผลลัพธ์

เลือก ProductID, เลน (ProductID) เป็น ProductLen จาก ProductSales

ส่งกลับค่าจากเขตข้อมูล "ProductID" และความยาวของค่าเหล่านั้นในคอลัมน์ ProductLen

ตัวอย่าง VBA

หมายเหตุ: ตัวอย่างที่ทำตามสาธิตการใช้ฟังก์ชันนี้ในโมดูลของแอปพลิเคชัน Visual Basic for Applications (VBA) สำหรับข้อมูลเพิ่มเติมเกี่ยวกับการทำงานกับ VBA ให้เลือกการอ้างอิงนักพัฒนาในรายการดรอปดาวน์ที่อยู่ถัดจากค้นหาและใส่เงื่อนไขอย่างน้อยหนึ่งข้อในกล่องค้นหา

ตัวอย่างแรกใช้จำนวนอักขระที่ส่งกลับจำนวนอักขระในสตริงที่หรือจำนวนไบต์ที่จำเป็นสำหรับการจัดเก็บตัวแปร ชนิด ... การกำหนดบล็อกชนิดสิ้นสุดการกำหนด CustomerRecord ต้องเป็นก่อนหน้าด้วยคำสำคัญส่วนตัวถ้าปรากฏในโมดูลคลา ในโมดูลมาตรฐานคำสั่งชนิดอาจเป็นแบบสาธารณะ

Type CustomerRecord    ' Define user-defined type.
ID As Integer ' Place this definition in a
Name As String * 10 ' standard module.
Address As String * 30
End Type
Dim Customer As CustomerRecord ' Declare variables.
Dim MyInt As Integer, MyCur As Currency
Dim MyString, MyLen
MyString = "Hello World" ' Initialize variable.
MyLen = Len(MyInt) ' Returns 2.
MyLen = Len(Customer) ' Returns 42.
MyLen = Len(MyString) ' Returns 11.
MyLen = Len(MyCur) ' Returns 8.

ตัวอย่างที่สองใช้LenBและฟังก์ชันที่ผู้ใช้กำหนดเอง (LenMbcs) เพื่อส่งกลับจำนวนอักขระไบต์ในสตริงที่ถ้า ANSI ถูกใช้เพื่อแสดงสตริงที่

Function LenMbcs (ByVal str as String)
LenMbcs = LenB(StrConv(str, vbFromUnicode))
End Function
Dim MyString, MyLen
MyString = "ABc"
' Where "A" and "B" are DBCS and "c" is SBCS.
MyLen = Len(MyString)
' Returns 3 - 3 characters in the string.
MyLen = LenB(MyString)
' Returns 6 - 6 bytes used for Unicode.
MyLen = LenMbcs(MyString)
' Returns 5 - 5 bytes used for ANSI.

หมายเหตุ:  หน้านี้ได้รับการแปลด้วยระบบอัตโนมัติ และอาจมีข้อผิดพลาดทางไวยากรณ์หรือความไม่ถูกต้อง จุดประสงค์ของเราคือเพื่อให้เนื้อหานี้มีประโยชน์กับคุณ คุณสามารถแจ้งให้เราทราบว่าข้อมูลมีประโยชน์หรือไม่ นี่คือบทความภาษาอังกฤษเพื่อให้คุณใช้อ้างอิง

ดูเพิ่มเติม

ฟังก์ชันสตริงและวิธีใช้

ขยายทักษะ Office ของคุณ
สำรวจการฝึกอบรม
รับฟีเจอร์ใหม่ก่อนใคร
เข้าร่วม Office Insider

ข้อมูลนี้เป็นประโยชน์หรือไม่

ขอบคุณสำหรับคำติชมของคุณ!

ขอขอบคุณสำหรับคำติชมของคุณ! เราคิดว่าอาจเป็นประโยชน์ที่จะให้คุณได้ติดต่อกับหนึ่งในตัวแทนฝ่ายสนับสนุน Office ของเรา

×