ฟังก์ชัน CallByName

สิ่งสำคัญ:  บทความนี้เป็นการแปลด้วยเครื่อง โปรดดู ข้อจำกัดความรับผิดชอบ โปรดดูบทความฉบับภาษาอังกฤษ ที่นี่ เพื่อใช้อ้างอิง

ดำเนินการวัดวัตถุ หรือตั้งค่า หรือส่งกลับคุณสมบัติของแอวัตถุ

ไวยากรณ์

CallByName ( วัตถุ procname , calltype [, ()อาร์กิวเมนต์])

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

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

คำอธิบาย

วัตถุ

ต้องระบุ ตัวแปร (เลือกวัตถุ) ชื่อของวัตถุที่จะดำเนินการใช้ฟังก์ชัน

procname

ต้องระบุ ตัวแปร (สตริง) นิพจน์สตริงที่ประกอบด้วยชื่อของคุณสมบัติหรือวิธีของวัตถุ

calltype

ต้องระบุ ค่าคง ค่าคงที่ของชนิดvbCallTypeแสดงชนิดของกระบวนงานที่ถูกเรียกว่า

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

เพิ่มเติม ตัวแปร (อาร์เรย์)


ข้อสังเกต

ฟังก์ชันCallByNameถูกใช้ เพื่อดู หรือการตั้งค่าคุณสมบัติ หรือเรียกใช้เมธอดในขณะที่ทำโดยใช้ชื่อสตริงที่

ในตัวอย่างต่อไปนี้ บรรทัดแรกใช้CallByNameเพื่อตั้งค่าคุณสมบัติMousePointerของกล่องข้อความ บรรทัดสองรับค่าของคุณสมบัติMousePointerและบรรทัดที่สามเรียกวิธีการย้ายเพื่อย้ายกล่องข้อความ:

CallByName Text1, "MousePointer", vbLet, vbCrosshair
Result = CallByName (Text1, "MousePointer", vbGet)
CallByName Text1, "Move", vbMethod, 100, 100

ตัวอย่าง

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

ตัวอย่างนี้ใช้ฟังก์ชันCallByNameเพื่อเรียกใช้เมธอดย้ายของปุ่มคำสั่ง

ตัวอย่างใช้ฟอร์ม (Form1) ยัง มีปุ่ม (Command1), และป้ายชื่อ (Label1) เมื่อโหลดฟอร์ม คุณสมบัติป้ายคำอธิบายของป้ายชื่อถูกตั้งค่าเป็นชื่อของวิธีการที่จะเรียก ในกรณีนี้ "ย้าย" เมื่อคุณคลิกที่ปุ่ม ฟังก์ชันCallByNameเรียกเมธอดเมื่อต้องการเปลี่ยนตำแหน่งที่ตั้งของปุ่ม

Option Explicit
Private Sub Form_Load()
Label1.Caption = "Move"' Name of Move method.
End Sub
Private Sub Command1_Click()
If Command1.Left <> 0 Then
CallByName Command1, Label1.Caption, vbMethod, 0, 0
Else
CallByName Command1, Label1.Caption, vbMethod, 500, 500
End If

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

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

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

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

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

×