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

    Att läsa och skriva textfiler med Visual Basic 6.0

    Visual Basic 6.0 ger ett enkelt sätt att öppna textfiler och läsa deras innehåll i en textruta på skärmen , samt skriva ny text till en fil . Bara elva rader kod krävs för det första steget , och tio kommer att räcka för den andra operationen . Processen använder in-och utgångar i Visual Basic , samt ett litet fönster för att samla in information från användaren . Saker du behöver Review, Visual Basic 6.0
    Visa fler instruktioner
    1

    Öppna Visual Basic 6.0 , klicka på Arkiv och välj Nytt projekt . Välj Standard EXE från listan med mallar . Dubbelklicka på textrutan kontrollen i verktygslådan till vänster för att lägga till detta i formuläret . Ändra höjden på formulär i fönstret Egenskaper till höger för att 5000 köpa 2

    Gör följande ändringar i textrutan Egenskaper : . Höjd = 3000Multiline = TrueScrollbars = BothWidth = 3000

    3

    Dubbelklicka på knappen kontrollen i verktygslådan . Ändra Bildtext egenskapen Läs fil . Upprepa detta för att lägga till en andra knapp kontroll , ändra Bildtext fastighet här för att skriva filen .
    4

    Dubbelklicka på läsa filen för att öppna koden fönstret . Ange denna kod på code view sidan : Function ReadFile ( ) Dim ReadFileName Som StringReadFile = InputBox ( " Ange namn på filen för att läsa : " ) Öppen ReadFile För Input Som # 1ReadFile = Input $ ( LOF ( 1 ) , 1 ) Text1 . text = ReadFileClose # 1End FunctionPrivate Sub Command1_Click ( ) ReadFileEnd Sub
    5

    Dubbelklicka på knappen filskrivningsläge att öppna koden fönstret . Ange denna kod : Function WriteFile ( ) Dim WriteFileName Som StringWriteFileName = InputBox ( " Ange filnamn " ) Öppen WriteFileName för utskrift som # 2Print # 2 , Text1.TextClose # 1End FunctionPrivate Sub Command2_Click ( ) WriteFileEnd Sub
    6

    Kör programmet genom att trycka på F5 och klicka på Läs Filkommandona först . Ange namnet på ett känt textfil , inklusive . Txt ändelsen . Filen ska visas i textrutan . Om du nu klickar på filskrivningsläge och ge ett annat namn , kommer du att skapa en ny men dubblett fil . Alternativt , om du tar bort text eller klicka på Läs fil innan du laddar en fil och sedan skriva något nytt , kan du skapa en helt ny fil . Addera

    Tidigare:

    nästa:
    relaterade artiklar
    ·Hur man beräknar skillnaden mellan tidszoner i VB6
    ·Tillträde : VBA Exportera Query
    ·Hur Återställ Fästingar i VB6
    ·Hur man lär VB Script Online
    ·Hur man kasta en knucklecurve
    ·Hur man ansluter VB.NET Med Oracle
    ·Hur man driver ett Visual Basic -program på en PC
    ·Ställa Mnemonic viktiga sammanslutningar Med Visual Ba…
    ·Hur du ändrar teckensnitt färg i Visual Basic
    ·VB6 Strängfunktioner
    Utvalda artiklarna
    ·Hur man tar bort JavaScript
    ·Hur utträde ur ett program om något är fel i Java
    ·Hur man kör FFmpeg i bakgrunden med PHP
    ·Faser av PHP Programmering
    ·Hur Lista PHP Variabler
    ·Hur dynamiskt ändra storlek på hyperlänkar i VB
    ·Komma åt kontakter på Evolution Python
    ·Hur du fyller på dll-filer
    ·Hur man kan stoppa en loop i VBA
    ·Hur man gör en SSH -anslutning Med PHP
    Copyright © Dator Kunskap http://www.dator.xyz