Visual Basic 6 - Projekt mit zwei Formen

Kannst du in Form 1 nicht noch ne Fuktion machen, die den Wert von a zurueckgibt, also etwa so:

Vielen Dank es funktioniert.

Wenn ich zwei Variablen rüberholen möchte könnte ich das dann auch eventuell mit einer Funktion realisieren.?


Dieses funktioniert z.B nicht:

Public Function getA() As Double, getB() As Double
    getA = a
    getB = b
End Function



Ich habe noch eine andere Frage vielleicht könntest du sie mir auch noch kurz beantworten ich wäre dir sehr dankbar.

Wenn ich den Button1 bei frmForm1 anklicke dann rechnet mir das Programm etwas aus.
Nun möchte ich das wenn Button1 von frmForm2 angeklickt wird in Private Sub Command1_Click() springen. Weißt du wie das geht?



frmForm1:


Private Sub Command1_Click()
   
      .................
      .................
      .................
   
End Sub



frmForm2:

Private Sub Command1_Click()

       go to frmForm1.Private Sub Command1_Click()  ???

End Sub

 

Nö, Funktionen haben nur einen Rückgabewert, aber du könntest natürlich für jede Variable eine eigene Funktion schreiben. Oder du musst einen komplexeren Datentyp wählen, der dann mehrere Variablen vereint. Ich hab keinen Plan von VB, keine Ahnung wie das da geht.
Zur zweiten Frage:
Geht schätzungsweise so nicht, dazu müsste die Funktion in Form1 public sein (heisst auch von ausserhalb von Form1 aufrufbar). Dann müsste es so gehen:

Code: [Auswählen]

'frmForm1:
Public Sub Command1_Click()
   'do something
End Sub

'frmForm2:
Private Sub Command1_Click()
   
 [b] frmForm1.Command1_Click() [/b]

End Sub
 

Kannst du mal etwas mehr Quellcode posten? Insbesondere der Teil, wo die Command1_Click()-Subs aufgerufen werden etc.

Ich kann den Quelltext hier nicht öffentlich posten da es eine Diplomarbeit ist an der ich gerade arbeite. Ich habe nur keine Ahnung von Programmieren kann ichs dir per ICQ oder so schicken?

Ich hab jetzt folgendes probiert funktioniert aber leider nicht.


Form1:


Public Sub mySub()

   'Mein Code

End Sub




Form2



Public Sub Command1_Click()

     Form1.mySub()

End Sub

nee sorry so: das fettgedruckte ist im Quelltext rotmakiert.


Form1:


Public Sub mySub()

   'Mein Code

End Sub


Public Sub Command1_Click()

    mySub()

End Sub



Form2



Public Sub Command1_Click()

     Form1.mySub()

End Sub
 

Lass mal die Klammern weg:

Danke es funktioniert 

Danke schon mal für deine Hilfe ich habe aber noch zwei weitere Fragen. 


Zum einen möchte ich in Form2 eine Tabelle integrieren. Ich habe keine Active Steuerelemente weil Studentenversion. Nun wollte ich wissen wie ich die Tabelle am besten programmieren soll.

Ich habe eine Funkiton z.B y = sin(wt) und der wert y für wt = Pi soll in die eine spalte und der wert y für wt = 2Pi in eine andere Spalte oder vielleicht auch Zeile. Nur so als Beispiel.




Zum anderen lasse ich in Form1 unter "Public Sub mySub" einige Zahlenwerte einlesen. Mit diesen Werten zeichne ich in Form2 einige Graphen aber ohne picturebox.

Nun habe ich einen button in Form2 programmiert. Wenn ich diesen anklicke sollen alle Graphen, die Tabelle und alles was ich mit der Funktion "Public Sub mySub()" in Form2 darstellen möchte gelöscht werden. Wie könnte ich das realisieren?


Public Sub mySub()

'werte einlesen

'show form2

' Kurven graphisch darstellen

' Tabelle erstellen

End Sub 

Tja, da muss ich leider passen - hab halt null Ahnung von VB. Wenn es dann irgendwo konkrete Probleme gibt vielleicht, aber für die Fragen müsste ich mich selbst erst einlesen, da wäre es dann wohl sinnvoller, wenn du das direkt machst...