Combobox - getItemScreenTip

 

ComboBoxDer Callback liefert jedem Control Item ein Screentip - String zurück.












Beispiel XML Ribbon Datei: 

<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" onLoad="CallbackOnLoad">
    <ribbon startFromScratch="false">
        <tabs>
            <tab id="MyTab" label="Beispiel ComboBox">
                <group id="MyGroup" label="Beispiel ComboBox">
                    <labelControl id="myLabel1" label="Beispiel:" />
                    <labelControl id="myLabel2" label="ComboBox" />
                    <comboBox id="myComboBox" label="Meine ComboBox:" 
                      showLabel="true" getItemImage="CallbackCBGetItemImage" 
                      getItemCount="CallbackCBGetItemCount" 
                      getItemLabel="CallbackCBGetItemLabel" 
                      getItemScreentip="CallbackCBGetItemScreentip" 
                      getItemSupertip="CallbackCBGetItemSupertip" 
                      getItemID="CallbackCBGetItemID" 
                      imageMso="PictureEffectsGlowGallery" 
                      onChange="MyComboBoxCallbackOnChange" 
                      sizeString= "WWWWWWWWWWWWW" 
                      getText="CallbackCBGetText">
                    </comboBox>
                </group>
            </tab>
        </tabs>
    </ribbon>
</customUI>

Funktion in einem Standardmodul:

Sub CallbackCBGetItemScreentip(control As IRibbonControl, _
                               index As Integer, _
                               ByRef screentip)
    ' Callback Liest den Screentip für ein Item
    ' aus der Tabelle und gibt diesen zurück
    Select Case control.ID
        Case "myComboBox"
            screentip = DLookup("txtName", "tblBilder", _
                                "txtPicName='" & _
                                Format(index, "00") & "'")
    End Select
End Sub



Sie finden dieses Beispiel auch in der Beispieldatenbank 2

 




Zurück