Nas�l bir yatay kayd�rma �ubu�u i�in bir Visual Basic ListBox eklenir.

Makale numaras�: 192184 - Bu makalenin ge�erli oldu�u �r�nleri g�r�n.

Otomatik terc�me makalelerin ne oldu�unu a��klayan yaz�y� okumak i�in buraya t�klay�n

�ngilizce ve T�rk�e'yi yan yana g�r�nt�leme

Buraya t�klayarak �ngilizce ve T�rk�e'yi yan yana g�r�nt�leyebilirsiniz.

Hepsini a� | Hepsini kapa

Visual Basic for Windows ile gelen normal liste kutusuna yatay kayd�rma �ubu�u yok. Bu, liste s�n�rlar� bir ListBox ��eyi geni�letir, bir sorun olabilir. Denetimin yatay kayd�rma �ubu�u eklemek i�in <a0></a0>, LB_SETHORIZONTALEXTENT sabit ile Windows API SendMessage i�levini �a��rabilirsiniz.

�ste | Geri Bildirim Ver

Daha fazla bilgi

Bu ileti, olarak bir ListBox yatay kayd�rma yapabilirsiniz piksellerindeki geni�li�i ayarlar. Liste Geni�li�i bu de�erden daha k��kse, yatay liste ��eleri kayd�rma izin vermek i�in yatay kayd�rma �ubu�u eklenir.

Ad�m ad�m �rnek

Yeni bir proje standart exe DOSYAS�, Visual Basic'te olu�turun. Varsay�lan olarak, Form1 olu�turulur.
Bir KomutD��mesi ve bir ListBox Form1'e ekleyin.

Form1'�n genel bildirimi b�l�m�ne a�a��daki kodu yap��t�r�n:

      Option Explicit

      Private Declare Function SendMessageByNum Lib "user32" _
        Alias "SendMessageA" (ByVal hwnd As Long, ByVal _
        wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
      Const LB_SETHORIZONTALEXTENT = &H194

      Private Sub Command1_Click()
         Dim s As String
         Static x As Long
         s = InputBox("Please enter any text", "List scroll", _
           "this is a simple scrollbar sample for demonstration purposes")
         List1.AddItem s
         If x < TextWidth(s & "  ") Then
            x = TextWidth(s & "  ")
           If ScaleMode = vbTwips Then _
               x = x / Screen.TwipsPerPixelX  ' if twips change to pixels
           SendMessageByNum List1.hwnd, LB_SETHORIZONTALEXTENT, x, 0
         End If
      End Sub

Projeyi �al��t�r�n ve �zerinde Command1'� t�klat�n. Liste kutusuna eklenecek bir metin dizesi girmeniz istenir. Bir dize her giri�inizde kodu �nceki en uzun dize uzun oldu�undan ve kayd�rma �ubu�unun gerekti�inde ayarlayaca��na bakar.

�ste | Geri Bildirim Ver

Referanslar

Visual Basic 16-bit s�r�mlerinde bu g�revi ger�ekle�tirme hakk�nda daha fazla bilgi i�in l�tfen Microsoft Knowledge Base'de a�a��daki makaleye bak�n:

80190
(http://support.microsoft.com/kb/80190/EN-US/ )
: Nas�l yatay bir kayd�rma �ubu�u i�in Visual Basic ListBox eklenir.

�ste | Geri Bildirim Ver

�zellikler

Makale numaras�: 192184 - Son G�zden Ge�irme: 15 Temmuz 2004 Per�embe - G�zden ge�irme: 3.2

Bu makaledeki bilginin uyguland�� durum:

Microsoft Visual Basic 5.0 Learning Edition
Microsoft Visual Basic 6.0 Learning Edition
Microsoft Visual Basic 5.0 Professional Edition
Microsoft Visual Basic 6.0 Professional Edition
Microsoft Visual Basic 5.0 Enterprise Edition
Microsoft Visual Basic Enterprise Edition for Windows 6.0

kbmt kbhowto KB192184 KbMttr

Otomatik Terc�me

�NEML�: Bu makale, bir ki�i taraf�ndan �evrilmek yerine, Microsoft makine-�evirisi yaz�l�m� ile �evrilmi�tir. Microsoft size hem ki�iler taraf�ndan �evrilmi�, hem de makine-�evrisi ile �evrilmi� makaleler sunar. B�ylelikle, bilgi bankam�zdaki t�m makalelere, kendi dilinizde ula�m�� olursunuz. Bununla birlikte, makine taraf�ndan �evrilmi� makaleler m�kemmel de�ildir. Bir yabanc�n�n sizin dilinizde konu�urken yapabilece�i hatalar gibi, makale; kelime da�arc��, s�z dizim kurallar� veya dil bilgisi a��s�ndan yanl��lar i�erebilir. Microsoft, i�eri�in yanl�� evrimi veya onun m��teri taraf�ndan kullan�m�ndan do�an; kusur, hata veya zarardan sorumlu de�ildir. Microsoft ayr�ca makine �evirisi yaz�l�m�n� s�k�a g�ncellemektedir.

Makalenin �ngilizcesi a�a��daki gibidir:192184

(http://support.microsoft.com/kb/192184/en-us/ )

�ste | Geri Bildirim Ver