Hier onder is de oude en vertaalde versie weergegeven:
'VB 6
Type DetailInfo
Dim F1 As Short
Dim F2 As String
Dim F3 As String
Dim F4 As String
Dim F5 As String
End Type
Type AllrecordInfo
Dim X1 As Short
Dim X2 As Short
Dim X3 As Short
Dim DI(9) As DetailInfo '
End Type
Dim record As Allrecordinfo
Record.X1 = 2
record.di(1).F2 = "abc"
'vb2008
Structure DetailInfo
Dim F1 As Short
Dim F2 As String
Dim F3 As String
Dim F4 As String
Dim F5 As String
End Structure
Structure AllrecordInfo
Dim X1 As Short
Dim X2 As Short
Dim X3 As Short
Dim DI() As DetailInfo '
Public Sub Initialize()
ReDim Di(9)
End Sub
End Structure
Dim record As Allrecordinfo
'onderstaande statements geven allemaal dezelfde error "Declaration expected"
'Naar mijn mening is dat al gedaan in Dim record as AllRecordInfo
Record.initialize() '
Record.X1 = 2 '
Record.di(1).F2 = "abc" '
--
Peter
Waarom maak je geen classen in plaats van structures.
Structures zijn zinvol voor kleine zaken die op de stack moeten worden
geplaatst.
Niet shared classes worden geinstantieerd als objecten en sluiten daarom
meer aan op OOP.
Ik zag laat dat deze nieuwsgroep weer een keer een vraag bevatten, ik zal
hier vanavond wat meer op ingaan als je dat wil.
Groeten,
Cor
"petert" <pet...@discussions.microsoft.com> wrote in message
news:17E2626A-DB38-46C2...@microsoft.com...
Ik kom van voor de tijd van assembler etc. :-) ik begon met kabeltjes.
Echter als het om data gaat is het eenvoudiger om designers te gebruiken.
Als het voor een datatable is (dit lijkt erg op wat je nu doet).
Dan kies je in de top van je IDE
Data -> Add new DataSource -> Select Database en dan Next
New Connection en select je database
Vink de table aan die je wilt gebruiken en doe Finish
Als je nu in solution Explorer kijkt is er een class aangemaakt. .XSD
Click hierop en de beschrijvende class staat nu in je project
Als je dit wilt gebruiken kan je bijvoorbeeld een DataGridView op een from
slepen en dat met wat simpele code gebuiken.
Als je op je form dubbel klikt en dan intijpt
me.DeGeMaakteTableAdapter.Fill(DeDoorJouGekozenTabel)
DataGridView1.DataSource = DeDoorJouGekozenTabel
en runt zie je het al op je scherm.
Dit is een keuze maar er zijn eindeloos veel mogelijkheden
(Ik heb dit even snel ingetijpt dus het zal wel niet helemaal foutloos zijn)
Groeten,
Cor
--
Peter
Ik heb even een klein vraagje over de ontwikkelomgeving. Alle modules forms
etc die gebruikt worden voor een groep programma's staan in één directory.
Deze programma's gebruiken dezelfde structuren , modules en soms forms. Een
wijziging in een module/form van een programma is dan ook meteen voor alle
andere programma's en dat is ook de bedoeling. Het probleem is dat als ik aan
een één van de programma's werk en om wat voor reden dan ook een module/form
verwijder (delete) uit de lijst in de solution explorer wordt deze ook fysiek
van de disk verwijder en is het module niet meer beschikbaar voor de andere
programma's.
Eigenlijk mis ik een optie als remove from list oid. In VB6 gebeurde dit
niet. Kan je mij vertellen wat ik fout doe ?
--
Peter
Daarvoor is Exclude en Include from project, als je bovenin in solution
explorer op dat blokje show all files drukt, dan zie je de excluded files
een beetje doorzichting.
Success
Cor
"petert" <pet...@discussions.microsoft.com> wrote in message
news:7E0C3A40-6A63-4525...@microsoft.com...
Daarom gebruikt men momenteel simpel Class Libraries, je creeert een class
library en gebruikt dat als reference voor al je andere programma's een veel
netere manier.
Cor
"petert" <pet...@discussions.microsoft.com> wrote in message
news:386CACF0-11A5-4357...@microsoft.com...