|
| Autor |
Nachricht |
Primal_ Newbie

Anmeldedatum: 23.02.2008 Beiträge: 19
|
VB6 Problem
Verfasst am: 04.03.2008, 22:29 |
|
|
hi ich hab mir nen Statistik rechner gemacht hier mal der sourcecode
Private Sub Command1_Click()
Dim An As Integer
Dim Stich As Integer
Dim Zahl As Integer
An = Text1.Caption
Stich = Text2.Caption
Zahl = Text3.Caption
Text4.Caption = An / Stich * Zahl
End Sub
ok was kommt jetzt hier rein
Private Sub Command1_Click()<--- da in die klammer denn wenn ich es debugge kommt nen fehler : methode oder Mitgliedsdaten nicht gefunden.
und der bereich ist gelb gefärbt. |
|
| |
|
 |
tr4st_ « Moderator »

Anmeldedatum: 17.12.2007 Beiträge: 315 Wohnort: Private Class _ Villa()
|
Verfasst am: 04.03.2008, 22:36 |
|
|
| Code: | Private Sub Command1_Click()
Dim An As Integer
Dim Stich As Integer
Dim Zahl As Integer
An = Text1.Text
Stich = Text2.Text
Zahl = Text3.Text
Text4.Text = An / Stich * Zahl
End Sub |
Avoid Suspicion, Manipulate your friends, Eliminate your enemies.
Zuletzt bearbeitet von tr4st_ am 04.03.2008, 23:38, insgesamt 2-mal bearbeitet |
|
| |
|
 |
c0re_ « Moderator »

Anmeldedatum: 29.11.2007 Beiträge: 425
|
Verfasst am: 04.03.2008, 22:36 |
|
|
Du kannst ja nicht mit Strings rechnen. Außerdem hat eine Textbox keine Eigenschaft .Caption. Da musst du schon .Text verwenden. ;D | Code: | Private Sub Command1_Click()
Dim An As Integer
Dim Stich As Integer
Dim Zahl As Integer
An = CInt(Text1.Text)
Stich = CInt(Text2.Text)
Zahl = CInt(Text3.Text)
Text4.Text = An / Stich * Zahl
End Sub |
Da war wohl einer schneller. 
 |
|
| |
|
 |
tr4st_ « Moderator »

Anmeldedatum: 17.12.2007 Beiträge: 315 Wohnort: Private Class _ Villa()
|
Verfasst am: 04.03.2008, 22:39 |
|
|
Die Eigenschaft "Integer" wird doch zugewiesen. Avoid Suspicion, Manipulate your friends, Eliminate your enemies. |
|
| |
|
 |
c0re_ « Moderator »

Anmeldedatum: 29.11.2007 Beiträge: 425
|
Verfasst am: 04.03.2008, 22:42 |
|
|
Integer ist keine Eigenschaft sondern ein Typ. Wenn er einen String aus einer Textbox in eine Integervariable laden will, muss er ihn vorher in eine Zahl (Integer) umwandeln.
Wie war das mit Basics? :p
 |
|
| |
|
 |
Primal_ Newbie

Anmeldedatum: 23.02.2008 Beiträge: 19
|
Verfasst am: 04.03.2008, 22:43 |
|
|
| ja ich dachte Caption weil in den eigenschafts fenster Caption stand und das für den Inhalt der TextBox war. (unverständlich^^) |
|
| |
|
 |
c0re_ « Moderator »

Anmeldedatum: 29.11.2007 Beiträge: 425
|
Verfasst am: 04.03.2008, 22:49 |
|
|
Warscheinlich hattest du die Form noch angeklickt. Schau noch mal nach. ;D
 |
|
| |
|
 |
tr4st_ « Moderator »

Anmeldedatum: 17.12.2007 Beiträge: 315 Wohnort: Private Class _ Villa()
|
Verfasst am: 04.03.2008, 23:00 |
|
|
Gut das in beiden Fällen das selbe raus kommt  Avoid Suspicion, Manipulate your friends, Eliminate your enemies. |
|
| |
|
 |
Primal_ Newbie

Anmeldedatum: 23.02.2008 Beiträge: 19
|
Verfasst am: 04.03.2008, 23:05 |
|
|
so noch ne Frage wie kann ich das Icon ändern oder den icon
bei VB6 gibt es nix mit dursuchen...pls help
//EDIT
hat sich schon geklärt trotzdem thx |
|
| |
|
 |
ZiG_ Überflieger

Anmeldedatum: 07.03.2007 Beiträge: 1248
|
Verfasst am: 05.03.2008, 09:04 |
|
|
| c0re hat Folgendes geschrieben: | Integer ist keine Eigenschaft sondern ein Typ. Wenn er einen String aus einer Textbox in eine Integervariable laden will, muss er ihn vorher in eine Zahl (Integer) umwandeln.
Wie war das mit Basics? :p |
Das stimmt nicht ganz. Klar sollte man wissen wie man von einem Datentyp in den anderen konvertiert, aber VB6 ist so Idiotensicher dass es das in den meisten Fällen von alleine schafft (Solange natürlich nur eine Zahl in der Textbox ist).
Ob es Unterschiede in der Performance gibt, weiß ich leider nicht. Müßte ich mal testen. Wer nicht auf seine Weise denkt, denkt überhaupt nicht. (Oscar Wilde) |
|
| |
|
 |
Primal_ Newbie

Anmeldedatum: 23.02.2008 Beiträge: 19
|
Verfasst am: 05.03.2008, 22:14 |
|
|
so in meinem prog soll man ja zahlen eingeben so... wenn ich jetzt buchstaben eingebe oder ein feld freilasse kommt direkt nen fehler was kann ich dagegen machen??
oder wie kann ich buchstaben sperren und bei leerer textbox ne msgbox mitm text bitte Zahl eintragen machen? |
|
| |
|
 |
tr4st_ « Moderator »

Anmeldedatum: 17.12.2007 Beiträge: 315 Wohnort: Private Class _ Villa()
|
Verfasst am: 05.03.2008, 22:44 |
|
|
Benutze bitte die Suchfunktion!
Es gibt auf jeden Fall die Lösung hier im Forum!
Sollte irgend jemand hier die Lösung posten bekommt er eine Verwarnung, die User sollen sich durch Eigeninitiative ihr Wissen erarbeiten und nicht durch fertig belegte Brote immer fetter werden! Avoid Suspicion, Manipulate your friends, Eliminate your enemies. |
|
| |
|
 |
c0re_ « Moderator »

Anmeldedatum: 29.11.2007 Beiträge: 425
|
Verfasst am: 06.03.2008, 07:06 |
|
|
So ziemlich das bekannteste Sinppet.
| Code: | Private Sub Text1_KeyPress(KeyAscii As Integer)
If InStr("1234567890" & Chr$(8), Chr$(KeyAscii)) = 0 Then
KeyAscii = 0
End If
End Sub |
Kenn ich schon auswendig. ^^
 |
|
| |
|
 |
ZiG_ Überflieger

Anmeldedatum: 07.03.2007 Beiträge: 1248
|
Verfasst am: 06.03.2008, 09:03 |
|
|
Ja toll c0re. Er hätte es aber selbst suchen sollen, da es eh schon oft gepostet wurde.
Außerdem kann man selbst so etwas kurzes unterschiedlich coden. Wer nicht auf seine Weise denkt, denkt überhaupt nicht. (Oscar Wilde) |
|
| |
|
 |