Visual Basic Forum

Visual Basic Forum
für VB6 und VB.NET Programmierer
 
RegistrierenRegistrieren  LoginLogin
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB6] Fragen - Antworten
Autor
Nachricht
Primal_
Newbie
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 »<b><font color=green>« Moderator »</font



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 »<b><font color=green>« Moderator »</font



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. Confused
 
tr4st_
« Moderator »<b><font color=green>« Moderator »</font



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 »<b><font color=green>« Moderator »</font



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
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 »<b><font color=green>« Moderator »</font



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 »<b><font color=green>« Moderator »</font



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 Wink
Avoid Suspicion, Manipulate your friends, Eliminate your enemies.
 
Primal_
Newbie
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
Ü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
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 »<b><font color=green>« Moderator »</font



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 »<b><font color=green>« Moderator »</font



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
Ü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)
 
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB6] Fragen - Antworten

Tags: vb6, mitgliedsdaten

 
 Verwandte Themen   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge [Umfrage] Multi-tool [By Dylan] - Mit 8 Funktionen schaut rein ! ! ! 772 30.05.2009, 16:11
Keine neuen Beiträge [Frage] Ich bekomme einen Fehler das "End if" fehlt obwohl e 699 14.09.2008, 16:33
Keine neuen Beiträge Post Methode 434 12.07.2009, 17:10
Keine neuen Beiträge [Text] Komponenten registrieren mit Sub Main 1741 26.04.2008, 13:45
Keine neuen Beiträge Melt sub / anti sandboxie usw 1182 14.04.2008, 18:39
 


[ Time: 0.0817s ][ Queries: 119 (0.0350s) ][ GZIP on - Debug on ]