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

UptoLike

ВУЗ: 

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

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

Рубрика: 

Мартьянова А.Е. Базы данных и знаний 176
Else
r = MsgBox("П vbOKOnly)
lblFaculty.Enab
lblDean.Enable
lblTeachingDe t.Enabled = False
lblAll.Enabled = False
mnuTaskDean.Enabled = False
mnuTaskFaculty.Enabled = False
mnuTaskTeachingDepartment.Enabled = False
mnuGroup.Enabled = False
mnuStudent.Enabled = False
culty.En
mnuTeacher.E
mnuDiscipline
mnuStudying.E
mnuAdvanced.
mnuInquiry.En
End If
End Sub
Private Sub Form_L
lblDean.Enabled = F
lblTeachingDepartm
lblAll.Enabled = Fa
m n.Enab
mnuTaskFaculty.En
mnuTaskTeachingD
mnuGroup.Enabled
m ent.Enable
m ulty.Enabled
m e
mnuDiscipline.Enab
mnuStudying.Enabl
mnuAdvanced.Enab
mnuInquiry.Enabled
End Sub
КОНТРОЛЬНЫЕ ВОПРОСЫ к заданию
е
2. Пере и-
ме проектирования.
ароль введен неправильно", vbExclamation +
led = False
d = False
partmen
mnuFa abled = False
nabled = False
.Enabled = False
nabled = False
Enabled = False
abled = False
oad()
alse
ent.Enabled = False
lse
nuTaskDea led = False
abled = False
epartment.Enabled = False
= False
nuStud
nuFac
d = False
= False
nuTeacher.Enabl d = False
led = False
ed = False
led = False
= False
1. Что представляет собой управляющий эл
числите свойства элемента FlexGrid
мент FlexGrid?
доступные в реж
176
176                                    Мартьянова А.Е. Базы данных и знаний


Else
    r = MsgBox("Пароль введен неправильно", vbExclamation + vbOKOnly)
    lblFaculty.Enabled = False
    lblDean.Enabled = False
    lblTeachingDepartment.Enabled = False
    lblAll.Enabled = False
    mnuTaskDean.Enabled = False
    mnuTaskFaculty.Enabled = False
    mnuTaskTeachingDepartment.Enabled = False
    mnuGroup.Enabled = False
    mnuStudent.Enabled = False
    mnuFaculty.Enabled = False
    mnuTeacher.Enabled = False
    mnuDiscipline.Enabled = False
    mnuStudying.Enabled = False
    mnuAdvanced.Enabled = False
    mnuInquiry.Enabled = False
End If
End Sub

Private Sub Form_Load()
lblDean.Enabled = False
lblTeachingDepartment.Enabled = False
lblAll.Enabled = False
mnuTaskDean.Enabled = False
mnuTaskFaculty.Enabled = False
mnuTaskTeachingDepartment.Enabled = False
mnuGroup.Enabled = False
mnuStudent.Enabled = False
mnuFaculty.Enabled = False
mnuTeacher.Enabled = False
mnuDiscipline.Enabled = False
mnuStudying.Enabled = False
mnuAdvanced.Enabled = False
mnuInquiry.Enabled = False
End Sub



     КОНТРОЛЬНЫЕ ВОПРОСЫ к заданию
     1.    Что представляет собой управляющий элемент FlexGrid?
     2.    Перечислите свойства элемента FlexGrid доступные в режи-
ме проектирования.




                                      176

Страницы