1 Ақпараттық (информациялық) қызмет көрсету жүйелері мен компьютерлік технологияны білім беруде қолдану мәселесі

жүктеу 3,49 Mb. бет 10/17 Дата 05.03.2018 өлшемі 3,49 Mb. #11288

Data1 компонентінің DatebaseName қасиетіне C:\dip\Ibr.mdb мәнін береміз. Command1 компонентінің код терезесіне мына процедураны ендіреміз: Private Sub Command1_Click() Form1.Show Form2.Hide End Sub Сосын, тағы бір жаңа форма ашамыз, Негізі мәзірдегі Command3 компонентінің код терезесіне сол ашылған 4-формаға өту программасын жазамыз: Private Sub Command3_Click() Form4.Show End Sub Жаңа ашылған форма (Form4) бетіне Label1, Label2, Label3, Label4, Command1 компоненттерін орнатып, Caption қасиеттеріне қажетті мәліметтерді ендіреміз (15 сурет). Command1 түймесінің код терезесіне мына программаны ендіреміз: Private Sub Command2_Click() Me.Hide Form1.Show End Sub жүктеу 3,49 Mb. Достарыңызбен бөлісу:

©g.engime.org 2024
әкімшілігінің қараңыз