Public Sub tuxiang(ByVal fq, v1, v2, vmin As Single)
xiansu = 80
For v = vmin To v1 Step 0.1 '速度v，
f = fq
pic1.PSet (v, f), vbBlue
Next v
For v = v1 To v2 Step 0.1
f = (fq * v1) / v
pic1.PSet (v, f), vbBlue
Next v
For v = v2 To xiansu Step 0.1
f = ((fq * v1) / v) * (v2 / v)
pic1.PSet (v, f), vbBlue '畫出最終影像
Next v
End Sub
本人想把算出的資料存盤到一個access表中，然后再在以下程式中呼叫剛剛存盤的資料進行運算
Public Sub sv(ByVal fq, v1, v2, vmin As Single)
v22 = 0
v11 = 0
s11 = 0
Do While v22 < 80
For v = vmin To v1 Step 0.1 '速度v，
f = fq
aa = (f - (a + b * v11 + c * v11 * v11)) / 108
v22 = v11 + aa * 0.1
s22 = s11 + ((v22 * v22 - v11 * v11) / 2 * aa)
Pic3.PSet (v2, s2), vbRed
v11 = v22
s11 = s22
Loop
End Sub
請問怎么寫程式
uj5u.com熱心網友回復：
百度搜相關關鍵字。uj5u.com熱心網友回復：
目測你畫圖和處理資料的部分都已經OK了就差從資料庫取資料。不是幾句話能夠解答的了，建議你先查閱資料，看看怎么用VB訪問資料庫，
uj5u.com熱心網友回復：
啥, 還有這種撩妹自的招數?下次俺也發個貼: 求妹子, 本人VB老臘腸一條
順便看了看樓主的貼子...大概是有很多資料, 計算, 存資料庫, 畫圖.
這程式作業量說大不大說小不小, 看樓主的代碼可能剛接觸VB不久.
就從資料庫基本操作和VB影像這些開始邊學邊用吧, 勤快點一個月能上手了.
uj5u.com熱心網友回復：
其實，程式猿界的小鮮肉只有一種鳥肉，又稱“菜鳥”。轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/46891.html
標籤：VB基礎類
上一篇：想做一個壓力檢測系統,不知道是用VC還是VB呢 還是SCADA
下一篇：VB程式運行問題