Visual Basic Einsteiger TuT

Guten Tag liebe Community,

Ich dachte mir, es gibt viele Leute die gerne das scripten mit VB lernen möchten aber keinen haben die es einem beibringen. Nun, ich bin bereit! :)

Was ihr braucht, ist ein PC, eine Maus und eine Tastatur! Spaß :) Ihr braucht Microsoft VisualBasic, die 2008er Version ist einfach zu handhaben, ihr bekommt dieses indem ihr einfach Googlet :)

Design


Hier eine Erklärung zu allen Gegenständen:
Nun gehts ans eingemachte!
Ihr öffnet VisualBasic und Clickt auf Datei> Neues Projekt> Windows Forms Anwendung.

Danach macht ihr erstmal das etwas kleinere Fenster etwas Größe und zieht fünf Buttons, zwei Textboxen und 6 Labels in das Fenster! Diese Steuerelemente findet ihr in der Toolbox die sich Links in dem Fenster befindet.

Nun zu den Button-Beschriftungen: Button1 beschriftet ihr mit +. Dies macht ihr indem ihr den Button anklickt. Danach geht ihr unten Rechts in das Eigenschaftenfenster und ändert da unter Text, Button1 in + (Addieren).
Button 2 benennt ihr als - (Subtrahieren)
Button 3 benennt ihr als x (Multiplizieren)
Button 4 benennt ihr als / (Dividieren)
Button 5 benennt ihr als = (wenn ihr darauf klickt bekommt ihr das Ergebnis.

Jetzt die Labels:
Label1 macht ihr auf Schriftgröße 48 aber gebt in dem Eigenschaftenfenster unter Text NICHTS ein! (Da wird später angezeigt mit welchem Zeichen wie z.B. +,-,x,/ arbeiten.

Label2 benennt ihr als Taschenrechner. Wie gesagt macht ihr das im Eigenschaftsfenster unter Text.

Bei Label3 gebt ihr nichts ein (Da steht später unser Ergebnis)

Label4 benennt ihr als Zahl1

Label5 benennt ihr als Zahl2

Label6 benennt ihr als Ergebnis

So jetzt zur Anordnung ich habe euch davon jetzt aml ein Screen gemacht weil man das schwer beschreiben kann.
Hier der Screen:(Der Link unten Links tut nichts zur Sache :))

Das wars zum Design!

Coden

Jetzt gehts ans Coden, man denkt immer es ist schwer aber es gibt immer einen Sinn und eine Logik.

Ihr macht einfach nen Doppelklick auf das Designte Fenster und dann kommt ein Textfenster wo ihr die Codes eingeben könnt.

Hier die gesamten Codes:

Quote:

Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Label1.Text = "+" End Sub Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click Label1.Text = "-" End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Label1.Text = "x" End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click Label1.Text = "/" End Sub Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click If Label1.Text = "+" Then Label3.Text = Val(TextBox1.Text) + Val(TextBox2.Text) ElseIf Label1.Text = "-" Then Label3.Text = Val(TextBox1.Text) - Val(TextBox2.Text) ElseIf Label1.Text = "x" Then Label3.Text = Val(TextBox1.Text) * Val(TextBox2.Text) ElseIf Label1.Text = "/" Then Label3.Text = Val(TextBox1.Text) / Val(TextBox2.Text) End If End Sub End Class

Ich habe jetzt hier schon alles komplett fertig reingestellt. Unten gibt es eine genauere Erklärung und ich erkläre euch warum da was steht! :) Ihr könnt also hier oben alles Kopieren und Einfügen und dann meinen Thread schließen, wisst aber nicht warum ihr was eingegeben habt. Um zu wissen warum ihr was eingetippt habt lest unten :)


Es geht los damit, dass wir dem Label1 sagen, das sie, wenn wir + , - , x oder / aknlicken, dieses auch anzeigen sollen. Das heißt, wir drücken auf den + Button und da, wo ihr Label1 Platziert habt erscheint dann das jeweilige Zeichen.

Der Code hierzu ist:

Quote:

Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Label1.Text = "+" End Sub

Das Public Class Form1, Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click und das End Sub stehen dort bereits am Anfang das heißt, ihr müsst nur Label1.Text="+" zwischen Private Sub... und End Sub einfügen müsst.

Das machen wir jetzt mit allem Zeichen. SO!

Quote:

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click Label1.Text = "-" End Sub

Quote:

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Label1.Text = "x" End Sub

Quote:

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click Label1.Text = "/" End Sub

Das war der leichteste Teil der ganzen Geschichte.

Weiter geht es damit, das wir VB sagen, dass er bei Label1 beim jeweiligen Klicken des +, -, x, / auch das Zeichen anzeigen soll wie hier!

