Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Diagramm erstellen
Autor: OldMan
Datum: 03.11.05 17:14
Hier mal der selbstgebastelte Ansatz. Du brauchst eine Picturebox und einen Button auf der Form. Es sind allerdings keine Kurven sondern Linien wie beim Aktienkurs. Ich hoffe es passt trotzdem. Public GlobalX As Integer Public GlobalHeight As Integer Private Sub Command1_Click() GlobalX = -1 a = Array(10, 20, 10, 30, 20) For i = 0 To 4 DrawLine i, a(i) Next End Sub Public Sub DrawLine(ByVal X As Integer, ByVal Height As Integer) If GlobalX = -1 Then GlobalX = X GlobalHeight = Height Else k = Picture1.Height Picture1.Line (GlobalX * 100, k - GlobalHeight * 100)-(X * 100, k - Height * 100) GlobalX = X GlobalHeight = Height End If End Sub

Diagramm erstellen	541	Flipp	03.11.05 15:21
Re: Diagramm erstellen	329	OldMan	03.11.05 16:29
Re: Diagramm erstellen	306	Flipp	03.11.05 16:43
Re: Diagramm erstellen	302	OldMan	03.11.05 17:14
Re: Diagramm erstellen	350	Flipp	03.11.05 17:25
Re: Diagramm erstellen	317	OldMan	03.11.05 18:11
Re: Diagramm erstellen	297	Flipp	03.11.05 18:41
Re: Diagramm erstellen	320	OldMan	03.11.05 19:15
Re: Diagramm erstellen	354	Flipp	03.11.05 20:27
Re: Diagramm erstellen	311	OldMan	03.11.05 21:03

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übersicht

Suchen