Hot News:

Unser Angebot:

  Foren auf CAD.de (alle Foren)
  VBasic / vb.net / vbs / wsh
  Variable mit Array definieren?

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
Autor Thema:  Variable mit Array definieren? (489 mal gelesen)
Gangolf1
Mitglied
CAM-Manager


Sehen Sie sich das Profil von Gangolf1 an!   Senden Sie eine Private Message an Gangolf1  Schreiben Sie einen Gästebucheintrag für Gangolf1

Beiträge: 204
Registriert: 15.01.2003

erstellt am: 18. Dez. 2015 10:29    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo,

ich habe ein Problem. Ich habe die Variable a mit vortlaufender Nummer bis 15 als (a1,a2,a3....a15)

Nun möchte ich in eine For schleife einen Zähler einbauen der die Nummer der Variable a angibt und dort dann einen Wert zuweisen.

Dim b As Integer
b = 0
Dim a(15) As Integer

For i = 1 To 15
b=b+1
a(b) = 66
Next


Wenn das so richtig funktionieren sollte dann müssten jetzt alle Variablen a1 bis a15 den Wert 66 bekomen.
Geht aber nicht. Es sind alle auf Null !?
Warum wo liegt der Fehler?

Habe es testweise auch mit einem kleinere Programm versucht zu überprüfen:


Dim a(15) As Integer
a(3) = 66
b = a4

Auch hier bleibt b = Null 


Vielen Dank für Eure Hilfe.


Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

KMassler
Ehrenmitglied V.I.P. h.c.
CAD Admin + Mädchen für Alles...



Sehen Sie sich das Profil von KMassler an!   Senden Sie eine Private Message an KMassler  Schreiben Sie einen Gästebucheintrag für KMassler

Beiträge: 2657
Registriert: 06.11.2000

SolidWorks Start 1999
** CSWP 01/2008 **
Dell Precision 7540 mobile Workstation,
64GB, Quadro RTX 3000;
SWX2020 SP5;
SAP/PLM+ECTR;
DriveWorks Pro;
Programmierung: VBA, aktuell Visual Studio 2017/VB.Net

erstellt am: 18. Dez. 2015 12:16    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Gangolf1 10 Unities + Antwort hilfreich

Sub main()

Dim b As Integer
Dim a(15) As Integer
Dim msg As String

For b = 1 To 15
    a(b) = 66
    msg = msg & "a(" & Str$(b) & ")= " & Str$(a(b)) & vbNewLine
Next

MsgBox msg
End Sub


[Edit]
Dazu muss man noch sagen, dass Dim a(15) nicht 15 sondern 16 Elemente definiert, da ohne weitere Angabe immer bei 0 angefangen wird zu zählen, also a(0) ... a(15) = 16 Elemente. Bei dir bleibt jetzt a(0) ungenutzt. Schadet in diesem Fall nicht, wird aber üblicherweise nicht so gemacht.
Ach ja, noch eins: a4 ist nicht gleich a(4), das sind zwei komplett unterschiedliche Variablen.
Beim Programmieren gibt's hier keine Fuzzy-Logik. D.h. der VBA-Interpreter liest nicht deine Gedanken sondern hält sich strikt an das, was du schreibst.
[/Edit]

Schöne Feiertage und einen guten Rutsch!  
------------------
Klaus

www.al-ko.com | mein Gästebuch

[Diese Nachricht wurde von KMassler am 18. Dez. 2015 editiert.]

[Diese Nachricht wurde von KMassler am 18. Dez. 2015 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2023 CAD.de | Impressum | Datenschutz