Textfile to MsChart

Ok I have the following code

Code:

---

Private Sub mnuGraphText_Click()
Dim Inputdata As String
Dim sMonth As String
Dim sSales As String
Dim pos1 As Integer
Dim pos2 As Integer
Open App.Path & "\sales.txt" For Input As #1
Do While Not EOF(1)
    Line Input #1, Inputdata
    pos1 = InStr(Inputdata, ",")
    sMonth = Mid$(Inputdata, 1, pos1 - 1)
    pos2 = InStr((pos1 + 1), Inputdata, ",")
    sSales = Mid$(Inputdata, (pos1 + 1), (pos1 + 1))
'    Debug.Print sMonth; sSales
Loop
Close #1
 
End Sub

---

As you can see that separates the data into a Month and a Sales figure.

No I need to plot that on an MSchart.

I know I need to make some kind of array but I'm a bit stuck. I also have 12 text boxes on the form for another feature, could I put the data into them then onto the chart or does that just not seem sensible...