vb題目求解
1樓:匿名使用者
完整**如下:
dim s1, s2, l as doubledim i as integer
l = 1 +
s1 = 0
for i = 1 to 24
s1 = s1 + 1000 * l ^ i - 1)next i
s2 = 0
for i = 1 to 24
s2 = s2 + 1000 + i - 1) *100next i
if s1 > s2 then
msgbox "選擇a公司"
elsemsgbox "選擇b公司"
end if
執行結果顯示選擇:a
2樓:我tm不管
private sub form_click()print "加工資的方式a:"
salary = 1000
for i = 1 to 24
salary = round(salary *print "第" &i & 個月:" salarysuma = suma + salary
nextprint "加工資的方式a24個月工資總和:" sumaprint ""
print "加工資的方式b:"
salary = 1000
for i = 1 to 24
salary = salary + 100print "第" &i & 個月:" salarysumb = sumb + salary
nextprint "加工資的方式b24個月工資總和:" sumbprint ""
print "加工資的方式a與加工資的方式b的差額:" suma - sumb
end sub
vb的題目 幫幫我吧
3樓:婁方咎怡璐
1,c邏輯運算子的優先順序最低。
在邏輯運算中not最高接著是and
2,b0是他的預設值,代表未被選中。
2代表灰色。
3,d4,不會。
5,d6,沒題。
7,b8,d拖動滑塊會觸發scroll事件,改變屬性是會觸發change,其他的不是它的事件。
9,c2為下拉式。
1為簡單組合框。
0為下拉式組合框。
10,dvb的變數是以字母或漢字開頭由數字,下劃線,字母組成。
11,錯。12,13,對。
14,對。15,錯。
要為非016,錯。
20,錯。沒寫的都不會,寫了的都是挺簡單的啊。
vb題目,求解題過程~
4樓:網海1書生
這其實就是計算 1 + 1*2 + 1*2*3 + 1*2*3*4 的值,外層迴圈把i從1迴圈到4,內層迴圈則從1累乘到i,最後把積累加起來。
也就是說,當i=1時,t=1,s=0+1=1當i=2時,t=1*2=2,s=1+2=3當i=3時,t=1*2*3=6,s=3+6=9當i=4時,t=1*2*3*4=24,s=9+24=33所以最終s的值是33
VB題目,求大佬,如圖,vb題目求大佬解答
private sub mand1 click 生成20個20 80之間隨機數,按每行5個數輸出到窗體 me.cls dim a 20 dim i as integer for i 0 to 19 randomize a i int rnd 80 20 1 20 if i 0 and i mod 5...
兩個VB題目
2 新建一個工程,文字框text1,使使用者輸入字母一律轉換為大寫顯示 焦點在最右端 儲存。text1.text ucase text1.text 轉換為大寫 text1.selstart len text1.text 游標移到最右端 4 新建一個工程,在form1介面建立form2,form3兩個...
一道vb題目,求大神幫忙,急一道vb題目,求大神幫忙!
這個彎路繞大了,36!3.71993e 41,是個億億億億億級的數字,vb中沒有什麼資料型別能精確存放它的結果,而36 7 36 7 只需要算 36 35 34 33 32 31 30 1 2 3 4 5 6 7 就行了。記住你了,以後再也不會鳥你的問題了,回答我也刪除掉 急求一道vb程式設計題答案...