成人AV在线无码|婷婷五月激情色,|伊人加勒比二三四区|国产一区激情都市|亚洲AV无码电影|日av韩av无码|天堂在线亚洲Av|无码一区二区影院|成人无码毛片AV|超碰在线看中文字幕

vb中下拉式組合框添加內(nèi)容 如何設(shè)置combobox下拉框的內(nèi)容?

如何設(shè)置combobox下拉框的內(nèi)容?設(shè)置中combobox下拉框的內(nèi)容方法:,vb2010怎么把工具箱固定在右側(cè)?里面的窗口可不可以固定住,不要一雙擊就最大化?點那個下拉三角里面的東西就這個可以實現(xiàn)

如何設(shè)置combobox下拉框的內(nèi)容?

設(shè)置中combobox下拉框的內(nèi)容方法:,

vb2010怎么把工具箱固定在右側(cè)?里面的窗口可不可以固定住,不要一雙擊就最大化?

點那個下拉三角里面的東西就這個可以實現(xiàn)固定不動的

怎樣用做記事本?

步驟一:繪制的界面。

新建一個標(biāo)準(zhǔn)EXE工程,將其Caption屬性替換成“全記事本”,然后點擊Icon屬性給它找個適合的Icon圖標(biāo)。左鍵單擊菜單“工程”-“部件”,在彈出來的“部件”對話框里找到Microsoft RichText Box6.0和公共對話框Microsoft Common Dialog6.0并鼠標(biāo)右鍵點擊它們,右擊“可以確定”按鈕。過了一會兒左邊的工具欄上直接出現(xiàn)了我們上次新添的兩個控件了。在窗體上繪制RichTextBox和CommnDialog,其中RichTextBox的大小和位置可不用理睬,我們將在代碼中一次性處理它,當(dāng)然,有必要把它的ScrollBar屬性設(shè)為2-rtfVertical,這樣的話在然后打開和編輯文件時垂直滾動條才和用。

步驟二:編輯菜單。

按CtrlE菜單菜單編輯器,我們來做追加幾個菜單:

一.文件菜單:

文件(第一層)mnuFile

空白文檔(第二層)mnuNew

打開(第二層)mnuOpen

存放(第二層)mnuSave

-(第二層)mnuFileSep(分隔線)

后退(第二層)mnuExit

二.編輯菜單:

可以編輯(第一層)mnuEdit

復(fù)制(第二層)mnuCopy

剪切粘貼(第二層)mnuCut

ctrl v粘貼(第二層)mnuPaste

-(第二層)mnuEditSep(分隔線)

選中全部(第二層)mnuSelecAll

三.搜索菜單:

搜索(第一層)mnuSearch

查看(第二層)mnuFind

查看下一個(第二層)mnuFindOn

四.幫菜單:

好處(第一層)mnuHelp

使用說明(第二層)mnuUsage

關(guān)于(第二層)mnuAbout

(注:各菜單項的快捷鍵請一一設(shè)置里)

那樣最好,其它的菜單項以后再參照要添加?,F(xiàn)在再次進(jìn)入:

步驟三:編寫代碼。

聲明直接輸入變量

DimsFindthoughString

聲明文件類型

DimFileType,FiTypeasString

系統(tǒng)初始化程序

Private Sub Form_Load()

設(shè)置中程序啟動后時的大小

Me.Height6000

Me.Width9000

EndSub

設(shè)置編輯框的位置和大小

PrivateSubForm_Resize()

OnErrorResumeNext出錯全面處理

RichTextBox1.Left20

RichTextBox1.Height ScaleHeight-40

RichTextBox1.WidthScaleWidth-40

EndSub

剛建文件

Private Sub mnuNew_Click()

RichTextBox1.Text