vb 程式中,如何在TEXT2中依次輸入LABEL1和TEXT2的內容

2025-03-26 14:15:10 字數 2255 閱讀 5649

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 ...