vb中下拉式組合框添加內(nèi)容 如何設(shè)置combobox下拉框的內(nèi)容?
如何設(shè)置combobox下拉框的內(nèi)容?設(shè)置中combobox下拉框的內(nèi)容方法:,vb2010怎么把工具箱固定在右側(cè)?里面的窗口可不可以固定住,不要一雙擊就最大化?點(diǎn)那個(gè)下拉三角里面的東西就這個(gè)可以實(shí)現(xiàn)
如何設(shè)置combobox下拉框的內(nèi)容?
設(shè)置中combobox下拉框的內(nèi)容方法:,
vb2010怎么把工具箱固定在右側(cè)?里面的窗口可不可以固定住,不要一雙擊就最大化?
點(diǎn)那個(gè)下拉三角里面的東西就這個(gè)可以實(shí)現(xiàn)固定不動的
怎樣用做記事本?
步驟一:繪制的界面。
新建一個(gè)標(biāo)準(zhǔn)EXE工程,將其Caption屬性替換成“全記事本”,然后點(diǎn)擊Icon屬性給它找個(gè)適合的Icon圖標(biāo)。左鍵單擊菜單“工程”-“部件”,在彈出來的“部件”對話框里找到Microsoft RichText Box6.0和公共對話框Microsoft Common Dialog6.0并鼠標(biāo)右鍵點(diǎn)擊它們,右擊“可以確定”按鈕。過了一會兒左邊的工具欄上直接出現(xiàn)了我們上次新添的兩個(gè)控件了。在窗體上繪制RichTextBox和CommnDialog,其中RichTextBox的大小和位置可不用理睬,我們將在代碼中一次性處理它,當(dāng)然,有必要把它的ScrollBar屬性設(shè)為2-rtfVertical,這樣的話在然后打開和編輯文件時(shí)垂直滾動條才和用。
步驟二:編輯菜單。
按CtrlE菜單菜單編輯器,我們來做追加幾個(gè)菜單:
一.文件菜單:
文件(第一層)mnuFile
空白文檔(第二層)mnuNew
打開(第二層)mnuOpen
存放(第二層)mnuSave
-(第二層)mnuFileSep(分隔線)
后退(第二層)mnuExit
二.編輯菜單:
可以編輯(第一層)mnuEdit
復(fù)制(第二層)mnuCopy
剪切粘貼(第二層)mnuCut
ctrl v粘貼(第二層)mnuPaste
-(第二層)mnuEditSep(分隔線)
選中全部(第二層)mnuSelecAll
三.搜索菜單:
搜索(第一層)mnuSearch
查看(第二層)mnuFind
查看下一個(gè)(第二層)mnuFindOn
四.幫菜單:
好處(第一層)mnuHelp
使用說明(第二層)mnuUsage
關(guān)于(第二層)mnuAbout
(注:各菜單項(xiàng)的快捷鍵請一一設(shè)置里)
那樣最好,其它的菜單項(xiàng)以后再參照要添加?,F(xiàn)在再次進(jìn)入:
步驟三:編寫代碼。
聲明直接輸入變量
DimsFindthoughString
聲明文件類型
DimFileType,FiTypeasString
系統(tǒng)初始化程序
Private Sub Form_Load()
設(shè)置中程序啟動后時(shí)的大小
Me.Height6000
Me.Width9000
EndSub
設(shè)置編輯框的位置和大小
PrivateSubForm_Resize()
OnErrorResumeNext出錯(cuò)全面處理
RichTextBox1.Left20
RichTextBox1.Height ScaleHeight-40
RichTextBox1.WidthScaleWidth-40
EndSub
剛建文件
Private Sub mnuNew_Click()
RichTextBox1.Text