หน้าแรก
 การบ้าน
  C/C++ new
  Java new
 Sourcecode.TV
  Android
  Blackberry
  C/C++
  Java
  Linux
  Windows Phone
  แจ้งเรื่องที่ต้องการ
 บทความ
  .NET
  Android
  Blackberry
  C++Builder
  Delphi
  Java
  Mobile
  Open Source
  Pocket PC
  Visual Basic
  Web
  Windows Phone
  Others
 แบบเรียนฟรี
  ASP
  ASP.NET Webmatrix
  C++
  eVB
  J2ME
  Java
  PHP
 ซอร์สโค้ด
  Android
  ASP
  C++
  VC++
  CGI-Perl
  Delphi
  Java
  jQuery
  PHP
  Visual Basic
  .NET
 บริการจากเรา
  เปิดท้าย... ขายโค้ด
  DoodeeHosting
  รับออกแบบ พัฒนาเว็บไซต์
  Freeware
  อัตราค่าโฆษณา
  รายชื่อลูกค้า
  สถิติผู้เข้าเว็บ
 ดาว์นโหลด
 ค้นหาข้อมูล
 กระดานสนทนา
  .NET
  C/C++
  Delphi
  Java
  Palm/PocketPC
  Visual Basic
  Web
  อื่นๆ
 กระดานงาน
 ลิงค์เว็บ
 เกี่ยวกับผม
 อัตราค่าโฆษณา
Social Network

Facebook  Twitter  YouTube
 New Article
 Webboard
 Freelanceboard
Freeware
โปรแกรมเบอร์ดี (BerDee)
โปรแกรมเบอร์ดี (Android)
เกมส์เป่ายิ้งฉุบ
เกมส์เป่ายิ้งฉุบ(Android)
WebcamMonitor
WebcamMonitor(Windows)
scSendMail
scSendMail(Windows)
MSN Caption
MSN Caption(Windows)
  Freelance comment
  ติดต่อสอบถามมาได้ตลอดนะครับ...
2015-07-29 13:35:58
  ถ้าผมต้องการเว็บที่พัฒนาด้วย HTML5 ...
2015-01-18 15:33:54
  ถ้าผมต้องการเว็บที่พัฒนาด้วย HTML5 ...
2015-01-18 15:32:51
  ติดต่อสอบถามเข้ามาได้นะคับ
งานเล...

2014-01-06 12:47:38
  ถ้ายังหาคนสอนไม่ได้ ก็ลองศึกษาเองได...
2013-07-06 01:04:37
  สนใจส่งขอบเขตมาคุยราคาก่อนได้นะคับ...
2013-03-24 18:54:20
  ถ้ายังไม่มีคนรับงานติดต่อได้ครับ 08...
2012-12-16 19:18:14
  สนใจคะ ติดต่อ 0905076277...
2012-11-12 11:07:46
  รับทำโปรเจ็คนักศึกษาหรือบริษัท
ส...

2012-10-29 03:10:46
  sukit_te34@hotmail.com...
2012-10-29 03:09:36
  Webboard comment
  รับ สอน matlab เขียน matlab...
2017-06-03 16:27:23
  เฉพาะทางขนาดนี้ คงต้องดูหาข...
2017-05-25 16:18:08
  โห เครื่องรุ่นไหนครับ os รุ...
2017-05-25 16:12:47
  ถ้าเขียน php ก็ใช้ curl ส่...
2017-04-20 01:04:20
  เขียนโค้ดไม่เป็น เอาโค้ดไป ...
2017-03-27 12:50:54
  คือสงสัยว่าทำไม ต้องอัพเดทด...
2017-03-27 12:37:20
  ทดสอบการตอบ...
2017-02-22 13:10:24
  ลองอีกวิธีเขียน recursive f...
2017-02-14 13:11:03
  อยากได้ โค้ดระบบห้องสมุดมาก...
2017-01-30 11:45:28
  ทำ for-loop ซ้อนกัน
โดย...

