Helpmij.nl
Helpmij.nl
Helpmij.nl
Steun Helpmij.nl! Klik hier     Computerprobleem? Klik hier!

Quote

Weergeven resultaten 1 tot 4 van 4

Onderwerp: Datum van DataGridView converteren

  • Vraag is opgelost
  1. #1
    Senior Member Jan92's avatar
    Geregistreerd
    17 februari 2010
    Locatie
    Oostende (België)

    Datum van DataGridView converteren

    Hallo, programmeurs

    Ik heb op mijn Form 2 DGV staan met elk slechts 2 kolommen.

    In de 1ste DGV staat data (kolom 1 = datums, kolom 2 = tekst)

    De 2de DGV is leeg

    Nu wil ik de gegevens van DGV 1 overzetten naar DGV 2 maar met de datums in een andere opmaak...


    Code:
                    For Each Row As DataGridViewRow In Me.DataGridView1.Rows
    
                    Dim intcount As Integer = 0
    
                    REM Opmaak VerlofDatum = "ddd.   dd-MM-yyyy"
    
                    Dim VerlofDatum As String = Me.DataGridView2.Rows(intcount).Cells(0).Value
    
                    Dim VerlofTekst As String = Me.DataGridView2.Rows(intcount).Cells(1).Value
    
                    REM De datum opmaak wijzigen :
    
                    Dim DatumAnders As String = Format(VerlofDatum, "dd-MM-yyyy   ddd.")
    
                    Dim n As Integer = DataGridView2.Rows.Add()
    
                    DataGridView2.Rows(n).Cells(0).Value = DatumAnders
    
                    DataGridView2.Rows(n).Cells(1).Value = VerlofTekst
                    
                    intcount += 1
    
                    Next
    Wat doe ik hier fout ?

  2. #2
    Senior Member Jan92's avatar
    Geregistreerd
    17 februari 2010
    Locatie
    Oostende (België)
    Oeps !

    Regel 4 en 5 moet natuurlijk DGV 1 zijn ! (maar dat is de fout niet)

    Hier dus nogmaals de code:

    Code:
                    For Each Row As DataGridViewRow In Me.DataGridView1.Rows
                    Dim intcount As Integer = 0
                    'Opmaak VerlofDatum = "ddd.   dd-MM-yyyy"
                    Dim VerlofDatum As String = Me.DataGridView1.Rows(intcount).Cells(0).Value
                    Dim VerlofTekst As String = Me.DataGridView1.Rows(intcount).Cells(1).Value
                    'De datum opmaak wijzigen
                    Dim DatumAnders As String = Format(VerlofDatum, "dd-MM-yyyy   ddd.")
    
                    Dim n As Integer = DataGridView2.Rows.Add()
                    DataGridView2.Rows(n).Cells(0).Value = DatumAnders
                    DataGridView2.Rows(n).Cells(1).Value = VerlofTekst
                    '
                    intcount += 1
                    Next

  3. #3
    Giga Senior JoZ1's avatar
    Geregistreerd
    17 december 2010
    Locatie
    Nieuwegein
    Afstand tot server
    ±90 km
    Dit zou moeten werken:

    CPP Code:
    1
    2
    3
    
    Dim dat As New Date
    Date.TryParse(VerlofDatum, dat)
    Dim DatumAnders As String = Format(dat, "dd-MM-yyyy   ddd.")

    Format werkt in dit geval alleen met Date-objecten.



    "Microsoft is not the answer. Microsoft is the question. NO is the answer."- E. Naggum

  4. #4
    Senior Member Jan92's avatar
    Geregistreerd
    17 februari 2010
    Locatie
    Oostende (België)
    Hartelijk dank, JoZ1

    Dat is wat ik zocht.

    Voor wie het ook zou kunnen gebruiken, hierbij de oplossing:

    Code:
               Dim intcount As Integer = 0
    
               For Each Row As DataGridViewRow In Me.DataGridView1.Rows
    
                    REM Opmaak VerlofDatum = "ddd.   dd-MM-yyyy"
    
                    Dim FDdatum As String = Me.DataGridView1.Rows(intcount).Cells(0).Value
    
                    Dim FDnaam As String = Me.DataGridView1.Rows(intcount).Cells(1).Value
    
                    REM De datum opmaak wijzigen
    
                    Dim dat As New Date
    
                    Date.TryParse(FDdatum, dat)
    
                    Dim DatumAnders As String = Format(dat, "dd-MM-yyyy   ddd.")
    
                    REM Overzetten naar DGV 2
    
                    DataGridView2.Rows.Add(DatumAnders, FDnaam)
    
                    intcount += 1
    
               Next

Berichtenregels

  • U mag geen nieuwe vragen starten.
  • U mag niet reageren op berichten.
  • U mag geen bijlagen versturen.
  • U mag uw berichten niet bewerken.
  •  
Helpmij.nl
Helpmij.nl

Helpmij.nl en business

Partners
Sponsoren
Linkpartners
Aanbiedingen