Avatar billede taske Nybegynder
07. november 2004 - 20:20 Der er 2 kommentarer og
1 løsning

lave et recordset i vb.net?

Jeg har siddet og lavet lidt i VBA som jeg nu konvertere om til vb.net, men hvordan laver jeg et recordset i vb.net. strukturen skulle gerne ligne det jeg har her som er taget fra vba opgaven.
er det muligt at bruge Structure eller skal jeg til at lave en klasse. er der ikke en som har et eksempel som jeg kan blive lidt klogere på. 

Type myrec
    time As String * 10
    Dato As Date
End Type

Sub MyFile()

Dim typInfo(10) As myrec

    typInfo(1).Dato = "07/03/2003"
    typInfo(1).time = "02:10:08.1"
    typInfo(2).Dato = "07/03/2003"
    typInfo(2).time = "02:11:08.2"
    typInfo(3).Dato = "07/03/2003"
    typInfo(3).time = "02:11:08.456"
    typInfo(4).Dato = "07/03/2003"
    typInfo(4).time = "02:12:08.457"
    typInfo(5).Dato = "07/03/2003"
    typInfo(5).time = "02:12:08.558"
    typInfo(6).Dato = "07/03/2003"
    typInfo(6).time = "02:12:08.554"
    typInfo(7).Dato = "07/03/2003"
    typInfo(7).time = "02:13:08.555"
    typInfo(8).Dato = "07/03/2003"
    typInfo(8).time = "02:13:08.656"
    typInfo(9).Dato = "07/03/2003"
    typInfo(9).time = "02:14:08.757"
    typInfo(10).Dato = "07/03/2003"
    typInfo(10).time = "02:15:08.958"

End Sub
Avatar billede nolle_k Nybegynder
10. november 2004 - 10:56 #1
Private Function CreateDataSet() As DataSet
      Dim ds As New DataSet
      Dim tbl As New DataTable
      tbl.Columns.Add("Dato", GetType(Date))
      tbl.Columns.Add("Time", GetType(Date))

      tbl.Rows.Add(CreateObject(CDate("07/03/2003"), CDate("02:10:08.1"})

      '....
      tbl.Rows.Add(CreateObject(CDate("07/03/2003"), CDate("02:10:08.1"})

      ds.Tables.Add(tbl)
      Return ds
    End Function

    Private Function CreateObject(ByVal MyDate As Date, ByVal MyTime As Date) As Object()
      Dim obj() As Object = {MyDate, MyTime}
      Return obj
    End Function
Avatar billede nolle_k Nybegynder
10. november 2004 - 10:58 #2
Lille rettelse til linien med CreateObject. Erstat med denne!

tbl.Rows.Add(CreateObject(CDate("07/03/2003"), CDate("02:10:08.1")))
Avatar billede taske Nybegynder
10. november 2004 - 21:48 #3
Tak. Dataset kan bruges uafhængigt af en database så det lyder til at være det rigtige. jeg var inde og kikke på andre metoder men behøver nu ikke at lede længere.

Taske
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
Kurser inden for grundlæggende programmering

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.

Du kan også logge ind via nedenstående tjenester