Außerdem sagen wir VB das es die Zahlen aus Textbox 1 und 2 Addieren, Subtrahieren, Multiplizieren oder Dividieren soll! Aber das Ergebnis soll auch in Label 3 Angezeigt wird. Zum Beispiel: TextBox1 (Zahl3) +(addition) TextBox2 (Zahl5)= 8 (Soll in Label3 angezeigt werden)
Die Codes zu allen 4 Rechnungen sind:

Quote:

Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click If Label1.Text = "+" Then Label3.Text = Val(TextBox1.Text) + Val(TextBox2.Text) ElseIf Label1.Text = "-" Then Label3.Text = Val(TextBox1.Text) - Val(TextBox2.Text) ElseIf Label1.Text = "x" Then Label3.Text = Val(TextBox1.Text) * Val(TextBox2.Text) ElseIf Label1.Text = "/" Then Label3.Text = Val(TextBox1.Text) / Val(TextBox2.Text) End If End Sub

Zum Abschluss gebt ihr unter End Sub,

Quote:

End Class

ein!

Jetzt ist das Werk vollbracht :)

Ihr habt euren ersten eigenen Taschenrechner mit Visual Basic gescriptet! Um diesen zu testen drückt ihr oben in der Leiste des Visual Basic Fensters auf Play!

Wenn es nicht funktioniert, liegt es an euch oder an mir :D
Überprüft deshalb nochmal alle Codes.

Das wars von mir ;)
Ich hoffe ich konnte euch helfen. Seid nicht böse wenn es nicht gut ist, es ist mein erstes TuT :)

Ich freue mich über ein Thx ;)

Mfg MiesMuschel

1. VB ist KEINE scriptsprache.
2. Dein tut ist scheiße, warum muss ich wohl nicht sagen.
3. Du weißt selber nicht mal was du da eigentlich machst.
4. Nichtmal division durch 0 abgefangen.

edit:
5. [Only registered and activated users can see links. Click Here To Register...]

Ich möchte auch EInsteigern helfen und keinen Profis! Wenn ich das alles jetzt auf Pro-Sprache erkläre versteht das hier kein Anfänger! SO freundlich sein ist Luxus was?
Mfg

Quote:

Originally Posted by Miesmuschel Ich möchte auch EInsteigern helfen und keinen Profis! Wenn ich das alles jetzt auf Pro-Sprache erkläre versteht das hier kein Anfänger! SO freundlich sein ist Luxus was? Mfg

Du hilfst anfängern damit aber nicht, eher im gegenteil. Siehe edit.

Jeder hat eine andere Sicht! Das Tutorials falsche Informationen geben und das sie Anfänger ich sage mal "versauen" ist deine Sicht! Ich möchte den Leuten nur zeigen was VB eigentlich ist und was man damit machen kann, sozusagen ein Fundament schaffen

Tutorials versauen keine anfänger, nur schlechte tun dies ;)
Ist ja nett, das du dir die mühe machst, aber lass es lieber bis du wirklich weißt, was du da machst.

Nunja, ich bin auch noch nicht lange dabei aber ich dachte mir, dass die Member hier immer in der Profi Sprache sprechen. Und da ich auch noch fast ein Anfänger bin, dachte ich mir das ich mich am besten in die rolle reinversetzten kann.

sieht mehr nach einen how to taschenrechner aus ^^
bzw ein kleines code snippet

Quote:

Originally Posted by Miesmuschel Nunja, ich bin auch noch nicht lange dabei aber ich dachte mir, dass die Member hier immer in der Profi Sprache sprechen. Und da ich auch noch fast ein Anfänger bin, dachte ich mir das ich mich am besten in die rolle reinversetzten kann.

Allerdings können sich ja wohl auch Pros in die Rolle versetzen und wie Meep schon sagte, solche Tutorials versauen direkt alles, wenn man so anfängt.
Das ist doch Nur C&P.
Selbst wenn jemand, wie du es rätst, weiterliest damit er erfahren kann, warum er das eingegeben hat, wird er nicht fündig.
Das erklärst du doch gar nicht.
Du schreibst WAS dahin muss, aber warum muss da zb. End Class oder so hin?
Das ist wirklich nur ein C&P How to.

Und genau das kommt dabei raus, wenn ein Anfänger ein Tut schreibt.
Ist ja nicht schlimm, dass du Anfänger bist, aber ein 1. Klässler geht doch auch nicht dahin und will einer anderen Klasse aus 1. Klässlern Mathe beibringen!

[Only registered and activated users can see links. Click Here To Register...]