Witam.
Posiadam pisze mały programik który posiada structure z około 40 zmiennymi. Program polega na tym iż zaczytuje plik i wrzuca je do tych 20 zmiennych w strukturze, tylko nie po kolei. Później po kolei zapisywanie z tej struktury do pliku. Taka konwersja z jednego na drugie. Czy dało by się pobierać po kolei każda zmienna ze struktury z pętli z racji tego iż jest to sprawdzenie czy dana zmienna istnieje a jak nie to pozostawianie pustego pola przy 40 zmiennych dożo pisania niepotrzebnego i czy dało by się to jakoś obejść w pętli ?
Wzór Struktury.
Public Structure __Kontrahent
Dim TypKontrahenta As Byte
Dim KodIdentyfikacyjny As String
Dim NazwaSkrocona As String
Dim NazwaPelna As String
Dim Miasto As String
Dim KodPocztowy As String
Dim UlicaINumer As String
Dim NIPKontrachenta As String
Dim REGON As String
Dim Telefon As String
Dim Faks As String
Dim Teleks As String
Dim EMail As String
Dim WWW As String
Dim NazwiskoIImieKontaku As String
Dim AnalitykaDostawcy1 As String
Dim AnalitykaDostawcy2 As String
Dim PoleUzytkownika1 As String
Dim PoleUzytkownika2 As String
Dim PoleUzytkownika3 As String
Dim PoleUzytkownika4 As String
Dim PoleUzytkownika5 As String
Dim PoleUzytkownika6 As String
Dim PoleUzytkownika7 As String
Dim PoleUzytkownika8 As String
Dim NazwaBanku As String
Dim NumerKontaBanku As String
Dim PanstwoKontrahenta As String
Dim PrefiksPanstwaUE As String
Dim KontrachentUnijny As Boolean
End Structure
Moje pytanie jest kierowane dlatego iż jest stosowanie jednego zapytania pod każdą zmienną i zapisywanie ich po kolei, trochę to mozolne pisanie wszystkiego i czy dało by się to trochę uprościć?
If String.IsNullOrEmpty(__Kontrahent.NazwaBanku) Then
MsgBox("Puste")
Else
Plik += """" & __Kontrahent.NazwaBanku & """" & ","
End If
Czy wrzucić to w zwykła tablice i wtedy zaczytywanie zmiennych po kolei i zapisać sobie co każdy numerek oznacza ?