Online Reference

Home

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

APPActivate Statement

VBA Statement, activate ส่วน window ของโปรแกรมประยุกต์

ไวยากรณ์

AppActivate title [, wait]

ไวยากรณ์ AppActivate มีรายละเอียดของส่วนดังนี้

ส่วน รายละเอียด
title บังคับ, เป็น string expression ที่ระบุไตเติลในแถบไตเติลของ window โปรแกรมประยุกต์ ที่ต้องการ activate ค่า task ID ที่ส่งออกจากฟังก์ชัน Shell สามารถใช้แทนที่ title ในการ activate โปรแกรมประยุกต์
wait ไม่บังคับ, ค่า Boolean ระบุการเรียกโปรแกรมประยุกต์ต้องโฟกัสก่อน activate โปรแกรมประยุกต์อื่น ถ้าเป็น False (ค่าเริ่มต้น) โปรแกรมประยุกต์ที่ระบุได้รับการ activate ทันที ถึงแม้ว่าโปรแกรมประยุกต์ที่เรียกจะไม่ได้รับโฟกัส ถ้าเป็น True การเรียกโปรแกรมประยุกต์ รอจนกระทั่งได้รับโฟกัส จึงจะได้ รับการ activate

ลักษณะการประยุกต์

AppActivate เปลี่ยนโฟกัสไปที่ชื่อโปรแกรมประยุกต์หรือ window แต่ไม่มีผลกระทบกับ window ทั้งกรณีเต็มจอภาพหรือลดขนาด การโฟกัสย้ายจาก window โปรแกรมประยุกต์ที่ได้รับ activate เมื่อผู้ใช้กระทำการเปลี่ยนโฟกัส หรือปิด window การใช้ฟังก์ชัน Shell เพื่อเริ่มต้นโปรแกรมประยุกต์ และตั้งค่ารูปแบบ window

การหาโปรแกรมประยุกต์ที่จะ activate เป็นการใช้ title ในการเปรียบเทียบชื่อไตเติล ของแต่ละโปรแกรมประยุกต์ ถ้าไม่พบ โปรแกรมประยุกต์ที่ข้อความไตเติลเริ่มต้นด้วย title จะได้รับการ activate ถ้ามีหลาย instance ของโปรแกรมประยุกต์มีชื่อไตเติลตรงกับ title จะเลือกหนึ่ง instance

ดูเพิ่มเติม

SendKeys Statement, ฟังก์ชัน Shell

ตัวอย่าง

ตัวอย่างการใช้ประโยคคำสั่ง AppActivate ส่วนประโยคคำสั่ง Shell ใช้กับโปรแกรมประยุกต์ที่อยู่ในพาร์ทที่ระบุ

Dim MyAppID, ReturnValue

' ใน Microsoft Windows
AppActivate "Microsoft Word" ' Activate Microsoft Word

' AppActivate สามารถใช้ส่งออกค่าของฟังก์ชัน Shell
' ส่งออก Microsoft Word
MyAppID = Shell("C:\Word\WinWord.exe", 1)
AppActivate MyAppID ' Activate Microsoft Word

' ส่งออก Microsoft Excel
ReturnValue = Shell("C:\Excel\Excel.exe", 1)
AppActivate ReturnValue ' Activate Microsoft Excel