Run Time error '383' 'Text' property is read-only

[lotus18]

Hello everyone!!!

I have a problem in retrieving starttime and the endtime values. Can anyone help me to solve this problem? Here's my sample codes:

 
'==================
from frmSchedules
'==================
 
SetConnection
CheckConnection rs
    rs.Open "Select * From LoadSchedules Where ScheduleID='" & ID & "'", _
    adConnection, 1, 1
    With ScheduleEntry
        .txtScheduleID.text = rs!ScheduleID
        .txtCourse.text = rs!Courses
        .txtSection.text = rs!Sections
        .txtSemester.text = rs!Semester
        .cboSubjectCode.text = rs!SubjectCode
        .txtDescription.text = rs!Description
        .cboRoom.text = rs!Rooms
        .cboDay.text = rs!Days
        .cboStartTime.text = rs!StartTime   '<-----Run Time error '383' 
        .cboEndTime.text = rs!EndTime      '<-----Run Time error '383' 
        .Show 1
    End With
 
'==================
from frmScheduleEntry
'adding items to the starttime and endtime comboboxes
'==================
 
Sub LoadStartTime()
    Dim t As Date
    Dim i As Integer
    t = CDate("07:00:00")
    Do
        t = DateAdd("n", 30, t)
        cboStartTime.AddItem Format(t, "h:mm AM/PM")
        i = i + 1
    Loop Until i >= 26
End Sub
 
Sub LoadEndTime()
    Dim t As Date
    Dim i As Integer
    t = CDate("07:30:00")
    Do
        t = DateAdd("n", 30, t)
        cboEndTime.AddItem Format(t, "h:mm AM/PM")
        i = i + 1
    Loop Until i >= 26
End Sub
 

I check the data of start time and the end time in the table and it matches with the items on the comboboxes. I don't know why this error occurred.

[AHMEDYO]

HI..

i think that you trying to set Text property value in Combo Box control, then this error appear because you set Style property to "2" = DropDownList, this style disallow change of text property, you can change style to any other style, or instead if your data withing the combo box list you can use ListIndex property to select this item.


Best Regards

[lotus18]

HI..

i think that you trying to set Text property value in Combo Box control, then this error appear because you set Style property to "2" = DropDownList, this style disallow change of text property, you can change style to any other style, or instead if your data withing the combo box list you can use ListIndex property to select this item.


Best Regards

Hi

I tried these codes to my other programs and it work. My combobox style property = 2 (DropDownList) and the items of the combobox was retrieved from the database. But now, the items from the combobox are adding during run time. Well, I guess I need to use the ListIndex Property