したがって、データグリッドからデータを取得し、グリッドを1つずつ通過するプログラムがありますが、を使用してフォームを閉じ、Me.Hide
それを使用して別のフォームから再度リロードするとfrmQuiz.Show
、Loadイベントのコードが実行されませんfrmQuiz フォームとその結果、前回から残したレコードになります。フォームの Load イベントのコードを次に示します。
Private Sub frmQuiz_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
tracker = 0 'to keep track of which record to retrieve from datagrid,in this case the first
'TODO: This line of code loads data into the 'CompLitDataSet.tblQuestions' table. You can move, or remove it, as needed.
Me.TblQuestionsTableAdapter.Fill(Me.CompLitDataSet.tblQuestions)
hideGrid()
dgData.DataSource = TblQuestionsTableAdapter.GetAllUnsorted
Me.StartPosition = FormStartPosition.CenterParent 'load form at center screen
ReDim answers(TblQuestionsBindingSource.Count)
lblQuestion.Text = ""
lblQuestionNumber.Text = ""
PictureBox1.Visible = False
radA.Checked = False
radB.Checked = False
radC.Checked = False
radD.Checked = False
viewQuestions(0) 'show first questions
End Sub