2017-01-28 16:00:12
  Homework comment
  ทำเอง งง เอง กะลังทำใหม่ค่ะ ^^...
2017-04-18 18:40:46
  ทำเอง งง เอง กะลังทำใหม่ค่ะ ^^...
2017-04-18 18:37:54
  ประเด็นแรก flowchart มันไม่มีภ...
2017-04-18 17:43:33
  อยากได้ flowchart ค่ะ เป็นภาษา...
2017-04-18 16:25:29
  kungking คำถามคืออะไรครับ ?...
2017-03-18 23:28:36
  จงเขียนโปรแกรมแสดงผลรวมของตัวเ...
2017-03-06 10:56:25
  ก็โค้ดทำงานคล้ายๆแบบนี้หละ แต่...
2016-09-06 01:00:12
  ผมอยากทราบว่าโค้ดนับถอยหลังเป็...
2016-09-05 09:31:27
  ได้โค้ดแล้ว ลองศึกษาแล้วเขียนผ...
2016-04-22 00:47:49
  ขอแผนผังของโปรแกรมนับตัวอักษรภ...
2016-04-21 19:24:55
  Article comment
  น่าจะได้ครับ ไม่เคยลอง
กล่...

2017-07-11 09:59:35
  สามารถใช้ต่อกับ anycast ได้ไหม...
2017-07-05 10:12:35
  ครับ คุณ "ติด" แล้วลองนึกต่อว่...
2016-06-18 15:21:09
  vs2008 c# ครับ ขอบคุณครับ...
2016-06-17 14:39:30
  ผมใช้ vs c# ทำตามทุขั้นตอนแต่ต...
2016-06-17 14:37:44
  ต้องวิเคราะห์ครับ "ว่าจริงๆ ส่...
2016-03-12 23:36:05
  ผมส่งข้อความในวง LAN ได้เฉพาะค...
2016-03-12 18:25:42
  โปรแกรม Terminal บน Mac ก็เป็น...
2016-02-16 11:02:01
  โปรแกรม Terminal คืออะไรหรอคะ...
2016-02-16 05:58:21
  ไปตั้ง โครงการไว้เลยครับ ที่
2016-01-25 13:29:55
  9Mcode comment
  อยากได้...
2014-02-21 08:52:19

Link Exchange

อัตราค่าโฆษณา
Statistics of Sourcecode in Thailand
 
 eMbedded Visual Basic Tutorial  

- - - - - - - - - - - - - - ผู้ให้การสนับสนุน- - - - - - - - - - - - - -

 eMbedded Visual Basic
 
 

บทที่ 6 โปรแกรมตัวอย่างการใช้เมนู

 

การสร้างเมนูบาร์ สำหรับใช้งานกับโปรแกรม เพื่อให้ผู้ใช้สามารถเลือกการทำงานที่ต้องการได้ จัดเป็นวิธีการที่ดี แต่สำหรับ Pocket PC แล้ว ตำแหน่งของเมนูบาร์ จะอยู่ด้านล่างของหน้าต่าง ซึ่งจะไม่เหมือนกับบนระบบ วินโดวส์ ที่เมนูบาร์จอยู่ด้านบน

Downloadดาวน์โหลดโปรแกรม

เพิ่มคอมโพเนนท์ของเมนูบาร์

  • ทำการสร้างโปรเจคใหม่ขึ้นมา
  • คลิกเลือกที่เมนู Project->Components...

รูปแสดงการเลือกเมนู คอมโพเนนท์
รูปแสดงการเลือกเมนู คอมโพเนนท์

  • ทำการเลือกรายการ Microsoft PocketPC MenuBar Control 3.0 ดังรูป

รูปแสดง การเลือกรายกาคอนโทรล  Menu

  • คลิกปุ่ม OK
  • ทำการดับเบิ้ลคลิก MenuBar จาก Toolbar ด้านข้าง เพื่อเพิ่ม คอนโทรล เข้าสู่ฟอร์ม ดังรูป

