Das Quiz(erster versuch)

    • VB.NET

    Es gibt 11 Antworten in diesem Thema. Der letzte Beitrag () ist von nikeee13.

      Das Quiz(erster versuch)

      Edit by ErfinderDesRades: Ich schiebs mal in den SourceCode-Austausch, weil offensichtlich wird hier Sourcecode ausgetauscht ;)


      Hallo leute hier mein erstes programm.
      Um genau zu sein ist es ein quiz(für bio)

      Hier der code

      VB.NET-Quellcode

      1. Public Class Form1
      2. Private weiter As Integer = 0
      3. Private richtig As Integer = 0
      4. Private falsch As Integer = 0
      6. Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
      7. Select Case weiter.ToString
      8. Case 0
      9. ROTFür()
      11. Case 1
      12. weiskorp()
      14. Case 2
      15. eherz()
      16. End Select
      17. End Sub
      19. Private Function ROTFür() As String
      20. If Rabtn1.Checked = True Then
      21. MsgBox("Nicht Richtig", MsgBoxStyle.Critical)
      22. falsch = falsch + 1
      23. ElseIf Rabtn3.Checked = True Then
      24. MsgBox("Nicht Richtig", MsgBoxStyle.Critical)
      25. falsch = falsch + 1
      26. ElseIf Rabtn2.Checked = True Then
      27. MsgBox("Richtige Antwort", MsgBoxStyle.Information)
      28. Rabtn2.Checked = False
      29. weiter = weiter + 1
      30. weiskorp()
      32. End If
      33. End Function
      35. Private Function weiskorp() As String
      36. Label1.Text = "Bio Quiz Frage 2"
      37. Label2.Text = "Wozu braucht dein Körper Weiße Blutkörperchen?"
      38. Rabtn1.Text = "Um Eindringlinge wie Bakterien oder andere krankheitserreger zu erledigen"
      39. Rabtn2.Text = "Um Sauerstoff zu den Zellen zu Transportieren"
      40. Rabtn3.Text = "Um Keime und Viren auf der Haut zu zerstören"
      41. If Rabtn1.Checked = True Then
      42. MsgBox("Richtige Antwort", MsgBoxStyle.Information)
      43. Rabtn1.Checked = False
      44. eherz()
      45. weiter = weiter + 1
      46. ElseIf Rabtn3.Checked = True Then
      47. MsgBox("Nicht Richtig", MsgBoxStyle.Critical)
      48. falsch = falsch + 1
      49. ElseIf Rabtn2.Checked = True Then
      50. MsgBox("Nicht Richtig", MsgBoxStyle.Critical)
      51. falsch = falsch + 1
      52. End If
      53. End Function
      54. Private Function eherz() As String
      55. Label1.Text = "Bio Quiz Frage 3"
      56. Label2.Text = "Wofür brauchst du ein Herz?"
      57. Rabtn1.Text = "Um zu Atmen"
      58. Rabtn2.Text = "Um das gehirn durch venen mit sauerstoff zu versorgen"
      59. Rabtn3.Text = "Um den Stoffaustausch im Körper aufrecht zu erhalten"
      60. If Rabtn1.Checked = True Then
      61. MsgBox("Nicht Richtig", MsgBoxStyle.Critical)
      62. falsch = falsch + 1
      63. ElseIf Rabtn3.Checked = True Then
      64. MsgBox("Richtige Antwort", MsgBoxStyle.Information)
      65. ElseIf Rabtn2.Checked = True Then
      66. MsgBox("Nicht Richtig", MsgBoxStyle.Critical)
      67. falsch = falsch + 1
      68. End If
      69. End Function
      71. Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
      72. Label3.Text = richtig
      73. Label5.Text = falsch
      74. End Sub
      75. End Class


      Ich weiß es gibt bessere lösungen (denke ich mal) aber wie gesagt mein erstes programm
      Auf lob und kritik wäre ich dankbar ( und natürlich tipps)
      !! It's not a bug it's a feature !!

      Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „ErfinderDesRades“ ()

      PSPlover schrieb:

      tipps
      Gib Deinem Programm zunächst Option Strict On.
      Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
      Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
      Ein guter .NET-Snippetkonverter (der ist verfügbar).
      Programmierfragen über PN / Konversation werden ignoriert!

      1. Option strict on:

      C#-Quellcode

      1. Select Case weiter.ToString 'String
      2. Case 0 'Zahl
      3. ROTFür()
      5. Case 1
      6. weiskorp()
      8. Case 2
      9. eherz()
      10. End Select


      2. Benenn deine Prozeduren/Variablen/etc anständig.
      Hab dafür einige Sachen worauf man achten sollte:

      -Klassen/Eigenschaften immer mit einem Großbuchstaben anfangen
      -Methoden mit einem kleinbuchstaben anfangen und jedes weitere Wort dann mit einem großbuchstaben anfangen (aber alle wörter zusammenschreiben)
      -Parameter mit 'p' anfangen und dann wie bei Klassen/Eigenschaften
      -lokale Variablen mit 'l' anfangen und dann wie bei Klassen/Eigenschaften
      -getter/setter von Eigenschaften mit '_' anfangen und kleinschreiben
      -Interfaces immer mit 'I' anfangen
      -restliche globale Variablen kleinschreiben

      3.
      Messagebox.Show() benutzen
      Msgbox() ist nur ein wrapper dafür, aber da wird noch einiges konvertiert (weil msgbox() object parameter annimmt und man nur strings anzeigen lassen kann)

      Für einen ersten Versuch ist es doch gar nicht mal schlecht. Ich würde tippen, dass über 50% hier im Forum so angefangen hat.
      Aber natürlich gibt es da noch enorm viel zu Verbessern. (vom reinen Code mal ganz abgesehen)

      In der Programmierung wirst du merken, ist richtige Struktur/Aufbau des Programms entscheident.
      Am Anfang wird dir das eher unnötig erscheinen. Aber mit der Zeit (z.B auch wenn du ein Programm erweitern) willst, wirst du merken, dass es einfacher ist wenn du alles gut überlegt programmiert hast.
      Du hast hier eine Klasse und schreibst alles direkt hart in deine Controls rein.
      Was ist denn wenn du jetzt andere Fragen haben möchtest? Oder welche hinzufügen?
      Dann musst du recht viel ändern.

      Hier vielleicht ein Vorschlag, wie ich da rangehen würde. Ich würde objektorientiert programmieren. de.wikipedia.org/wiki/Objektorientierte_Programmierung
      D.h. dass ich mir erstmal anschaue was ich hier gerade vor mir habe.
      Ein Quiz. Ein Quiz hat Fragen und Antworten uns muss verwaltet werden.
      Hier sieht man ja direkt, dass man irgenwie drei Grundkomponenten hat.
      Du hast mehrere Fragen. D.h. du machst dir eine Klasse Frage. So kannst du mehrere Fragen verwalten (z.B über eine Liste)
      Eine Frage kann mehrere Antworten haben. D.h. in der Klasse Frage sollte es eine Auflistung (List(of ...)) von Antworten zu deiner Frage geben.
      Dementsprechend wird auch eine Klasse Antwort benötigt.
      Hier würde ich eventuell noch eine Eigenschaft anlegen ob diese Antwort die richtige auf die Frage ist. Diese Eigenschaft kann dann von der Klasse Frage verwaltet werden und nach außen hin dem User angezeigt werden. (z.B kann man in der Frage noch ein Attribut machen wie viele Punkte diese Frage gibt)

      So, nun steht ein recht simples Klassenmodell. Natürlich musst du in die Klassen noch ein paar Sachen wie Textattribute o.ä. einbauen.
      Nun würde ich mich an das Datenmodell sitzen. Sehr viele Programme haben etwas mit Datenverwaltung zu tun.
      Die Frage ist dabei manchmal wie groß man das auziehen möchte. Bei dir würde z.B auch eine Datenbank passen, aber das wäre m.M.n zu groß für das kleine Projekt.
      Schön ist es die Daten aus einer Datei zu holen.
      .NET bietet schöne Sachen mit XML an. So kann man z.B ein ganzes Objekt (eine Frage) speichern. Dann ist die Frage und alle Antworten dazu in einer Datei gespeichert.
      Auslesen geht ebenso einfach. Du merkst, wenn du dir vorher gut überlegst wie du es machen willst kannst du dir viel "Wirr-War" ersparen.

      Also probier doch einfach mal aus diese Klassen anzulegen.
      Und überleg einfach mal weiter wie man es schön machen könnte. Das Gute ist, dass man in so einem Modell schön neues Sachen einbauen kann.
      z.B dass es Spezialfragen oder so gibt, und wenn man die richtig beantwortet kriegt man ein Bild von einem Keks o.ä. :D

      ThePlexian schrieb:

      Und warum updatest du die Labels mit nem Timer ?
      Immer updaten, wenn Änderung vorhanden.

      Und wie soll das gehen?(code , wie gesagt anfänger)



      LaMiy schrieb:

      So kannst du dir viel "Wirr-War" ersparen.

      Danke für deinen tipp (werde ich bald mal testen)

      LaMiy schrieb:


      Das Gute ist, dass man in so einem Modell schön neues Sachen einbauen kann.
      z.B dass es Spezialfragen oder so gibt, und wenn man die richtig beantwortet kriegt man ein Bild von einem Keks o.ä.

      Das mit dem keks ist auch keine schlechte idee :D :)
      Und was ich noch fragen wollte , kannst du mir ein ebook empfehlen?
      !! It's not a bug it's a feature !!

      Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „PSPlover“ ()

      C#-Quellcode

      1. using System;
      2. using System.Collections.Generic;
      3. using System.ComponentModel;
      4. using System.Data;
      5. using System.Drawing;
      6. using System.Linq;
      7. using System.Text;
      8. using System.Windows.Forms;
      10. namespace WindowsFormsApplication1
      11. {
      12. public partial class Form1 : Form
      13. {
      14. private Quiz myQuiz;
      15. public Form1()
      16. {
      17. InitializeComponent();
      18. myQuiz = new Quiz();
      19. myQuiz.addQuestion(new Question("Wieviele Tage hat ein Monat?", new Answer("30", true), new Answer("25", false)));
      20. myQuiz.addQuestion(new Question("Wieviele Tage hat eine Woche?", new Answer("4", false), new Answer("7", true), new Answer("14", false)));
      21. myQuiz.addQuestion(new Question("Wer ist der coolste?", new Answer("RushDen", true), new Answer("Ich", false)));
      22. lblQuestion.DataBindings.Add(new Binding("Text", myQuiz, "ActualQuestion", true, DataSourceUpdateMode.OnPropertyChanged));
      23. updateLb();
      24. myQuiz.PropertyChanged += new PropertyChangedEventHandler(PropertyChanged);
      25. }
      26. private void updateLb()
      27. {
      28. listBox1.DataSource = null;
      29. listBox1.DataSource = myQuiz.ActualQuestion.Answers;
      30. }
      31. private void PropertyChanged(object sender, PropertyChangedEventArgs e)
      32. {
      33. if (e.PropertyName == "ActualQuestion")
      34. updateLb();
      35. }
      36. private void button1_Click(object sender, EventArgs e)
      37. {
      39. if (myQuiz.checkAnswer(listBox1.GetItemText(listBox1.SelectedItem)))
      40. {
      41. if (!(myQuiz.nextQuestion()))
      42. {
      43. MessageBox.Show("Du hast das Quiz durch!");
      44. myQuiz.mixQuestions();
      45. myQuiz.restart();
      46. }
      47. }
      48. else { MessageBox.Show("Falsch!"); }
      49. }
      50. }
      51. public class Question
      52. {
      53. public Question(string pQuestText, params Answer[] pQuestAnswers)
      54. {
      55. this._questionText = pQuestText;
      56. this._answers = pQuestAnswers;
      57. }
      58. private readonly string _questionText;
      59. public string QuestionText
      60. {
      61. get { return _questionText; }
      62. }
      63. private readonly Answer[] _answers;
      64. public Answer[] Answers
      65. {
      66. get { return _answers; }
      67. }
      68. public override string ToString()
      69. {
      70. return this.QuestionText;
      71. }
      72. }
      73. public class Answer
      74. {
      75. public Answer(string pAnswerText, bool pIsCorrect)
      76. {
      77. this._answerText = pAnswerText;
      78. this._isCorrect = pIsCorrect;
      79. }
      80. private readonly string _answerText;
      81. public string AnswerText
      82. {
      83. get { return _answerText; }
      84. }
      85. private readonly bool _isCorrect;
      86. public bool IsCorrect
      87. {
      88. get { return _isCorrect; }
      89. }
      90. public static bool operator ==(Answer pFirst, string pSecond)
      91. {
      92. return pFirst.AnswerText == pSecond;
      93. }
      94. public static bool operator !=(Answer pFirst, string pSecond)
      95. {
      96. return !(pFirst == pSecond);
      97. }
      98. public override bool Equals(object obj)
      99. {
      100. return base.Equals(obj);
      101. }
      102. public override int GetHashCode()
      103. {
      104. return base.GetHashCode();
      105. }
      106. public override string ToString()
      107. {
      108. return this.AnswerText;
      109. }
      110. }
      112. public class Quiz : INotifyPropertyChanged
      113. {
      114. public event PropertyChangedEventHandler PropertyChanged;
      115. protected virtual void OnPropertyChanged(string pProp)
      116. {
      117. if (this.PropertyChanged != null)
      118. this.PropertyChanged(this, new PropertyChangedEventArgs(pProp));
      119. }
      120. public Quiz()
      121. {
      122. this.actualIndex = 0;
      123. this.questions = new List<Question>();
      124. this.newRandom = new Random();
      125. this.mixQuestions();
      126. }
      127. public void addQuestion(Question pQuestion)
      128. {
      129. this.questions.Add(pQuestion);
      130. }
      131. public void addQuestion(string pQuestText, params Answer[] pQuestAnswers)
      132. {
      133. this.questions.Add(new Question(pQuestText, pQuestAnswers));
      134. }
      135. private Random newRandom;
      136. private List<Question> questions;
      137. private int _actualIndex;
      138. private int actualIndex
      139. {
      140. get
      141. {
      142. return _actualIndex;
      143. }
      144. set
      145. {
      146. _actualIndex = value;
      147. OnPropertyChanged("ActualQuestion");
      148. }
      149. }
      150. public Question ActualQuestion
      151. {
      152. get { return questions[actualIndex]; }
      153. }
      154. public bool checkAnswer(string pAns)
      155. {
      156. return questions[actualIndex].Answers.Where(item => item == pAns).First().IsCorrect;
      157. }
      158. public bool nextQuestion()
      159. {
      160. bool lAvailable = !(actualIndex == questions.Count() - 1);
      161. if (lAvailable)
      162. actualIndex++;
      163. return lAvailable;
      164. }
      165. public void restart()
      166. {
      167. this.actualIndex = 0;
      168. }
      169. public void mixQuestions()
      170. {
      171. this.questions = this.questions.OrderBy<Question, int>((item) => newRandom.Next(0, this.questions.Count())).ToList();
      172. }
      173. }
      174. }


      Hab dir das mal kurz gebastelt, gucks dir einfach mal an.

      (Du benötigst:
      1 Label (Darstellung der Frage)
      1 Listbox (Darstellung der Antworten)
      1 Button (Antwort bestätigen)

      Ist aber in C# (kannst einen Online Converter benutzen).

      @RushDen : Wie wäre es wenn die richtige Antwort mit "_" beginnt? Wird natürlich nicht angezeigt im Programm selbst und im Konstruktor von Answer wird ausgelesen welche Antwort richtig ist anhand des "_".

      Anwendung:

      VB.NET-Quellcode

      1. myQuiz.addQuestion(new Question("Wieviele Tage hat ein Monat?", new Answer("_30"), new Answer("25")));


      Der Konstruktor:

      VB.NET-Quellcode

      1. public Answer(string pAnswerText)
      2. {
      3. this._answerText = pAnswerText;
      4. this._isCorrect = pAnswerText.StartsWith("_")
      5. }


      8-) faxe1008 8-)

      @faxe1008
      Ich denke, dass das nicht ganz so optimal wäre, weil man dann bei den Antworten eingeschränkt wird. Da es immer nur eine Antwort gibt, würde ich den Konstruktor von der Question so machen:

      C#-Quellcode

      1. public Question(string pQuestText, Answer trueanswer, params Answer[] pQuestAnswers)
      2. {
      3. this._questionText = pQuestText;
      4. trueanswer.IsCorrect = true;
      5. pQuestAnswers.Add(trueanswer); //ToDo: Zufällig sortieren
      6. this._answers = pQuestAnswers;
      8. }
      Mfg
      Vincent

      Dann musst du allerdings anstatt der Listbox eine CheckedListBox zur Darstellung der Daten verwenden, wenn es mehr ne Art Multiple-Choice werden soll ;D. Oder mit sehr viel Eigenbastelei mit .MultiSelect bei der Listbox sollte das auch gehen.

      8-) faxe1008 8-)

      faxe1008 schrieb:

      Wie wäre es wenn die richtige Antwort mit "_" beginnt?
      Ich weiss zufällig, dass es bei Quizduell so ist, dass die richtige Antwort immer die ist, die als erstes übertragen wurde (also das 1. Item in der Antworten-Liste) und die Antworten anschließen nur im UI an anderen Positionen angezeigt werden. Ich glaube die haben das mit einem Binding bei der Grid-Position (Row/Column) und einem Random-Faktor gemacht. Weiss ich nicht mehr genau. Könnte man hier so ähnlich machen. Oder auch nicht.

      @RushDen Ich glaube du meinst mit "actual question" (="wirkliche" Frage) eher "current question" (=aktuelle Frage).
      Das, was du dir da mit der List<T> hingebastelt hast erinnert an eine Queue<T>. Vielleicht könntest du die ja statt einer List<T> verwenden.
      Von meinem iPhone gesendet

    Facebook
    Telefonspende