Cacher is the code snippet organizer for pro developers

<comboBox 
 id="myComboBox" 
 label="My ComboBox:"
 getItemLabel="CallbackCBGetItemLabel" 
 imageMso="PictureEffectsGlowGallery" 
 onChange="MyComboBoxCallbackOnChange" 
 sizeString= "WWWWWWWWWWWWW">
</comboBox>

Sub CallbackCBGetItemLabel(control As IRibbonControl, _
                           index As Integer, _
                           ByRef label)
    Select Case control.ID
        Case "myComboBox"
            label = DLookup("txtName", "tblPictures", _
                            "txtPicName='" & _
                            Format(index, "00") & "'")
    End Select
End Sub