Error msg help wanted

[azwildcat4ever]

my application is giving a run-time error '383'
'Text' Property is read-only.


I am getting this error while I am trying to close and save the working data. I am fairly new to VB.. THanks in advance

CODE:******************************
Private Sub FileClose_Click()
If GlobalVar.MainDBName = "" Then Exit Sub

a = MsgBox("Would you like to save before closing?", vbYesNoCancel)
If a = vbYes Then
Call FileSave_Click
End If
If a = vbCancel Then
Exit Sub
End If

Combo1.Clear
Combo1.Text = "" ->ERROR REPORTED HERE
TV.Nodes.Clear
Text3.Text = ""
FGActions.Rows = 1
FGSum.Rows = 1
Text21.Text = ""
Text22.Text = ""
Text23.Text = ""
FGATeam.Rows = 1
FGATeam.Rows = 15


End Sub



Private Sub FileSave_Click()
If GlobalVar.MainDBName = "" Then Exit Sub
SaveAssemTree Combo1.Text
SaveATeamGenInfo GlobalVar.MainDBName
End Sub

[Buzby]

the combo must be set to Style 2 - DropDownList. This means the user can't change the text in the textbox part of the control, and neither can your code.
Either change the style back to 0 - Dropdown combo or remove the Combo1.Text = "" line from your code.

[azwildcat4ever]

it worked removing that line

thank you much