求大神们帮帮忙！！急！visual basic问题！！

KingOfFairy

求大神帮帮忙！！b的total time 和 c 的 height table不懂怎么做！！跪求大神帮我写个code来，做很就可就是做不到，拜一要交啊！！

yan13

我想你應該懂功課要自己做的
不過看到你的功課我有點手癢,就做了
code

1.         Dim fInterval, fHeight, fInitialHeight, fSecond, fInitialVelocity As Single
   
2.         fInitialHeight = 0
   
3.         fInitialVelocity = 148
   
4. 
   
5.         fSecond = 0.25
   
6.         fInterval = 0.25
   
7.         TextBox3.Text = "Time(s)" & vbTab & "Height of the ball(ft)"
   
8.         fHeight = fInitialHeight + (fInitialVelocity * fSecond) - (16 * fSecond * fSecond)
   
9. 
   
10.         Do While fHeight >= 0 And fSecond > 0 And fSecond <= 5
    
11.             TextBox3.Text = TextBox3.Text & vbCrLf & fSecond & vbTab & fHeight
    
12.             fSecond = fSecond + fInterval
    
13.             fHeight = fInitialHeight + (fInitialVelocity * fSecond) - (16 * fSecond * fSecond)
    
14.         Loop

复制代码

result

1. Time(s)        Height of the ball(ft)
   
2. 0.25        36
   
3. 0.5        70
   
4. 0.75        102
   
5. 1        132
   
6. 1.25        160
   
7. 1.5        186
   
8. 1.75        210
   
9. 2        232
   
10. 2.25        252
    
11. 2.5        270
    
12. 2.75        286
    
13. 3        300
    
14. 3.25        312
    
15. 3.5        322
    
16. 3.75        330
    
17. 4        336
    
18. 4.25        340
    
19. 4.5        342
    
20. 4.75        342
    
21. 5        340

复制代码

筆算
0 = 0 + (48*t) - (16*t*t)
16tt = 48t
16t =48
t = 9.25 秒

你改改一下吧,不懂你的導師有什麼其他的要求.
順便問問,是大陸人嗎?
什麼課程?diploma?degree?
看到他用feet單位.是在马來西亞的嗎?雙聯課程?
順便提一提,他的hint有點怪,不過為了分數,老師總是對的,你可以用excel做,如果有分數的話.
b的approximately也有點怪,數學中好像很少用到這個,除非是approximately in second.不過我也不太肯定,太久沒接觸數學了,這也是我手癢的原因.

gkheng2003

国际学校的题目？us syallbus？

KingOfFairy

yan13 发表于 21-6-2013 05:48 PM
我想你應該懂功課要自己做的
不過看到你的功課我有點手癢,就做了
coderesult筆算

很谢谢你啊～！我是马来西亚人，我是在沙捞越读了，我做这个已经做很久了，真的做不到才没法只能到这里开贴请教，因为老师说要自己做不要给我们帮忙，由于还有别的assignment要做而且也是下个礼拜要交，真没办法了。。。我也剩者科的做不到，老师上课也没什么教，也罢，反正进学院什么都要靠自己了。。。我是读diploma的。。很感谢您！！！

yan13

不客氣.
把 do while loop 裡的 And fSecond <= 5 拿掉,就是b的 total time 了,本來想讓你自己摸索,可以學多點.

KingOfFairy

yan13 发表于 21-6-2013 11:20 PM
不客氣.
把 do while loop 裡的 And fSecond

哈哈，谢谢，我做完了XD!感恩