VB6 Variable in anderen Sub übergeben
Hi, ich habe mal eine kleine Form mit Visual Basic 6 zu testzwecken erstellt, bestehend aus 2 buttons (cmd_eingabe, cmd_ausgabe)
Private Sub cmd_eingabe_Click()
Dim variable As String
variable = InputBox("Bitte etwas eintippen", "Eingabe")
End Sub
Private Sub cmd_ausgabe_Click()
MsgBox variable
End Sub
das steht drinnen. ich möchte nun, dass man auf eingabe klickt, da einen wert eintippt und diesen per klick auf ausgabe ausgegeben bekommt.
ich habe schon gegoogelt, aber die antworten haben iwie nicht funktioniert
statt
-->dim variable as string
:
-->public variable as string
aber da kommen nur fehlermeldungen
.
wenn das problem gelöst wäre, würde mich noch interessieren, wie ich zu einer sprungmarke in einem anderen sub per goto befehl springen kann.
aber das mit den variablen wäre mir wichtiger
Gruß
Antwort schreiben
Antwort 1 von gast666767 vom 13.04.2020, 00:17 Options
Hi, Du kannst doch die Variable als globale deklarieren.
also nicht in cmd_eingabe click() sondern "darüber Private variable as string angeben.
eine sub rufst du auf mit call test()
Antwort 2 von da_horscht vom 13.04.2020, 00:19 Options
sry, aber ich kann dir net ganz folgen :(
is schon spät un ich hab heut gefallen am obstler gefunden^^
kannst du mir das mal bitte am beispiel meines kleinen versuchscodes zeigen?
thx
gruß
Antwort 3 von da_horscht vom 13.04.2020, 00:20 Options
ne hat sich, habs kapiert^^
thx
un wie siehts aus mit goto?
Antwort 4 von da_horscht vom 13.04.2020, 00:24 Options
wenn ich einmal beim fragen bin(ich geh jezze ins bett, dann können die fragen über nacht beantwortet werden un ich muss mich morgen damit nich rumschlagen)
wenn ich 2 formen habe:
frm_1
frm_2
jetzt möchte ich, dass frm_2 nur dann angezeigt wird, wenn man auf cmd_1 drückt.
wie muss dann der code aussehen?
Gruß und gute nacht !
Antwort 6 von xmatrix vom 28.11.2021, 08:35 Options
Hallo da horscht,
ein goto in eine andere Sub ist nicht möglich und nicht notwendig. Hier ist gutes, einfaches Programm-Design gefragt. Programmteile, die an mehreren Stellen benötigt werden, sind in eine eigene Funktion zu setzen.
Wenn viele Programmanweisungen zusammen gehören und somit eine Einheit bilden, rate ich dazu, auch diese in eine eigene Sub zu schreiben, um den Überblick zu behalten.
Gruß
xmatrix
Option Explicit 'nur gültige Variablen nutzen
private strVariable as string 'Modulweit deklarieren
private sub test1()
strVariable = input("text", "text") 'gib' doch etwas ein
löschevariable 'ich nutze es hier (ohne goto)
end sub
private sub test2()
msgbox strVariable 'zeig's mir
löschevariable 'noch einmal (ohne goto)
end sub
private sub löschevariable()
strVariable = "" 'und löschen
end sub