如何設(shè)置記事本格式編程？步驟一：繪制界面?！　⌒陆ㄒ粋€標(biāo)準(zhǔn)EXE工程，將其Caption屬性改為“超級記事本”，點(diǎn)擊Icon屬性給它找個合適的Icon圖標(biāo)。單擊菜單“工程”-“部件”，在彈出的“部件”

如何設(shè)置記事本格式編程？

步驟一：繪制界面。

　　新建一個標(biāo)準(zhǔn)EXE工程，將其Caption屬性改為“超級記事本”，點(diǎn)擊Icon屬性給它找個合適的Icon圖標(biāo)。單擊菜單“工程”-“部件”，在彈出的“部件”對話框里找到Microsoft

　　RichText Box 6.0和公共對話框Microsoft Common Dialog 6.0并選中它們，單擊“確定”按鈕。這時左邊的工具欄上出現(xiàn)了我們剛才新添的兩個控件了。在窗體上繪制RichText

　　Box和Commn Dialog，其中RichText Box的大小和位置可不用理睬，我們將在代碼中處理它，當(dāng)然，有必要把它的ScrollBar屬性設(shè)為2-rtfVertical，這樣在打開和編輯文件時垂直滾動條才可用。

　　步驟二：編輯菜單。

　　按Ctrl E調(diào)出菜單編輯器，我們來做如下幾個菜單：

　　一.文件菜單：

　　文件（第一層） mnuFile

　　新建（第二層） mnuNew

　　打開（第二層） mnuOpen

　　保存（第二層） mnuSave

　　- （第二層） mnuFileSep (分隔線）

　　退出（第二層） mnuExit

　　二.編輯菜單：

　　編輯（第一層） mnuEdit

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

　　剪切（第二層） mnuCut

　　粘貼（第二層） mnuPaste

　　- （第二層） mnuEditSep （分隔線）

　　全選（第二層） mnuSelecAll

　　三.搜索菜單：

　　搜索（第一層） mnuSearch

　　查找（第二層） mnuFind

　　查找下一個（第二層） mnuFindOn

　　四.幫助菜單：

　　幫助（第一層） mnuHelp

　　使用說明（第二層） mnuUsage

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

　　(注：各菜單項的快捷鍵請自行設(shè)置)

　　好了，其它的菜單項以后再根據(jù)需要添加?，F(xiàn)在進(jìn)入：

　　步驟三：編寫代碼。

　　聲明查找變量

　　Dim sFind As String

　　聲明文件類型

　　Dim FileType, FiType As String

　　初始化程序

　　Private Sub Form_Load()

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

　　Me.Height 6000

　　Me.Width 9000

　　End Sub

　　設(shè)設(shè)置編輯框的位置和大小Private Sub Form _ Resize()On Error Resume Next錯誤處理rich textbox 1 . left 20 rich textbox 1 . Height Scale Height-40 rich textbox 1。Width Scale Width-40 end Sub New File Private Sub Mn Unew _ click()rich t

jdk安裝完成后怎么寫代碼？