Datamaskin
  | Hjem | Hardware | Nettverk | Programmering | Software | Feilsøking | Systems | 
Programmering  
  • C /C + + Programming
  • Computer Programmeringsspråk
  • Delphi Programming
  • Java Programming
  • JavaScript Programmering
  • PHP /MySQL programmering
  • Perl Programming
  • Python Programming
  • Ruby Programming
  • Visual Basics Programming
  •  
    Datamaskin >> Programmering >> Visual Basics Programming >> Content
    Hvordan lese og skrive tekstfiler med Visual Basic 6.0
    Visual Basic 6.0 gir en enkel måte å åpne tekstfiler og lese innholdet i en tekst boks på skjermen , samt skrive ny tekst til en fil. Bare elleve linjer med kode kreves for det første skrittet, og ti vil være tilstrekkelig for den andre operasjonen . Prosessen bruker input og output funksjoner i Visual Basic, samt et lite vindu til å samle informasjon fra brukeren. Du trenger
    Visual Basic 6.0
    Vis flere instruksjoner
    en

    Åpne Visual Basic 6.0 , klikk på Fil og velg Nytt prosjekt . Velg Standard EXE fra listen over maler. Dobbeltklikk TextBox kontroll i verktøykassa til venstre for å legge dette til skjemaet . Endre høyden på Form i Egenskaper-ruten til høyre til 5000
    2

    Gjør følgende endringer i tekstboksen Egenskaper : . Høyde = 3000Multiline = TrueScrollbars = BothWidth = 3000

    3

    Dobbeltklikk Button kontroll i verktøykassa . Endre Caption eiendom for å lese filen. Gjenta denne operasjonen for å legge til en ny knapp kontroll , endre Caption eiendom her å skrive Fil .
    4

    Dobbeltklikk lest File -knappen for å åpne koden vinduet. Skriv inn denne koden koden view page: Funksjon ReadFile ( ) Dim ReadFileName Som StringReadFile = InputBox ("Skriv inn navnet på filen for å lese :") Åpen ReadFile For Input As # 1ReadFile = Input $ ( LOF ( 1 ) , 1 ) Tekst1 . text = ReadFileClose # 1End FunctionPrivate Sub Command1_Click ( ) ReadFileEnd Sub
    5

    Dobbeltklikk Skriv File -knappen for å åpne koden vinduet. Skriv inn denne koden : Funksjon WriteFile ( ) Dim WriteFileName Som StringWriteFileName = InputBox ("Skriv inn filnavn" ) Åpen WriteFileName For Output As # 2Print nr. ​​2 , Text1.TextClose # 1End FunctionPrivate Sub Command2_Click ( ) WriteFileEnd Sub
    6

    Kjør programmet ved å trykke F5 , og klikk på lese filen kommandoen først. Angi navnet på en kjent tekstfil , inkludert . Txt endelsen . Filen skal vises i tekstboksen . Hvis du nå klikker på Skriv Fil og gi et annet navn, vil du skape en ny, men duplikat fil. Alternativt, hvis du sletter tekst eller klikker du bare på Les File før du legger en fil og deretter skrive noe nytt , kan du opprette en helt ny fil .

    früher :

     Weiter:
      Relatert Artike
    ·Hvordan bruke variabler med en InStr funksjon i Access 
    ·Hvordan lage en tekstboks i Visual Basic 
    ·Hvordan bygge objektavhengigheter 
    ·Hvordan bruke VBA for e-post i Access 
    ·Hvordan grensesnittet Telnet Med VB6 
    ·Hvordan bruke VB6 lage booters 
    ·Slik installerer VBScript 
    ·Hvordan bruke Class Fra XSD 
    ·Slik konverterer XLS til CSV på VB.NET 
    ·Hvordan finne en Gjeldende mappe i VBS 
      Anbefalte artikler
    ·Slik konverterer tegn til ASCII -koder i Java 
    ·Hvordan åpne en fil i PHP 
    ·MySQL ASP Tutorial 
    ·Hvordan finne gjennomsnittet av en liste i Python 
    ·Hvordan lage et skjema i Java 
    ·Hvordan lage en File Upload Rutinemessig i PHP 
    ·Definisjon av CPP Fil 
    ·Hvordan bruke Strchr funksjon i C + + 
    ·Hvordan slå en Java-kildekoden i et flytskjema 
    ·Den Java-kode som sjekker inngangsverdien Med Array Ver…
    Copyright ©  Datamaskin  http://www.datamaskin.biz/