/
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
MSflexgrid..
Fra :
Brian
Dato :
16-12-02 21:31
Hej NG..
Jeg sidder her og roder med MS Flexgrid.. Men den kan åbenbart ikke det jeg
gerne vil..
Det jeg ønsker er at få en bestemt antal coloner og rækker, som kan udfyldes
i runtime. Som F.eks. et regneark..
Jeg har også prøvet at indsætte Excell regneark ind på formen.. Men den
viser mange flere
felter end jeg er interreseret i..
Findes der ikke en mulighed, hvor jeg kan få 3 rækker med hver 5 celler,
hvor der kan
indtastet i felterne i runtime..
Jeg ved godt at jeg bare kan bruge tekstbokse og lign, men det er ikke den
vej jeg vil gå.
Håber der er nogen som kan sætte sig ind i mit "lille" problem og vil hjælpe
mig..
Brian
Johnny E Jensen (
16-12-2002
)
Kommentar
Fra :
Johnny E Jensen
Dato :
16-12-02 22:36
Hej Brian
MSFlexGrid er lidt underlig i starten men er fin når man har fundet udaf
brugen:
Jeg har lavet en hurtig kode - det skulle give dig en idé om hvordan du kan
løse dit problem.
Vi antager at du har en FlexGrid med navnet fgTest og en textbox med navnet:
txtDef med .Visible=0
With fgTest
.Clear
.Cols = 6 ' sætter antallet af kollonner = 6
.Rows=2 ' sætter antallet af linier = 2
.FixedCols = 0 ' ingen fixed kollonner
.FixedLines=1 ' Til Kollonne overskrifter
' Sæt kollonne overskrifter
.Row =0 ' peg på linie '0' i gridet
.Col = 0 ' peg på kollonne 0
.Text = "Kollonne 1"
.Col 1 ' peg på kollonne 1
.Text = "Kollonne 2"
'osv osv osv
' Brug .Text for at trække værdier ud af en celle
End With
Private Sub fgTest_Click
dim x as Single
dim y as Single
dim h as Single
dim w as Single
With fgTest
x=.CellLeft+.Left
y=.CellTop+.Top
h=.CellHeight
w=.CellWidth
txtDef.Text = .Text ' Hvis der står noget i cellen der klikkes på
skal dette over i TextBoxen
txtDef.Visible = True
End With
End Sub
Private Sub txtDef_KeyDown............
' Lig værdien af txtDef.Text tilbage i cellen
if KeyCode=vbKeyReturn Then
with fgTest
.text = txtDef.text
txtDef.Visible=False
end with
End If
End Sub
Mvh
Johnny Jensen
Brian (
17-12-2002
)
Kommentar
Fra :
Brian
Dato :
17-12-02 21:52
Hej Johnny..
Tak for hjælpen.. Nu kan jeg komme videre..
God Jul
Brian
"Johnny E Jensen" <emde@emde.dk> skrev i en meddelelse
news:3dfe471d$0$47072$edfadb0f@dtext02.news.tele.dk...
> Hej Brian
>
> MSFlexGrid er lidt underlig i starten men er fin når man har fundet udaf
> brugen:
> Jeg har lavet en hurtig kode - det skulle give dig en idé om hvordan du
kan
> løse dit problem.
>
> Vi antager at du har en FlexGrid med navnet fgTest og en textbox med
navnet:
> txtDef med .Visible=0
>
( KLIP )
>
> Mvh
> Johnny Jensen
>
>
Søg
Alle emner
Teknologi
Udvikling
VB/Basic
Indstillinger
Spørgsmål
Tips
Usenet
Reklame
Statistik
Spørgsmål :
177558
Tips :
31968
Nyheder :
719565
Indlæg :
6408925
Brugere :
218888
Månedens bedste
Årets bedste
Sidste års bedste
Copyright © 2000-2024 kandu.dk. Alle rettigheder forbeholdes.