여기에 양식로드 서브 루틴이 있는데 프로그램이 첫 번째 서브 루틴 (즉, LoadProgrammes()
)을 실행 한 다음 나머지 서브 루틴을 건너 뜁니다. 나머지 "Form Load"가 호출되지 않도록 서브 루틴 LoadProgrammes()
에 대해 뭔가가 있습니다.양식로드 중에 서브 루틴이 건너 뜁니다.
ListActiveClasses()
도 마찬가지입니다. DisplayGroups()
만 제대로 호출되고 다음 코드 행이 호출됩니다.
글자 그대로 이유는 무엇이며 Google 솔루션을 찾기가 매우 어렵습니다. 도움을받을 수있는 분께 미리 감사드립니다. 내가 본 어떤
Private Sub frmEnroll_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
LoadProgrammes()
ListActiveClasses()
DisplayGroups()
End Sub
Private Sub LoadProgrammes()
Dim strLoadSQL As String
Dim dsLoad As New DataSet
Dim daLoad As OleDb.OleDbDataAdapter
Using con As New OleDbConnection(My.Settings.ConnectionPath)
strLoadSQL = "SELECT Programme FROM Programmes"
daLoad = New OleDb.OleDbDataAdapter(strLoadSQL, con)
daLoad.Fill(dsLoad, "LoadProgrammes")
'Add items to the combobox
For i = 0 To dsLoad.Tables("LoadProgrammes").Rows.Count
cmbProgramme.Items.Add(dsLoad.Tables("LoadProgrammes").Rows(i).Item(0))
Next
End Using
End Sub
코드 디버깅을 시도 했습니까? –