[VS 2005 .NET]

Question

Public Shared Function résultatCalculs( ByVal longueurSep As System.Decimal, ByVal largeurSep As System.Decimal, ByVal epaisseurSep As System.Decimal) As Emballage_DS.ResultatCalculDataTable Dim dt As New Emballage_DS.ResultatCalculDataTable Dim dsParam As New Emballage_DS dsParam.ReadXml( "F:\dotnet\paramDatas.xml" ) For Each cartonRow As Emballage_DS.CartonsRow In dsParam.Cartons.Rows For Each intercalaireRow As Emballage_DS.IntercalairesRow In dsParam.Intercalaires.Rows Dim resultatcalculrow As Emballage_DS.ResultatCalculRow = dt.NewResultatCalculRow Dim resultatcalculrow2 As Emballage_DS.ResultatCalculRow = dt.NewResultatCalculRow If resultatcalculrow.nbSepCart <> 0 Or resultatcalculrow2.nbSepCart <> 0 Then dt.AddResultatCalculRow(resultatcalculrow) dt.AddResultatCalculRow(resultatcalculrow2) Else 'je voudrais ne pas afficher la ligne et passer à la suivante End If Next Next Return dt End Function

jrivet · Answer

Salut à toi aussi

, (autant de politesse m'émeuh)
Mais c'est de mieux en mieux...
Tu sais que le plus tu en dis sur ton problème le plus on pourras t'aider...
La nous ne sommes pas ton debuggueur ou bien un fournisseur de Snippets (codyx Powa)

@+: Ju£i?n
Pensez: Réponse acceptée

cs_casy · Answer

Ah tiens la mode vient de changer ???

Après les questions sans code, maintenant c'est le code sans question ?????

Allez courage, encore un peu d'effort et on arrivera à avoir un forum ou le règlement est respecté.

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #    http://aide-office-vba.monforum.com/index.php

[VS 2005 .NET]

2 réponses

Votre réponse

Discussions similaires