Adding Items to combo

Is there a way where I can read from a file and add each line of the file to a combo control?

Like this perhaps

Code:

---

Dim strLine As String
Dim intFile As Integer
intFile = FreeFile
Open "C:\MyFile" For Input As intFile
Do Until EOF(intFile)
    Line Input #intFile, strLine
    cmbCombo.AddItem strLine
Loop
Close intFile

---