"Christmas - the time to fix the computers of your loved ones" « Lord Wyrm

Vb 6 Call prozedur

Elektrosmog 29.11.2002 - 10:07 683 15
Posts

Elektrosmog

Addicted
Avatar
Registered: May 2002
Location: Hinterberg
Posts: 390
Privat Sub cmdstart_click()
Call irgeindeinesub
End Sub

Die Sub hat funktionierenden Code. Wieso geht das nicht???


:confused: :confused: :confused:

Flip

1 x 4 Ringe
Registered: Jan 2002
Location: .
Posts: 3398
irgendeinsub.show

is nimma so wie in qbasic ;)

Elektrosmog

Addicted
Avatar
Registered: May 2002
Location: Hinterberg
Posts: 390
na geht a net. Er will mir des Modul irgendwie nicht laden.

Flip

1 x 4 Ringe
Registered: Jan 2002
Location: .
Posts: 3398
was genau willst du?

das show ladet im prog a neue form für was willst das sub loaden? was steht drinnen post mal den code bitte

Elektrosmog

Addicted
Avatar
Registered: May 2002
Location: Hinterberg
Posts: 390
Also nur ein Beispiel Code. Das orig hab ich daheim

Private Sub Command1_Click()
meinesub
End Sub

meinesub (=Modul)

Sub meinesub()
MsgBox "Hello!", , "test"
End Sub

ich will einen Code aus einem Modul laden und ausführen lassen

Flip

1 x 4 Ringe
Registered: Jan 2002
Location: .
Posts: 3398
ja das prob is so lang ich ned weiss was der code macht..

wieso muss der grad in an modul laden?!

und zu deinem beispiel! wie wärs damit:
Code:
Private Sub cmd1_click()
       MsgBox "hello!", , "test"
End Sub
:)

Elektrosmog

Addicted
Avatar
Registered: May 2002
Location: Hinterberg
Posts: 390
na ich hab da einen code den ich in mehrern Forms brauche. Den hab ich aber nicht auf dem Schulrechner

Flip

1 x 4 Ringe
Registered: Jan 2002
Location: .
Posts: 3398
hm ok soweit ich das jetz sagen kann würd ich den code in jede form reinschreiben...

oda handelt es sich um ein type oda um dim's?

wennst zhaus bist poste mal den code der das machen muss evtl. könn ma da was hinbiegen :)

Elektrosmog

Addicted
Avatar
Registered: May 2002
Location: Hinterberg
Posts: 390
geht das nicht, dass ich aus einem Modul einen Code lade??

jayjay

---------
Avatar
Registered: Dec 2001
Location: Klosterneuburg
Posts: 642
geht das dass du in ner Form einen Public Sub machst?
wenn ja, dann sollte der überall errkannt werden...
aufrufen tust ihn mit (weiß ich jetzt nicht genau wie aber eine der Methoden funkt ;))
call meinesub()
call meinesub
wenn das nicht geht musst du Argumente mitsenden...

Flip

1 x 4 Ringe
Registered: Jan 2002
Location: .
Posts: 3398
code aus an modul glaub ich ned!

ins modul kommen meines wissens nahc immer nur die deklarationen und nichts anderes...

JC

Administrator
Disruptor
Avatar
Registered: Feb 2001
Location: Katratzi
Posts: 9067
Zitat von Elektrosmog
Also nur ein Beispiel Code. Das orig hab ich daheim

Private Sub Command1_Click()
meinesub
End Sub
Das ist auf deiner Form, nehme ich an - egal welche ;)

Zitat von Elektrosmog
meinesub (=Modul)

Sub meinesub()
MsgBox "Hello!", , "test"
End Sub

ich will einen Code aus einem Modul laden und ausführen lassen
Meinesub: Ist das der Name deines Moduls oder deines Subs?

Wenn du ein Sub resp. eine Fuction in einem Modul erstellst und sie nicht explizit als Private deklarierst, ist sie immer Public.

Code:
Form1:
Private Sub Command1_click()
   ShowMsgBox
End Sub

Modul1:
Public Sub ShowMsgBox()
   MsgBox "WTF?", vbInformation+vbApplicationModal+vbOKonly, "Message"
End Sub
So funktionierts.

@Flip
In einem Modul lagerst auch deine Subs/Functions aus, die du auf verschiedenen Forms öfter verwendest.

Ringding

Pilot
Avatar
Registered: Jan 2002
Location: Perchtoldsdorf/W..
Posts: 4300
Du kannst kein Modul dazuladen. Du kannst es aber zum Projekt hinzufügen, dann muss es gehen.

Elektrosmog

Addicted
Avatar
Registered: May 2002
Location: Hinterberg
Posts: 390
Zitat von Ringding
Du kannst kein Modul dazuladen. Du kannst es aber zum Projekt hinzufügen, dann muss es gehen.

????

Im projektexplorer wird sie eh angezeigt. Meinst du dass?

JC

Administrator
Disruptor
Avatar
Registered: Feb 2001
Location: Katratzi
Posts: 9067
Wenns im Projekt-Explorer ist, dann geht's wie von mir beschrieben.
Kontakt | Unser Forum | Über overclockers.at | Impressum | Datenschutz