vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Mails senden, abrufen und decodieren - ganz easy ;-)  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fortgeschrittene Programmierung
und so sieht die Struktur in VB aus: 
Autor: dingsbums
Datum: 23.08.02 16:42

Private Type WorkPiece
zz As Long
beta As Double
df As Double
da As Double
Breite As Double
dnf As Double
dna As Double
d0 As Double 'Teilkreis
dv As Double 'V-Zylinderdurchmesser

End Type

Private Type maschine
nennx As Double
nenny As Double
nennz As Double
nenna As Double
nennb As Double

beschlx As Double
beschly As Double
beschlz As Double
beschla As Double
beschlb As Double

verzoegx As Double
verzoegy As Double
verzoegz As Double
verzoega As Double
verzoegb As Double



satzwechsel As Double 'in Sekunden
'Abrichtdaten

abrichtradius As Double
abrichtwinkel As Double
abrichtrolle As Double
abrichtsicherx As Double
abrichtsichery As Double
abrichtbahnzeit As Double
abrichtnennx As Double
abrichtnenny As Double
abrichtbeschlx As Double
abrichtbeschly As Double
abrichtverzoegx As Double
abrichtverzoegy As Double

werkstueckwechsel As Double 'Zeit fuer Werkstueck einlegen und entnehmen in Sekunden
werkzeugwechsel As Double 'Zeit fuer Entnahmeposition zum Schleifen und zurueck in Sekunden
abrichtwechsel As Double
' kalibrierung As double
' tasterwechsel As double
'Sonstige Zeitkonstanten
spindel_an As Double
spindel_aus As Double
kuehlung_an As Double
kuehlung_aus As Double
End Type


Private Type DuoTrioRotation
reduziert_vorschub1 As Double
reduziert_vorschub2 As Double
End Type

Private Type Dress
startabrichten As Long '0= nein, sonst= ja
abrichten_luecken As Long 'Abrichten nach Luecken
zyklus As Long
Abrichtzustellung As Double
zyklenanzahl As Long
abricht_v As Double
Profillaenge As Double
' profilbreite As double
profilhoehe As Double
scheibenbreite As Double
End Type

Private Type WheelRotation
Teilverfahren As Long
ueberlaufo As Double
ueberlaufu As Double
' Schleifzyklus
zyklustyp As Long
zyklusanzahl As Long
zustellung1 As Double
vorschub1 As Double
zustellung2 As Double
vorschub2 As Double
' Fuer Duo oder Triosaetze */
duotrio As DuoTrioRotation
'Abrichtdaten
Dress As Dress
End Type

Private Type WHEEL
typ As Long '/* z.B. CBNWHEEL */
rillig As Long '/* fuer Saetze typ = CBNWHEELSET */
numrot As Long '/* Anzahl der Umlaeufe */
Rotations(5) As WheelRotation
End Type

Private Type Process
Masch As maschine
Workp As WorkPiece
numwheels As Long
Wheels(5) As WHEEL
End Type

Dim modulMaschine As maschine
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
c-dLL AUS vb90dingsbums23.08.02 14:06
Re: c-dLL AUS vb224unbekannt23.08.02 15:06
Re: c-dLL AUS vb65dingsbums23.08.02 15:44
Re: c-dLL AUS vb220unbekannt23.08.02 15:49
Re: c-dLL AUS vb66dingsbums23.08.02 16:13
Re: c-dLL AUS vb220unbekannt23.08.02 16:20
Re: c-dLL AUS vb55dingsbums23.08.02 16:26
und so sieht die Struktur in VB aus:52dingsbums23.08.02 16:42
Re: und so sieht die Struktur in VB aus:232unbekannt23.08.02 16:48
Re: und so sieht die Struktur in VB aus:227unbekannt23.08.02 17:00

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel