VB PictureBox 畫點的問題

Question

我想要在 PictureBox 上畫上點，並且可以在點上寫上數字應該怎麼?
( 例如: 第1點寫上1，第2點寫上2......以此類推 )

ㄚ戊你寫的我不太懂ㄟ

Answer 1

Dim I As IntegerPrivate Sub Form_Load()    Picture1.AutoRedraw = True    Picture1.FillStyle = 0    I = 1End SubPrivate Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)    Dim R As Integer, S As String        With Picture1         S = I         R = .TextHeight(S)         If .TextWidth(S) > R Then R = .TextWidth(S)         R = R * Sqr(2) \ 2 '點的半徑        .FillColor = vbWhite '點的顏色          Picture1.Circle (X, Y), R, .FillColor '畫點(圓)         .CurrentX = X - .TextWidth(S) \ 2         .CurrentY = Y - .TextHeight(S) \ 2         Picture1.Print S    End With    I = I + 1End Sub

Answer 2

dim i '在最前面宣告為區域變數....pset (x,y)currentx=x+10i=i+1? i

2006-10-02 12:53:19 補充：
實際去做就會懂了吧...阿戊只是照你問的給方法及關鍵字...題目上也看不出你實際的做法呀!~