Søg
Avatar billede encryption.tk Nybegynder
13. april 2002 - 16:26 Der er 4 kommentarer og
1 løsning

hvorfor kommer der et mellemrum?

her er koden

Private Sub Command1_Click()
Dim i, place
place = App.Path & "\text.txt"
Open place For Append As #1
For i = 74400000 To 74500000
progress.Value = i
Print #1, i
Next i
Close #1
End Sub

spørgsmål! Hvorfor kommer der mellemrum før alle tal i txt filen??

På forhånd tak!

/encryption.tk
Avatar billede tjacob Juniormester
13. april 2002 - 17:09 #1
Det er fordi i er et tal, og print-kommandoen fungerer på strenge.

Ændr din kode til:  Print #1, Cstr(i)

/tjacob
Avatar billede answermaster Nybegynder
13. april 2002 - 18:41 #2
Gør det evt. på en anden måde.

Private Sub Command1_Click()
Dim Tekst, Fil As String

For i = 74400000 To 74500000
progress.Value = i
Tekst = Tekst & i
Next i

Fil = "c:\Altsammen.txt"

Open Fil For Output As #1
    Print #1, Tekst
Close #1

End Sub

/Answer
Avatar billede answermaster Nybegynder
13. april 2002 - 18:43 #3
Det jeg har skrevet samler teksten i én fil, og gemmer det bagefter. Det du har skrevet gemmer tallet linje for linje.

Forklaring...

Hver gang du skriver >print #1, ?< skrifter vb linje i filen. Så man skal samle værdien i en variabel og gemme den bagefter..
Avatar billede encryption.tk Nybegynder
13. april 2002 - 22:43 #4
det er meningen at det skal stå linje for linje! Takker JAcob
Avatar billede tjacob Juniormester
14. april 2002 - 11:26 #5
Grunden til mellemrummet:
når et tal indsættes i en streng-variabel, gemmer VB en plads foran til et fortegn. Ved + er der tomt, men hvis det var et negativt tal, så ville der ikke være et mellemrum men et "-".
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra Visual Basic kategorien

Titel Indlæg Oprettet Seneste aktivitet
Send mail fra "Outlook New" via VBA i excel Af lonmat i Visual Basic 5 29/08/202512:28 04/09/202515:48
Klik Event i MS Project Af per2edb i Visual Basic 0 05/08/202510:10 -
VBA koder lagt i MS project kolonner Af per2edb i Visual Basic 0 16/05/202512:31 -
Foto fra Word eller Excel Af MSchlamovitz i Visual Basic 1 22/04/202514:55 25/04/202511:21
Proxy server.. Af SommerFyr i Visual Basic 12 10/07/202417:34 12/07/202414:34
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I dag 00:56 3 skærme 27 Af bbm i Skærme
I går 16:18 "gratis" "reklamefri" hjemmeside -næsten --som man kan lave i søvne : Af Novice-1 i Andet software
19/0316:52 Proxy router/server Af joki i Routere & Switches
19/0311:04 Icotera vs Nokia fiberboks Af Uvanga i Routere & Switches
18/0323:30 Outlook send/modtag manuelt Af pwn i Office & Kontorpakker
White papers
Flere white papers »