<address id="xpjh9"><listing id="xpjh9"><meter id="xpjh9"></meter></listing></address>

<address id="xpjh9"><address id="xpjh9"><listing id="xpjh9"></listing></address></address>
<noframes id="xpjh9">
<noframes id="xpjh9">

<address id="xpjh9"><address id="xpjh9"><listing id="xpjh9"></listing></address></address>
    <form id="xpjh9"></form><address id="xpjh9"><listing id="xpjh9"><menuitem id="xpjh9"></menuitem></listing></address>

      <noframes id="xpjh9">
      VB.net 2010 視頻教程 VB.net 2010 視頻教程 VB.net 2010 視頻教程
      SQL Server 2008 視頻教程 c#入門經典教程 Visual Basic從門到精通視頻教程
      當前位置:
      首頁 > 編程開發 > .net教程 >
      • vb.net教程之菜單設計

      • 2015-01-18 10:31 來源:未知
      菜單與與對話框(相關vb.net教程)
      7.1 菜單設計
      控件名:menustrip
      作用:設計下拉式菜單。
      菜單設計方法:當拖入menustrip1控件后,就在窗體的左上角出現菜單設計欄,從而可以輸入菜單項(即菜單的TEXT屬性)。
      常用屬性:
      Text:設置菜單項名字。其后可帶(&f)以指明熱鍵為f(即按下alt+f激活菜單)
      Shortcutkeys:快捷鍵,可以從右邊選擇修飾符(Ctrl,alt,shift)與鍵。也可以直接輸入。
      Image:與菜單項對應的圖標。說明,加載圖片時,選擇資源時從本地資源導入。
      Name:菜單名稱,默認名稱為:text名稱ToolStripMenuItem
      菜單項之間加分隔線:text欄輸入-
      應用實例:設計一個菜單,其中菜單欄包括:文件(新建、打開、保存、退出)、編輯(顏色、剪切、復制、粘貼)。而顏色又分為菜單項(紅色、綠色、藍色),單擊顏色項可設置文本框中文字顏色并選擇此項。單擊編輯菜單的其它項能執行相應的操作。
      見文件編輯菜單,程序為:
         Public Class Form1
          Private Sub 退出ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 退出ToolStripMenuItem.Click
              End
          End Sub
          Private Sub 紅色ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 紅色ToolStripMenuItem.Click
              TextBox1.ForeColor = Color.Red
              紅色ToolStripMenuItem.Checked = True
              藍色ToolStripMenuItem.Checked = False
              黑色ToolStripMenuItem.Checked = False
          End Sub
       
          Private Sub 藍色ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 藍色ToolStripMenuItem.Click
              TextBox1.ForeColor = Color.Blue
              紅色ToolStripMenuItem.Checked = False
              藍色ToolStripMenuItem.Checked = True
              黑色ToolStripMenuItem.Checked = False
          End Sub
       
          Private Sub 黑色ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 黑色ToolStripMenuItem.Click
              TextBox1.ForeColor = Color.Black
              紅色ToolStripMenuItem.Checked = False
              藍色ToolStripMenuItem.Checked = False
              黑色ToolStripMenuItem.Checked = True
          End Sub
       
          Private Sub 復制ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 復制ToolStripMenuItem.Click
              TextBox1.Copy()
          End Sub
       
          Private Sub 剪切ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 剪切ToolStripMenuItem.Click
              TextBox1.Cut()
          End Sub
       
          Private Sub 粘貼ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 粘貼ToolStripMenuItem.Click
              TextBox1.Paste()
          End Sub
       
          Private Sub 新建ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 新建ToolStripMenuItem.Click
              TextBox1.Text = ""
          End Sub
      End Class
      相關教程
      江苏快3 兴化 | 三亚 | 开封 | 吴忠 | 建湖 | 通辽 | 湖南长沙 | 毕节 | 白城 | 铜陵 | 桓台 | 海东 | 河源 | 苍南 | 海门 | 玉林 | 定西 | 慈溪 | 白山 | 怀化 | 惠州 | 莒县 | 任丘 | 三明 | 商丘 | 浙江杭州 | 河南郑州 | 玉溪 | 苍南 | 昌吉 | 怀化 | 张家界 | 琼海 | 洛阳 | 自贡 | 景德镇 | 攀枝花 | 咸阳 | 湖北武汉 | 包头 | 乐山 | 铜陵 | 常州 | 来宾 | 广汉 | 广汉 | 清远 | 宜昌 | 大丰 | 九江 | 单县 | 莱州 | 大丰 | 克拉玛依 | 顺德 | 承德 | 焦作 | 上饶 | 韶关 | 改则 | 莱州 | 云浮 | 阳泉 | 阳江 | 宁波 | 阿拉尔 | 五家渠 | 果洛 | 阿克苏 | 安岳 | 武安 | 海东 | 自贡 | 崇左 | 肇庆 | 徐州 | 鸡西 | 株洲 | 徐州 | 滁州 | 防城港 | 邹平 | 温岭 | 长垣 | 宁波 | 莱州 | 赣州 | 青海西宁 | 上饶 | 鄂州 | 济南 | 屯昌 | 广饶 | 汉中 | 台北 | 巴音郭楞 | 东营 | 莒县 | 苍南 | 乐清 | 佛山 | 赣州 | 临夏 | 盐城 | 黄石 | 大兴安岭 | 洛阳 | 潮州 | 文昌 | 屯昌 | 保定 | 邵阳 | 新泰 |