求人解這VB題目,VB的題目 幫幫我吧

2023-09-03 21:47:11 字數 1571 閱讀 4668

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程式設計題答案...