/
Forside
/
Teknologi
/
Udvikling
/
VB/Basic
/
Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn
*
Kodeord
*
Husk mig
Brugerservice
Kom godt i gang
Bliv medlem
Seneste indlæg
Find en bruger
Stil et spørgsmål
Skriv et tip
Fortæl en ven
Pointsystemet
Kontakt Kandu.dk
Emnevisning
Kategorier
Alfabetisk
Karriere
Interesser
Teknologi
Reklame
Top 10 brugere
VB/Basic
#
Navn
Point
1
berpox
2425
2
pete
1435
3
CADmageren
1251
4
gibson
1230
5
Phylock
887
6
gandalf
836
7
AntonV
790
8
strarup
750
9
Benjamin...
700
10
tom.kise
610
kolonder
Fra :
Expert Billund
Dato :
13-02-01 10:56
Private Sub Print_Click()
Dim kol1, kol2, kol3, kol4 As String
kol1 = 2 'afstand i cm fra venstre side af Papiret
kol2 = 4
kol3 = 7
kol4 = 17
Printer.CurrentY = 2 'afstand i cm fra toppen af Papiret
Printer.FontSize = 8
Printer.ScaleMode = vbCentimeters
Printer.CurrentX = kol1
Printer.Print "nr."
Printer.CurrentX = kol2
Printer.Print "Navn"
Printer.CurrentX = kol3
Printer.Print "adresse"
Printer.CurrentX = kol4
Printer.Print "nummer"
'*******************************************
Printer.CurrentX = kol1
Printer.Print text1.text
Printer.CurrentX = kol2
Printer.Print text2.text
Printer.CurrentX = kol3
Printer.Print Text3.text
Printer.CurrentX = kol4
Printer.Print text4.text
End Sub
det var meningen at de fire felter skulle værer på en linje hvad er der galt
med koden
de skulle udskrive i fire kononder i to linge men de blive udskreve i otte
linje og 4 kolonder
Mads Andreasen (
13-02-2001
)
Kommentar
Fra :
Mads Andreasen
Dato :
13-02-01 11:31
Hejsa
Printer.Print "et eller andet"
Indsættes der automatisk et linjeskift. brug i stedet Printer.Print "et
eller andet";
-Mads
"Expert Billund" <Billund@expert.dk> wrote in message
news:96b0cs$l4c$1@news.inet.tele.dk...
> Private Sub Print_Click()
> Dim kol1, kol2, kol3, kol4 As String
> kol1 = 2 'afstand i cm fra venstre side af Papiret
> kol2 = 4
> kol3 = 7
> kol4 = 17
> Printer.CurrentY = 2 'afstand i cm fra toppen af Papiret
> Printer.FontSize = 8
> Printer.ScaleMode = vbCentimeters
> Printer.CurrentX = kol1
> Printer.Print "nr."
> Printer.CurrentX = kol2
> Printer.Print "Navn"
> Printer.CurrentX = kol3
> Printer.Print "adresse"
> Printer.CurrentX = kol4
> Printer.Print "nummer"
> '*******************************************
> Printer.CurrentX = kol1
> Printer.Print text1.text
> Printer.CurrentX = kol2
> Printer.Print text2.text
> Printer.CurrentX = kol3
> Printer.Print Text3.text
> Printer.CurrentX = kol4
> Printer.Print text4.text
> End Sub
>
> det var meningen at de fire felter skulle værer på en linje hvad er der
galt
> med koden
>
> de skulle udskrive i fire kononder i to linge men de blive udskreve i otte
> linje og 4 kolonder
>
>
Henning Forgaard (
13-02-2001
)
Kommentar
Fra :
Henning Forgaard
Dato :
13-02-01 15:16
Du må nok sette Printer.CurrentY til samme verdi for alle linjer du vil ha
printet på samme linje
Printer.CurrentY = 2
Printer.CurrentX = kol1
Printer.Print "nr."
Printer.CurrentY = 2
Printer.CurrentX = kol2
Printer.Print "Navn"
Printer.CurrentY = 2
Printer.CurrentX = kol3
Printer.Print "adresse"
Printer.CurrentY = 2
Printer.CurrentX = kol4
Printer.Print "nummer"
"Expert Billund" <Billund@expert.dk> wrote in message
news:96b0cs$l4c$1@news.inet.tele.dk...
> Private Sub Print_Click()
> Dim kol1, kol2, kol3, kol4 As String
> kol1 = 2 'afstand i cm fra venstre side af Papiret
> kol2 = 4
> kol3 = 7
> kol4 = 17
> Printer.CurrentY = 2 'afstand i cm fra toppen af Papiret
> Printer.FontSize = 8
> Printer.ScaleMode = vbCentimeters
> Printer.CurrentX = kol1
> Printer.Print "nr."
> Printer.CurrentX = kol2
> Printer.Print "Navn"
> Printer.CurrentX = kol3
> Printer.Print "adresse"
> Printer.CurrentX = kol4
> Printer.Print "nummer"
> '*******************************************
> Printer.CurrentX = kol1
> Printer.Print text1.text
> Printer.CurrentX = kol2
> Printer.Print text2.text
> Printer.CurrentX = kol3
> Printer.Print Text3.text
> Printer.CurrentX = kol4
> Printer.Print text4.text
> End Sub
>
> det var meningen at de fire felter skulle værer på en linje hvad er der
galt
> med koden
>
> de skulle udskrive i fire kononder i to linge men de blive udskreve i otte
> linje og 4 kolonder
>
>
Søg
Alle emner
Teknologi
Udvikling
VB/Basic
Indstillinger
Spørgsmål
Tips
Usenet
Reklame
Statistik
Spørgsmål :
177551
Tips :
31968
Nyheder :
719565
Indlæg :
6408825
Brugere :
218887
Månedens bedste
Årets bedste
Sidste års bedste
Copyright © 2000-2024 kandu.dk. Alle rettigheder forbeholdes.