Comment utiliser la barre de défilement dans visual basic 6?

Mon Application Windows dans visual basic 6 est d'avoir un formulaire qui contient l'enfer beaucoup de contrôles. Et si la taille de l'écran à l'environnement du client est plus petite, la plupart des commandes ne s'affichent pas.
Ce que je veux faire est de fournir aux utilisateurs une verticale et horizontale de la barre de défilement de sorte que l'utilisateur peut faire défiler à travers tous les contrôles.
Toute personne ayant aucune idée de comment mettre en place cette?

P. S. s'il vous Plaît ne pas donner des exemples montrant que des étiquettes d'affichage de la valeur de défilement 🙂

OriginalL'auteur Nirman | 2012-12-11

  1. 4

    J'aime David réponse, mais si vous voulez le faire avec les barres de défilement, tout d'abord, vous devez mettre toutes vos commandes dans un cadre qui leur convient. Vous voulez déplacer 1 contrôle pas un "enfer de beaucoup de contrôles". Deuxième de mettre vos barres de défilement dans la forme et dans le Form_Resize événement ajouter un peu de code pour redimensionner les barres de défilement avec le formulaire. Après le redimensionnement de la barre de défilement vous avez besoin de faire quelques calculs pour définir la Max, SmallChange, et LargeChange propriétés. Je suis en train de montrer le Min de la propriété, de sorte que vous savez qu'il ne change jamais, il suffit de le mettre dans le concepteur. Cet exemple utilise uniquement une barre de défilement horizontale parce que je suis trop paresseux pour inclure une barre de défilement verticale trop. Enfin, ajoutez le code de la barre de défilement événement de Changement pour déplacer le cadre autour.

    Private Sub Form_Resize()

    HScroll1.Move 0, Me.ScaleHeight - HScroll1.Height, Me.ScaleWidth
    HScroll1.Min = 0
    HScroll1.Max = Frame1.Width - Me.ScaleWidth
    HScroll1.SmallChange = HScroll1.Max / 100
    HScroll1.LargeChange = HScroll1.Max / 10

End Sub

Private Sub HScroll1_Change()

    Frame1.Left = -HScroll1.Value
    DoEvents ' this is not strictly necessary, but smooths the scolling some

End Sub

    Vous avez aussi besoin de code de gestion d'erreur. Je suis un paresseux exemple codeur.

    OriginalL'auteur jac

  2. 4

    Une façon est d'activer les barres de défilement de votre formulaire à l'aide d'appels d'API de Windows. C'est différent de l'utilisation de contrôles de barre de Défilement, tourner sur la forme propre des barres de défilement garde les barres de défilement d'interférer avec l'ordre de tabulation, par exemple.

    Ici est une bonne page expliquant comment faire, avec une classe helper:

    http://www.vbaccelerator.com/home/VB/Code/Libraries/Subclassing/Adding_Scroll_Bars_To_Forms__PictureBoxes_and_UserControls/article.asp

    OriginalL'auteur prprcupofcoffee