[Text] Erläuterung der Type nutzung Verfasst am: 24.02.2008, 22:11
Hier erleutere ich euch das arbeitem mit einem Type.
Der Type:
Code:
Private Type Test
FormWidth As Long
StartTime As String
End Type
Dim t As Test
Dieser Type beinhaltet 2 Variablen. Einen Long & einen string.
Code:
Private Sub Form_Load()
t.FormWidth = Me.Width
t.StartTime = Now
End Sub
Beim Laden der form derwem dem type nun werte zugewiesen.
Diese koennen wir zum beispiel mit einer Massagebox ausgeben lassen.
Code:
Msgbox t.FormWidth & vbnewline & t.StartTime
das war nun ein ganz normaler Type mit 2 werten.
Nun erleutere ich euch noch einen Type mit array.
Code:
Private Type Test
Vorname As String
Nachname As String
End Type
Dim t(0 to 4) As Test
Dies ist nun ein type mit 2 strings. (Vor und Nachname.)
Diesem weisen wir nun 5 Personen (Der type startet mit 0 unf geht bis 4, das macht dann 5) zu:
nun koennen wir mit hilfe des arrays die jeweiligen daten abrufen
Code:
dim i as long
i = inputbox("Array eingeben")
Msgbox t(i).Nachname & vbnewline & t(i).Vorname
In einen Type kann man mehr informationen als in einer listview speichern, oder auch informationen, die nicht in der listview auftauchen sollen. Uber den array kann man dann auf den Gewuenschten Type zugreifen (in der listview wird der array als tag des Items Festgelegt).
Have Phun _________________
tr4st_ « Moderator »
Anmeldedatum: 17.12.2007 Beiträge: 315 Wohnort: Private Class _ Villa()
Verfasst am: 24.02.2008, 22:31
Eine gute Erläuterung der Type-Funktion. _________________ Avoid Suspicion, Manipulate your friends, Eliminate your enemies.