รูปแสดง การคลิกวางคอนโทรล Mainmenu ไว้บนฟอร์ม
รูปแสดง การคลิกวางคอนโทรล Mainmenu ไว้บนฟอร์ม

การเพิ่มเมนู

  • ทำการคลิกเลือก MenuBar และกำหนด Property ของ NewButton=False

รูปแสดง การกำหนด Property ของ NewButton=False
รูปแสดง การกำหนด Property ของ NewButton=False

โดยทั่วไป เมื่อคุณสั่ง Run โปรแกรมของคุณ ในขณะที่บนฟอร์ม มีคอนโทรล Menubar อยู่นั้น ผลการ Run จะมีรายการของ เมนู ที่ชื่อว่า New ให้มาโดยอัตโนมัติ ถ้าไม่ต้องการเมนูดังกล่าวจะต้องกำหนด Property ของ NewButton=False

  • ที่ฟอร์มของโปรแกรม ทำการดับเบิ้ลคลิก จะปรากฏหน้าต่าง Code View ให้ทำการเลือกรายการด้านบนของหน้าต่าง เป็น Load เพื่อสร้าง Sub Form_Load สำหรับการเขียนการทำงาน ในขณะที่ฟอร์มเริ่มต้นทำงาน

รูปแสดงการสร้างเหตุการณ์ เมื่อฟอร์มเริ่มต้นทำงาน
รูปแสดงการสร้างเหตุการณ์ เมื่อฟอร์มเริ่มต้นทำงาน

  • ทำการป้อนโค้ด ตามตาราง เพื่อสร้างเมนู 2 รายการคือ File และ Edit โดยในแต่ละรายการจะประกอบด้วย รายการเมนูย่อย ที่สร้างขึ้น โดยกำหนดค่าของตำแหน่งของเมนูย่อย, key สำหรับเป็นชื่อของเมนูย่อย และ ข้อความที่แสดงบนเมนูย่อย เช่น mnuFile.Items.Add 1, "mnuFileOpen", "Open" หมายความถึง คอนโทรล mnuFile ทำการเพิ่มรายการที่ 1โดยมีค่า key เป็น mnuFileOpen (key จะถูกใช้เพื่อตรวจสอบ การคลิกเมนู) และแสดงข้อความ "Open" บนรายการของเมนู
Private Sub Form_Load()
Dim mnuFile As MenuBarMenu
Dim mnuEdit As MenuBarMenu

    Set mnuFile = MenuBar1.Controls.AddMenu("File", "mnuFile")
    mnuFile.Items.Add 1, "mnuFileOpen", "Open"
    mnuFile.Items.Add 2, "mnuFileAdd", "Add"
    mnuFile.Items.Add 3, "mnuFileSave", "Save"
    
    Set mnuEdit = MenuBar1.Controls.AddMenu("Edit", "mnuEdit")
    mnuEdit.Items.Add 1, "mnuEditCut", "Cut"
    mnuEdit.Items.Add 2, "mnuEditPaste", "Paste"

End Sub

  • ทดสอบ Run โปรแกรมโดยกดปุ่ม F5 จะได้ผลดังรูป

รูปแสดง ผลการ Run โปรแกรม
รูปแสดง ผลการ Run โปรแกรม

  • ทำการปิดโปรแกรม หรือ หยุดการ Run โปรแกรม
  • ทำการเปิดไปยังหน้าต่าง Code View และเลือก

รูปแสดง การสร้าง sub เมื่อมีการเลือกคลิกที่เมนู
รูปแสดง การสร้าง sub เมื่อมีการเลือกคลิกที่เมนู

  • แล้วทำการเพิ่มโค้ดลงไป เพื่อทำการตรวจสอบว่า มีการคลิกเมนูรายการใด และคุณจะสามารถนำส่วนนี้ในการ เรียกการทำงานต่างๆ ที่ต้องการ ซึ่งในตัวอย่าง จะแสดงแค่เพียงหน้าต่าง ข้อความธรรมดา คุณสามารถใส่การทำงาน หรือเรียกใช้ sub หรือ function ที่เขียนไว้ได้
