Базы данных и знаний. Мартьянова А.Е. - 168 стр.

UptoLike

ВУЗ: 

АГТУ | Астрахань

Составители: 

Рубрика: 

Мартьянова А.Е. Базы данных и знаний 168
Private Sub mnuAbout_Click()
inf =
End S
Priva
.Show
End S
frmDISCIPLINEs.Show
End Sub
Private Sub mnuExit_Click()
End
End Sub
Private Sub mnuFaculty_Click()
frmFACULTYs.Show
End Sub
Private Sub mnuGroup_Click()
frmGROUPs.Show
End Sub
Private Sub mnuInquiry_Click()
frmInquiry.Show
End Sub
Private Sub mnuStudent_Click()
frmSTUDENTs.Show
End Sub
Private Sub mnuStudying_Click()
frmSTUDYINGs.Show
End Sub
Private Sub mnuTaskDean_Click()
End Su
w
End Su
Private Sub mnuTaskTeachingDepartment_Click()
frmTaskTeachingDepartment.Show
MsgBox("By A.E. Martjanova, AGTU", vbInformation, "О программе")
ub
te Sub mnuAdvanced_Click()
frmADVANCEDs
ub
Private Sub mnuDiscipline_Click()
frmTaskDean.Show
b
Private Sub mnuTaskFaculty_Click()
frmTaskFaculty.Sho
b
168
168                                     Мартьянова А.Е. Базы данных и знаний


Private Sub mnuAbout_Click()
inf = MsgBox("By A.E. Martjanova, AGTU", vbInformation, "О программе")
End Sub

Private Sub mnuAdvanced_Click()
frmADVANCEDs.Show
End Sub

Private Sub mnuDiscipline_Click()
frmDISCIPLINEs.Show
End Sub

Private Sub mnuExit_Click()
End
End Sub

Private Sub mnuFaculty_Click()
frmFACULTYs.Show
End Sub

Private Sub mnuGroup_Click()
frmGROUPs.Show
End Sub

Private Sub mnuInquiry_Click()
frmInquiry.Show
End Sub

Private Sub mnuStudent_Click()
frmSTUDENTs.Show
End Sub

Private Sub mnuStudying_Click()
frmSTUDYINGs.Show
End Sub

Private Sub mnuTaskDean_Click()
frmTaskDean.Show
End Sub

Private Sub mnuTaskFaculty_Click()
frmTaskFaculty.Show
End Sub

Private Sub mnuTaskTeachingDepartment_Click()
frmTaskTeachingDepartment.Show

                                       168

Страницы