Transcript 程式設計：VB的小時鐘製作及功能表製作加其他

萬芳國二電腦課
j201~j212
程式設計-第02節課
小時鐘製作步驟一：
拉出小時鐘，並將 intervla 的值，更改為 1000，
表示為一秒。
小時鐘製作步驟二：
拉出 label【要注意物件的名稱】 的物件，並更改其屬性。
BackStyle，是否有更改為透明，在美觀的考量下，請自行決定是否更改。
BackColor，可以更改背景的顏色。另外字體顏色的更改之屬性名稱和表單檔相同。
步驟三：在小時鐘上方用滑鼠快速點兩下，如下
Private Sub Timer1_Timer()
End Sub
步驟四：寫下程式碼
注意事項：如果先寫程式碼而沒有拉物件的話，會視同無效
Private Sub Timer1_Timer()
label1.caption = time
End Sub
步驟五：按下執行鍵，觀察時鐘是否會動
備註：可更改為 form1.caption = “現在時間” & now
功能表製作說明
步驟一：工具\功能表編輯器
步驟二：視窗如下所示
上下左右之控制
左右為調整階層
上下為調整順序
要注意標題與名稱，不可以和原來其他物件的名稱重覆
步驟三：輸入所要的資訊
步驟四：
按下確定鍵後，所產生的圖示表單，再至上方一下
步驟五：
重新進入功能表編輯器更改內容，並觀察其結果
步驟六：
在自製的功能表表單用滑鼠點下 其他\結束
步驟七：寫下結束 end 的指令，並注意一下
自己之前命名出來的。
Private Sub over_Click()
End
End Sub
over_Click() 的 over是你
步驟八：測試呼叫微軟的應用程式：
筆記本範例：
Private Sub note_Click()
ret = shell("notepad.exe")
End Sub
格式說明：
ret = shell(“檔案路徑\檔案名稱”)
小畫家之範例：
Ret = shell(“c:\windows\system32\mspaint.exe”)
步驟九：
如果要增加出其他表單，並編寫程式時，按下新
增表單的圖示，此時會增加一個對話視窗，並會
在專案視窗多一個表單
步驟十：呼叫出表單的語法 表單名稱.Show
Private Sub sun_sub_mub_d_Click()
Form2.Show
End Sub
備註：不一定要打form2.show
它的格式是
表單名稱.show