คือเกี่ยวกับ CommonDialog ช่วยหน่อย
คือเกี่ยวกับ CommonDialog ช่วยหน่อย
On Error GoTo UsrCancel CommonDialog1.CancelError = True CommonDialog1.Filter = \"Launcher.exe|*Launcher.exe|\" CommonDialog1.Flags = cdlOFNFileMustExist CommonDialog1.ShowOpen
If CommonDialog1.FileName = \"\" Then Exit Sub Text1 = CommonDialog1.FileName UsrCancel:
--------------------------------------------------------------------------------
ผมใช้คำสั่งนี้ได้แล้วคับ พอ ผม Browse... นำไฟล์ชื่อว่า \"Launcher.exe\" มาแล้ว แล้วผมสร้าง Button 1 ปุ่ม ผมจะสั่งให้ปุ่มนั้งเปิดไผล์ที่ผม Browse... เอาไว้อ่ะคับ (Browse... แล้วชื่อ File จะอยู่ใน Text1) ไครพอเขียน Code ได้บอกหน่อยนะคับขอบคุณคับ
|