15電氣 齊振昊 實驗名稱 在VB中製作計時器

2021-07-10 15:07:32 字數 885 閱讀 5126



實驗名稱:在

vb中製作計時器

實驗步驟:

在桌面中雙擊

vb6.0

開啟程式。

在工具箱視窗找到計時器

timer

的圖示,單擊圖示並在窗體中建立計時器。

在窗體中雙擊計時器圖示,在彈出的對話方塊中輸入「螢幕

1.caption=time( )」

然後關閉視窗。

選定計時器

timer

,在屬性視窗中找到

interval

並將後面的數值改為

1000。

在工具箱視窗找到

label

,單擊圖示並在窗體中建立,在屬性視窗中找到「名稱」一欄並將後面改為「螢幕

1」。在工具欄中單擊「啟動」即可出現效果。

在工具箱視窗找到

command button

的圖示,單擊圖示並在視窗中建立,在屬性視窗中找到

caption

並把其後面改為「停止」。

在窗體中找到「停止」並雙擊,輸入「

me.timer1.enable=false」,

然後關閉視窗。在工具欄中單擊「啟動」即可出現效果。

在工具箱視窗找到

command button

的圖示,單擊圖示並在視窗中建立,在屬性視窗中找到

caption

並把其後面改為「重新開始」。

在窗體中找到「重新開始」並雙擊,輸入「

me.timer1.enable=ture」,

然後關閉視窗。

在工具欄中單擊「啟動」即可出現效果。

2016

物理與電子資訊學院

15電氣1班

齊振昊15050341022

15 電氣 齊振昊 在VB中把最小的數排到最後

1.首先開啟vb6.0 2.在窗體的適當位置建立乙個commandbutton,並在其屬性視窗中將caption改為 排序最小的數 3.在窗體中雙擊 排序最小的數 並在彈出的對話方塊中輸入 如下 private sub command1 click clsdim n as integer dim w...

15電氣李丹 10個隨機數求和

1.開啟vb6.0 2.窗體上插入一command button,雙擊並輸入 一 二 三 private sub command1 click dim i as integer dim a as integer sum 0 for i 1 to 10 randomize a int 1000 rnd...

15電氣李丹 給任意幾個數按大小排序

給任意幾個數按大小排序 1.開啟桌面上的vb6.0 2.在窗體插入乙個commandbutton,名稱預設為command1 3.在窗體中插入乙個textbox,名稱預設為text1 4.雙擊窗體中的command1 輸入 option base 1 private sub command1 cli...