1樓:慕桖韓餘方
int a=textbox1.text,q=0,b=0,s=0,g=0;
q=a\1000;
b=(a\100)%10;
s=(a\10)%10;
g=a%10;
2樓:匿名使用者
千位:x.substring(0,1);
百位:x.substring(1,1);
十位:x.substring(2,1);
個位:x.substring(3,1);
vb操作題。設計一個程式,將從鍵盤輸入的四位數逆序輸出。
3樓:
private sub command1_click()
dim data(3)
data(0) = mid(text1.text, 1, 1) '取第
抄一位資料
data(1) = mid(text1.text, 2, 1) '取第二位資料
data(2) = mid(text1.text, 3, 1) '取第三位資料
data(3) = mid(text1.text, 4, 1) '取第四位資料
'提供兩種顯示方法:
'第一種算出結果
text2.text = data(3) * 1000 + data(2) * 100 + data(1) * 10 + data(0)
'第二種直接輸出
for i = 0 to 3
text3.text = text3.text & data(3 - i)
next i
end sub
4樓:匿名使用者
private sub command1_click()private sub command2_click()希望來回源
答對你有幫助
5樓:
aakk25588
6樓:世秀梅眭姬
搞個陣列,用一個整形變數當下標,每次加1,順序存放,然後將變數每次減1
反過來輸出到0結束就可以了。也就是像堆疊一樣訪問。
vb輸入一個四位數,輸出個位與千位交換後的數的程式是什麼?
隨機產生一個四位數的vb編碼 謝謝了
7樓:博爾思拓
1.隨機函式rnd()產生一個0-1之間(不含0和1)的隨機小數
2.int(rnd()*b+a)產生一個a(包括a)到a+b(不包括a+b)之間的整數,
如int(rnd()*40+60),產生60-99(包括99)之間的兩位數
3.但rnd()函式有個問題,必須在程式開始處加個randomize timer語句,否則每次執行時產生的第一個隨機數是相同的
private sub command1_click()
randomize
dim rd as integer
rd = int(rnd() * 10000+ 1000) ' 產生1000-9999 四位數
msgbox rd
end sub
8樓:匿名使用者
得看你的**怎麼寫的
0805組成最大的四位數是幾最小的四位數是幾組成四位數中只讀零的數有幾兩
0 8 0 5組成最大的四位數是8500,組成最小的四位數是5008。組成四位數只讀以後個零的有以下幾個數 8005 5008 8050 5080 最大四位數是8500 最小四位數是5008 最大 8500 最小 5008 只讀一個零 5008 5080 8005 8050 用9.7.0.0.組成不...
密室逃脫猜四位數密碼急求,密室逃脫猜四位數密碼急求
4572 你拿反了,粗線是橫,就是阿拉伯數字而已,望採納 265。h?玩密室逃脫根據這個提示得到的四位數密碼是什麼?密碼是2147。介紹bai 1 密室逃du脫 是一zhi款 風格的密室逃脫系列dao遊戲,容量高版達兩百 權多兆,遊戲的故事情節和畫面品質是毋庸置疑的。玩家所扮演的角色被困在了不知名的...
求四位數的數字密碼求一個四位數的數字密碼
一個四位數的數字密碼有很多,從0到9任意四個數字都排列組合成密碼,這就是你的祕密了!1314是個好記又有美好憧憬的密碼,就是太過簡單,容易讓人破解。數字密碼可以用自己的生日,紀念日,或者 號碼等的組合,或者自己的吉祥數字。密碼還是自己設定吧,不要求了。祝你好運 你自己密碼只有自己才能設,別人給你設密...