hi is there any chance I can extend the size of my combo box to hold
the relevant data
Code:
'populate combo box with available lists
Public Function GetRiskDetails(cboRiskName As ComboBox)
On Error GoTo Err_GetRiskDetails

    Dim rsSet As ADODB.Recordset
    Dim objCmd As Command
    Dim strRiskName As String
    
    Set rsSet = New ADODB.Recordset
    
    With rsSet
        .CursorLocation = adUseClient
        .LockType = adLockOptimistic
        .CursorType = adOpenDynamic
    End With
 
    Set objCmd = New Command
          With objCmd
            .ActiveConnection = gBass
            .CommandType = adCmdStoredProc
            .CommandText = "up_Sel_RisksDetails1"
          End With
    
    Set rsSet = objCmd.Execute
  
    cboRiskName.ColumnCount = 1
    cboRiskName.ColumnWidths = "3 cm"
    cboRiskName = ""
    
    'create drop down lists
    Do While Not rsSet.EOF()
        strRiskName = strRiskName & """" & rsSet!Name & """" & ";"
        rsSet.MoveNext
    Loop

    cboRiskName.RowSource = strRiskName
    
    'finished with object so de-allocate
    rsSet.Close
    
    Set objCmd = Nothing
        
Exit_GetRiskDetails:
    Exit Function

Err_GetRiskDetails:
   msgbox Err.Description
    Resume Exit_GetRiskDetails
    Resume
End Function
the above is used to populate a combo box with a lists of items but I get
and error 'the setting for the property is too long blah blah!!'

anyhelp ???