Dator
 |  Startsida |  Hårdvara |  Nätverk |  Programmering |  Programvara |  Felsökning |  System |   
Programmering
  • C /C + + -programmering
  • Computer Programspråk
  • Delphi Programmering
  • Java Programming
  • JavaScript programmering
  • PHP /MySQL Programmering
  • perl Programmering
  • python Programming
  • Ruby programmering
  • Visual Basics Programmering
  • * Dator Kunskap >> Programmering >> Visual Basics Programmering >> Content

    Hur man gör ett galleri av bilder i Visual Basic 6.0

    Du kan använda Visual Basic för att skapa ett program för att visa en grupp bilder som du vill , till exempel i bildspel eller miniatyrformat . VB 6.0 har ImageList kontroll , som lagrar bilder i en array som du kan komma åt med index och visa i en eller flera bildkontrollerna . Instruktioner
    1

    Klicka på " Projekt " i menyn och klicka sedan på "Komponenter " från rullgardinsmenyn eller tryck " Ctrl + T " på tangentbordet för att öppna Komponenter menyn . Bläddra ned till " Microsoft Windows Common Controls 6.0 ( SP6 ) " och klicka på kryssrutan bredvid den . Klicka på " OK . " Detta lägger till flera nya verktyg i verktygslådan , inklusive ImageList kontroll .
    2

    Dubbelklicka på ImageList kontrollen i verktygslådan för att lägga till en till formuläret . Klicka på ImageList på formuläret och dubbelklicka på " ( Custom ) " alternativet från fönstret Egenskaper . Detta öppnar upp en dialogruta för dina bilder . Addera 3

    Klicka på " Bilder "-fliken . Klicka på " Infoga bild " och navigera till dina bilder . Dubbelklicka på den som du behöver för att ladda in den i din ImageList . Upprepa denna process för att ladda upp alla bilder du behöver . Klicka på " OK " för att stänga rutan .
    4

    Dubbelklicka på " Image " kontrollen i verktygslådan för att lägga en till ditt projekt . Klicka och dra kanterna för att ändra storlek på den om det behövs . Ändra " Stretch " egendom till "true ".
    5

    Lägg två CommandButton kontroller från verktygslådan till formuläret . Ändra " Caption " egendom av de första att " Föregående " och den andra till " Next . " Ordna dina kontroller i formuläret . Din ImageList kontrollen inte visas vid körning , så att du kan lämna den var du vill.
    6

    Öppna koden fönstret . Skapa en global räkna variabel genom att skriva " Dim picNum As Integer " under " Option Explicit ". Få åtkomst till din " Form_Load ( ) " -funktion . Typ " picNum = 1 " på den första raden och " Image1.Picture = ImageList1.ListImages.Item ( picNum ) . Picture " på nästa rad . Detta kommer att ladda den första bilden i din ImageList in din bild box
    7

    Öppna koden för din " Next " kommandoknapp och skriv följande rader : .
    P Om inte picNum = ImageList1.ListImages.Count Sedan

    picNum = picNum + 1

    Else

    picNum = 1

    End If

    Image1.Picture . = ImageList1.ListImages.Item ( picNum ) Bild
    8

    Öppna koden för din " Previous " kommandoknapp och skriv följande rader :
    p Om inte picNum = 1 Then

    picNum = picNum - en

    Else

    picNum = ImageList1.ListImages.Count

    End If

    Image1.Picture = ImageList1 . ListImages.Item ( picNum ) . Bild
    9

    Kör programmet och testa dina knappar . Bilden kontrollen kommer att visa en bild från din ImageList . Bläddra mellan bilderna genom att klicka på Föregående och Nästa kommandoknappar .

    Tidigare:

    nästa:
    relaterade artiklar
    ·Hur man tar bort Karaktär avkastning från en sträng …
    ·Vilka är skillnaderna mellan Visual Basic Express & Vi…
    ·Hur koden med versaler i VB.Net
    ·Hur får VB.NET för att logga in på en server amd Lad…
    ·Hur man beräknar Kurs & Avstånd i VB
    ·Hur Upphör din VB Script
    ·Hur man ändra färgen på former i VB
    ·Hur man sätter in en VBA textruta
    ·Hur man lägger in en Sub program i Visual Basic 6.0
    ·Hur Anpassa ValidationSummary
    Utvalda artiklarna
    ·Hur till Redigera formulär i DataGridView
    ·Handledning för AJAX Sidindelning och jQuery i PHP
    ·Hur man skriver ett program för att kontrollera om en …
    ·Hur du använder käftar med Microsoft Visual Basic
    ·Hur man gör en Drop - Down Logga in
    ·Varför pratar Datorer i tal snarare än ord
    ·Fördelarna med att använda generalisering i UML model…
    ·Hur man använder en CheckBox & en ComboBox i en DataGr…
    ·Komma åt Query Uppdatera
    ·Anslutning String för SQL Authentication
    Copyright © Dator Kunskap http://www.dator.xyz