1

好的，所以我正在为一项作业制作一个多项选择测验游戏，并且我有一个用于类别列表和实际问题的表格。因为我在编码方面还很陌生，并且真的没有很多时间以一种我可能无法理解的方式完全重构我的代码，而不是将所有按钮添加到我刚刚制作的一个按钮“句柄”每个点击事件的一个子。这是这些潜艇之一的示例：

    Public Sub btnMusic_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnMusic.Click
    Questions.Show()
    Me.Close()
    Dim objReader As New System.IO.StreamReader("Music.txt")
End Sub

我的文本由以下结构读取：

    Structure QuizQ
    Dim Q As String
    Dim A As String
    Dim B As String
    Dim C As String
    Dim D As String
    Dim Correct As String
End Structure

然后我尝试根据结构阅读这些行：

            Dim I As Integer
        For I = 0 To 5
            MyQ(I).Q = objReader.ReadLine
            MyQ(I).A = objReader.ReadLine
            MyQ(I).B = objReader.ReadLine
            MyQ(I).C = objReader.ReadLine
            MyQ(I).D = objReader.ReadLine
            MyQ(I).Correct = objReader.ReadLine
        Next I

然后将所有按钮的文本设置为可能的答案，如下所示：

    lblQuestion.Text = MyQ(qNum).Q
    btnA.Text = MyQ(qNum).A
    btnB.Text = MyQ(qNum).B
    btnC.Text = MyQ(qNum).C
    BtnD.Text = MyQ(qNum).D

但此时文本不会显示在按钮上或问题所在的位置。我真的不知道从这一点上我能做什么，所以任何帮助都将不胜感激。

先感谢您！

4

0 回答 0