Windows API Guide: ACL Structure


Platforms

  • Windows 95: Supported.
  • Windows 98: Supported.
  • Windows NT: Requires Windows NT 3.1 or later.
  • Windows 2000: Supported.
  • Windows CE: Requires Windows CE 1.0 or later.

Description & Usage

The CB_GETLBTEXTLEN message retrieves the length of the text of one of the items in the list box portion of a combo box control. The reported length does not include its terminating null character. When determining how long to size a string to receive the list box item's text, remember to add one to include the null.

Return Value

If successful, the message returns the length of the list box item's text, not including the terminating null character. If an error occured, the message returns -1.

Visual Basic-Specific Issues

None.

Parameters

wParam
The zero-based index of the list box item to retrieve the length of the text of. (The first item has an index of 0, etc.)
lParam
Not used -- set to 0.

Constant Definitions

Const CB_GETLBTEXTLEN = &H149

Example

' This code is licensed according to the terms and conditions listed here. ' Declarations and such needed for the example: ' (Copy them to the (declarations) section of a module.) Public Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" (ByVal hWnd  _ As Long, ByVal Msg As Long, wParam As Any, lParam As Any) As Long Public Const CB_GETCURSEL = &H147 Public Const CB_GETLBTEXT = &H148 Public Const CB_GETLBTEXTLEN = &H149 ' Display the text of whatever item in combo box Combo1 ' is currently selected.  If no list box item is selected, say so. Dim index As Long       ' index to the selected item Dim itemtext As String  ' the text of the selected item Dim textlen As Long     ' the length of the selected item's text ' Determine the index of the selected item. index = SendMessage(Combo1.hWnd, CB_GETCURSEL, ByVal CLng(0), ByVal CLng(0)) ' Decide what to do based on that. Select Case index Case -1    ' No list box item was selected. Debug.Print "No list box item in the combo box is selected." Case Else  ' Some item is selected. ' Determine how long the item's text is. textlen = SendMessage(Combo1.hWnd, CB_GETLBTEXTLEN, ByVal CLng(index), ByVal CLng(0)) ' Make enough room in the string to receive the text, including the terminating null. itemtext = Space(textlen) & vbNullChar ' Retrieve that item's text and display it. textlen = SendMessage(Combo1.hWnd, CB_GETLBTEXT, ByVal CLng(index), ByVal itemtext) itemtext = Left(itemtext, textlen) Debug.Print "Selected item: "; itemtext End Select

See Also

CB_GETLBTEXT

Category

Combo Boxes

Back to the Message list.
Back to the Reference section.


Last Modified: April 16, 2000
This page is copyright © 2000 Paul Kuliniewicz. Copyright Information Revised October 29, 2000
Go back to the Windows API Guide home page.
E-mail: vbapi@vbapi.com Send Encrypted E-Mail
This page is at http://www.vbapi.com/ref/c/cb_getlbtextlen.html



Windows API Guide
Windows API Guide - Reference - Volume 1: Version 3.0 For the MS-DOS and PC-DOS Operating Systems
ISBN: B001V0KQIY
EAN: N/A
Year: 1998
Pages: 610

flylib.com © 2008-2017.
If you may any questions please contact us: flylib@qtcs.net