1樓：匿名使用者
dim lngwindowposition as longlngwindowposition = setwindowpos(pfrm.hwnd, hwnd_topmost, 0, 0, 0, 0, swp_nomove or swp_nosize)
end function
'private sub form_load()'putwindowontop me '總在最前面'end sub
2樓：匿名使用者
setwindow吧 好像是這個api 將窗體弄到最前 你查下
vb中怎樣製作一個計時器？ 能夠設定倒計時的時間，並進行倒計時
3樓：
1、開啟vb6.0，新建一個工程，在窗體中新增三個命令按鈕，caption分別改為「設定倒計時」、「啟動倒計時」、「繼續」，將窗體form1的caption屬性改為「倒計時」，新增一個計時器控制元件，新增一個文字框。
2、將文字框的text屬性清空，將字型font屬性調整為小四，便於觀察，將背景色屬性backcolor調為淺黃色。
3、雙擊「設定倒計時」命令按鈕，進入**編輯視窗。
4、雙擊「啟動倒計時」命令按鈕，進入**編輯視窗。
5、雙擊「計時器」控制元件，進入**編輯視窗。
6、在**編輯視窗的通用段進行變數定義：dim h as integer, m as integer, s as integer '分別儲存時分秒dim a as integer。
8、關閉**視窗，按下f5執行程式，單擊「設定倒計時」命令按鈕，彈出輸入對話方塊，此時輸入分鐘數為1，確定。
9、單擊「啟動倒計時」命令按鈕，文字框顯示倒計時時間，並時刻變動，至此實現了倒計時功能。
4樓：天天過節
用到三個控制元件：文字框（text1）、按鈕（command1）、計時器（timer1）
private sub command1_click()timer1.interval = 1000end sub
private sub timer1_timer()text1.text = val(text1.text) - 1if text1.
text < 1 thenmsgbox "時間到"
unload me
end if
end sub
5樓：弒神者是我
事先要在秒錶**調 enable屬性為false，interval屬性為1000
private sub command1_click()timer1.enabled = trueend sub
private sub timer1_timer()text1.text = val(text1.text) - 1if text1.
text < 1 thenmsgbox "時間到"
unload me
end if
end sub
6樓：匿名使用者
設定倒計時 開始時間t
for ，step -1
顯示 t-1s
next
vb怎麼在窗體上做時間顯示？
7樓：匿名使用者
vb可使用timer控制元件實現在窗體的標籤控制元件中顯示系統時間等資訊。
timer 控制元件，通過引發 timer 事件，timer 控制元件可以有規律地隔一段時間執行一次**。
實現**：
8樓：匿名使用者
實時的時間顯示需要一個計時器timer,，圖顯示的應該是狀態列，在timer事件裡改寫狀態列的內容。用now,time等等函式獲取的就是本機的時間。
記錄要有記錄首先要儲存這個時間，即表要增加專門的欄位來儲存這個時間。
9樓：匿名使用者
這個是狀態列控制元件、 關於記錄時間 那就要在資料庫增加 交易時間欄位 設定為預設：now
10樓：匿名使用者
-----------
text1=time '顯示時間 此為vb自帶'紀錄 顯示時間
text2= "賣出紅酒時間" & time
11樓：白龍無馬
.........
timer的interval設定為100
**label1.caption="當前時間"+time按鈕的**
list1.additem "在"+time+"我賣出了一瓶紅酒"
12樓：
不用計時器 ，給一個變數aa=time$就行 ，如果有時間比較，才用時間控制元件
vb如何用計時器控制窗體的顯示時間
13樓：匿名使用者
private sub form_load()timer1.enabled = true '啟動倒計時end sub
private sub timer1_timer()form1.hide '隱藏form1窗體
timer1.enabled = false '關閉倒計時end sub
還要把時間器的interval屬性設為時間，1000代表一秒，例如你要窗體顯示3秒後消失，那可以把interval屬性設為3000就行了！
14樓：匿名使用者
放1個timer,和1個label,
然後，private sub timer1_timer()label1.caption = cstr(now)end sub，
就會在label1顯示系統時間了。
這是我做vb系統經常乾的事情，呵呵
15樓：匿名使用者
private sub form_load()timer1.interval = 4000end sub
private sub timer1_timer()endend sub
這個程式用計時器設定4秒後結束！
VB的計時器怎樣能搞小動畫，VB的計時器怎樣能搞一個小動畫。
dim vy 自增量 private sub command1 click timer1.enabled not timer1.enabled end sub private sub form load vy 60 自增量 timer1.interval 100end sub private sub...
怎麼把PLC程式的定時器與計時器時間與計數功能顯示到觸控式螢幕上請大神幫
你可以把這兩個資料送到暫存器裡，然後在觸控式螢幕上選擇顯示的控制元件，然後將裡面的變數設定成那個暫存器就好了呀。你可以這樣試試.將定時時間用d區表示 將計數值用d區表示 直接用數字顯示元件連結定時器地址，例如t0 因為日系的定時器t都是顯示已經過去的定時時間，所以為了避免使用者的誤解，你可以使用減法...
馬拉松賽是如何計時的，馬拉松比賽用的計時器是怎麼樣的，是不是需要每個路段都需要掛一個。
馬拉松和短跑不一樣，它並不是以速度為先，而是以耐力為先。本身經過42公里的角逐，有一大批人已經掉隊，跑在前面的人也是稀稀拉拉。完全達不到像短跑那樣終點的競爭強度，所以馬拉松比賽一般只精確到秒就可以了。參加過馬拉松的人都知道，在賽前我們需要領取賽事舉辦方發給我們的裝備，這裝備裡面就有比賽短袖 賽事指南...