Private Sub MenuBar1_MenuClick(ByVal Item As MenuBarLib.Item)
    Select Case Item.Key
        Case "mnuFileOpen"
            MsgBox "File Open"
            
        Case "mnuFileAdd"
            MsgBox "File Add"
        
        Case "mnuFileSave"
            MsgBox "File Save"
        
        Case "mnuEditCut"
            MsgBox "Edit Cut"
        
        Case "mnuEditPaste"
            MsgBox "Edit Paste"
        
    End Select
End Sub
  • ทำการทดสอบโปรแกรม โดยกดปุ่ม F5 ให้คุณทดสอบคลิกเลือกตามเมนูต่างๆจะได้ผล ดังรูป

รูปแสดง การทดสอบการทำงานของโปรแกรม โดยคลิกเลือกเมนู
รูปแสดง การทดสอบการทำงานของโปรแกรม โดยคลิกเลือกเมนู

 

BACK

สายต่อจอ สำหรับเครื่อง macbook pro 2016 (usb-c to HDMI)
สายต่อจอ สำหรับเครื่อง macbook pro 2016 (usb-c to HDMI) ความละเอียดระดับ 4K
หัวแปลง Mini DisplayPort to HDMI Adapter หัวแปลง Mini DisplayPort to HDMI Adapter สำหรับเครื่อง macbook air/pro, mac mini
หัวแปลง Mini DisplayPort to HDMI Adapter สำหรับเครื่อง macbook air/pro, mac mini
สายต่อหูฟัง และชาร์จไฟ สำหรับ iPhone 7 และ 7 Plus
สายต่อหูฟัง และชาร์จไฟ สำหรับ iPhone 7 และ 7 Plus
หัวแปลงจาก USB-C Type ไปเป็น USB 3.1 สำหรับ MacBook
หัวแปลงจาก USB-C Type ไปเป็น USB 3.1 สำหรับ MacBook
ไขควงสำหรับเครื่อง Macbook Air/Pro
ไขควง สำหรับแกะเครื่อง Macbook Air/Pro (300บาท)
HDMI เข้า 3 ออก  1 มีรีโมท
HDMI เข้า 3 ออก 1 มีรีโมท (350บาท)
คลิปสอนเขียนโปรแกรม
เรียนเขียนโปรแกรมดอทเน็ต
เรียนเขียนโปรแกรมแอนดรอยด์
เรียนเขียนโปรแกรมเบล็คเบอร์รี่
เรียนเขียนโปรแกรมซี ซีพลัสพลัส
เรียนเขียนโปรแกรมจาวา
เรียนการใช้งานลินุกส์
เรียนการเขียนโปรแกรมวินโดว์โฟน
เรียนการเขียนโปรแกรมพีเฮชพี มายเอสคิวเอล
9M Blog บอกเล่าเรื่องราว การเขียนโปรแกรมของ นายเอ็ม
บริการ ถ่ายภาพรับปริญญา
OrmSin.com: ขายหนังสืองานฝีมือไทย-ญี่ปุ่น-จีน (country crafts)
อัตราค่าโฆษณา
 
Tutorial
eVB Tutorial
ASP.NET Webmatrix Tutorial
J2ME Tutorial
C++  Tutorial
Java  Tutorial
PHP Tutorial
ASP Tutorial
 
แบบสำรวจ
Freelance รับพัฒนาโปรแกรม

Home - Article - Tutorial - Sourcecode - Dev Handbook - Search - WebBoard - Links - About Us

สงวนลิขสิทธิ์ ห้ามคัดลอก ทำซ้ำ แก้ไข ดัดแปลง ไม่ว่าในรูปแบบใด โดยไม่ได้รับอนุญาตเป็นลายลักษณ์อักษร
เลขทะเบียนพาณิชย์อิเล็กทรอนิกส์จากกระทรวงพาณิชย์: 7100503002000
Copyright 2001 SourceCode.in.th