程式
Private Sub Command1_Click()
Open "ica.txt" For Input As #1
Do While Not EOF(1)
Input #1, A, B, C, D, E
N = 1
If N <= 10 Then
V = (5 - 1) / 2
F = Abs(A - B)
G = Abs(B - C)
H = Abs(C - D)
I = Abs(D - E)
W = (F + G + H + I) / (5 - 1)
Y = (A + B - D - E) / ((1 + 2) * 2 * W)
picture1.PSet (N, Y)
N = N + 1
End If
Loop
Close #1
End Sub
---------------
程式有跑出圖了!!
但是...
他不是依照我要的123456789這樣跑
全部擠在一個小地方就結束了
新進展是快樂的!!有問題是煩惱的!!
--
有感情的生物是人,沒感情的生物是妖。
當妖有了感情之後~
他會是人妖!
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.130.37.76
※ 編輯: Cookiecs 來自: 140.130.37.76 (12/27 23:02)
討論串 (同標題文章)
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章