/ Forside / Teknologi / Udvikling / VB/Basic / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
VB/Basic
#NavnPoint
berpox 2425
pete 1435
CADmageren 1251
gibson 1230
Phylock 887
gandalf 836
AntonV 790
strarup 750
Benjamin... 700
10  tom.kise 610
Tabulator separeret fil
Fra : Jan Damkjær Dahl


Dato : 27-09-01 15:13

hejsa

Hvordan laver man en Tabulator separeret fil, som man f.eks. kan gøre inde
fra Excel.

Jeg kan jo gøre sådan her hvis det skal være som semikolon

f.eks.
s = "tekst" & ";" & "tekst" & ";" &tekst"

og så smide s i en fil, men hvad er koden for tabulator.



--
mvh.
Jan Damkjær Dahl



 
 
Karl Peder Olesen (27-09-2001)
Kommentar
Fra : Karl Peder Olesen


Dato : 27-09-01 16:33

Hej
>
>og så smide s i en fil, men hvad er koden for tabulator.
>
tabulator = chr(9) (altså ascii-koden for en tabulator er 9)

mvh
Karl Peder


Harald Staff (27-09-2001)
Kommentar
Fra : Harald Staff


Dato : 27-09-01 16:52

Til senere vil du ha glede av denne mikroskopiske applikasjon.
Lag et Form med en TextBox Text1. Gi den denne koden:

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
Me.Caption = "CHR ( " & KeyCode & " )"
End Sub

Når du så skriver, tabber, piler etc i boksen, vil formen vise Ascii-kode i
oversktiften.

HTH. Beste hilsen Harald

Jan Damkjær Dahl <jdd@worldonline.dk> skrev i
news:LmGs7.541$Ay.58852@news010.worldonline.dk...
> hvad er koden for tabulator.




@sbjørn (27-09-2001)
Kommentar
Fra : @sbjørn


Dato : 27-09-01 17:58

Private Sub Form_KeyPress(KeyAscii As Integer)
Me.Caption = "Chr(" & KeyAscii & ") = """ + Chr(KeyAscii) + """"
App.Title = "Chr(" & KeyAscii & ") = """ + Chr(KeyAscii) + """"
End Sub

Private Sub Form_Load()
KeyPreview = True
End Sub



Harald Staff (27-09-2001)
Kommentar
Fra : Harald Staff


Dato : 27-09-01 18:02

Du er gjerrig på komponentene du, Asbjørn

@sbjørn <asbjorn@caduceus.dk> skrev i
news:%UIs7.571$Ay.70513@news010.worldonline.dk...
> Private Sub Form_KeyPress(KeyAscii As Integer)
> Me.Caption = "Chr(" & KeyAscii & ") = """ + Chr(KeyAscii) + """"
> App.Title = "Chr(" & KeyAscii & ") = """ + Chr(KeyAscii) + """"
> End Sub
>
> Private Sub Form_Load()
> KeyPreview = True
> End Sub
>
>



Jan Damkjær Dahl (28-09-2001)
Kommentar
Fra : Jan Damkjær Dahl


Dato : 28-09-01 13:42

Mange tak for det


"Harald Staff" <harald.staff@nrk.no> skrev i en meddelelse
news:9ovm2e$6nd$1@oslo-nntp.eunet.no...
> Du er gjerrig på komponentene du, Asbjørn
>
> @sbjørn <asbjorn@caduceus.dk> skrev i
> news:%UIs7.571$Ay.70513@news010.worldonline.dk...
> > Private Sub Form_KeyPress(KeyAscii As Integer)
> > Me.Caption = "Chr(" & KeyAscii & ") = """ + Chr(KeyAscii) + """"
> > App.Title = "Chr(" & KeyAscii & ") = """ + Chr(KeyAscii) + """"
> > End Sub
> >
> > Private Sub Form_Load()
> > KeyPreview = True
> > End Sub
> >
> >
>
>



Chris Petersen (23-11-2001)
Kommentar
Fra : Chris Petersen


Dato : 23-11-01 16:25

Hej Jan

Måske kan du også bruge VB's Konstant for tabulator ( vbTab )Måske sådan her

Dim s As String

s = Text1.Text & vbTab & Text2.Text & vbTab & Text3.Text


Jan Damkjær Dahl <jdd@worldonline.dk> skrev i en
nyhedsmeddelelse:LmGs7.541$Ay.58852@news010.worldonline.dk...
> hejsa
>
> Hvordan laver man en Tabulator separeret fil, som man f.eks. kan gøre inde
> fra Excel.
>
> Jeg kan jo gøre sådan her hvis det skal være som semikolon
>
> f.eks.
> s = "tekst" & ";" & "tekst" & ";" &tekst"
>
> og så smide s i en fil, men hvad er koden for tabulator.
>
>
>
> --
> mvh.
> Jan Damkjær Dahl
>
>



Søg
Reklame
Statistik
Spørgsmål : 177551
Tips : 31968
Nyheder : 719565
Indlæg : 6408825
Brugere : 218887

Månedens bedste
Årets bedste
Sidste års bedste