vb程式倒計時,在text1.text裡輸入時,在text2.text裡輸入分
1樓:網友
timer控制項。
每次一秒執行時,用乙個比如resecond變數儲存秒resecond--;
這是小時 / 3600);
這是分 % 3600 / 60);
這是秒 % 3600 % 60);
是c#**,vb也有相關。
vb text2.text框密碼輸入錯誤三次!退出程式!求**!
2樓:網友
有很多方法的。
初學者我這個方法容易懂。
宣告乙個全域性變數a
在窗體載入的時候給a賦值為0
下面是登入command加的**。
a=a+1if <>密碼 then
if a=3 then
msgbox "錯誤三次,程式退出!"
unload me
end if
msgbox "密碼錯誤"
exit sub
end if
vb程式倒計時,在text1.text裡輸入時,在text2.text裡輸入分,**等!!!~!!!!
3樓:網友
dim hh, mm, ss
sub timer1_timer()
text3 = iif(ss < 10, "0" & ss, "" & ss)
text2 = iif(mm < 10, "0" & mm, "" & mm)
text1 = iif(hh < 10, "0" & hh, "" & hh)
ss = ss - 1
if hh = 0 and mm = 0 and ss = -1 then
msg = "時間已到,按回車鍵結束!"
msgbox msg, 48, "注意"
end if
if ss = -1 and mm > 0 then mm = mm - 1: ss = 59
if mm = 0 and hh > 0 then hh = hh - 1: mm = 59
end sub
private sub command1_click()
hh = val(text1): mm = val(text2): ss = val(text3)
end sub
4樓:網友
private sub command1_click()= 1000
end sub
private sub timer1_timer()= cstr(cint(text3) -1)if cint( <= 0 then = "59"
倒計時到了。
if cint( = 0 then
0end if
秒到了減分。
if cint( <= 0 then text2 = cstr(cint( -1)
分到了減時。
if cint( <= 0 then text1 = cstr(cint( -1)
秒到了恢復到59
if cint( <= 0 then text3 = "59"
end sub
我測試了。可以。基本上就這個思路,具體的驗證什麼的你自己加。
vb中想要在text1中輸入三個數字,比如123,希望在text2中得到321,程式怎麼寫?
5樓:命幽
private sub command1_click()end sub
需要兩個文字框控制項和乙個命令按鈕控制項,單擊按鈕即可這個是直接使用反序輸出字元函式將文字框1的內容反序顯示在文字框2知道965...的網友他的**頁可以實現反序輸出字元的功能。
求vb程式 任意輸入5個字母,逆向輸出 ,輸入視窗為text1,輸出視窗為text2,程式在command裡
6樓:科技程式迷
請等下哦。。。
簡單的**就這點:
private sub command1_click()dim strings as stringstrings =
for i = len(strings) to 1 step -1= & mid(strings, i, 1)next
end sub
你可以改進一下,比如限制輸入的字元為字母,輸入的字元長度5等等。
如何在lua程式中呼叫另外lua檔案中的全域性變數
直接require那個lua檔案,然後呼叫。xlua 的lua檔案呼叫另乙個lua的變數 推薦你去csdn或部落格園的論壇版塊問這個問題 這個應該是宿主程式實現的。也有可能是所有的指令碼都是載入了在一起 這個你得看宿主是怎麼處理 lua 如何引用乙個變數 lua中,函式引數為布林 數值 串等時是傳值...
如何在Windows系統中安裝驅動程式
windows系統下快速安裝驅動程式方法,聯想原廠系統還原 怎樣在microsoft windows7中安裝硬體驅動程式 進行硬體識別,發現新硬體,可以自動安裝匹配的驅動程式或是上網尋找相應的驅動程式,確認安全的前提下,可以進行安裝。裝置安裝上去,在裝置管理器中未安裝驅動顯示未知裝置且有歎號,雙擊在...
如何在vb的窗體中併排輸入兩個矩陣?
使用vscroll和hscroll控制項,在其scoll事件中加入 舉例如 dim x as control for each x in next vb中在窗體中的frame1中輸出乙個矩陣的 怎麼實現?vb試題 程式功能為單擊窗體時將矩陣a的轉置矩陣存入b陣列中並輸出。vb求兩個矩陣的和 例如a ...