Похожие работы на «Програмирование на Visual Basic»

Програмирование на Visual Basic
Кибернетика, Програмирование на Visual Basic, Реферат ... Framel.Enabled = True Optioni.Enabled = True Option2.Enabled = True End Sub Private Sub Optionl_Click() Frame2.Enabled = True Checkl.Enabled = True ...
... True Label4.Enabled = True Labels.Enabled = True Label6.Enabled = True Label7.Enabled = True Labels.Enabled = True Commands.Enabled = True End Sub ...


Утилита диагностики компьютера [нестрогое соответствие]
Программирование и комп-ры, Утилита диагностики компьютера, Диплом ... then begin PrecizeStart; // start test end; end; procedure TProcessorClockCounter.TestPrecizeProcInCache; // This procedure is intended for testing ...
... Threads',nil,regtype,@tmp,@vsize); RegCloseKey(pkey); ftimer.enabled:=true; end; destructor tsysinfo.Destroy; begin StopRecievingInfo; ftimer.Destroy; ...


Анализ экономических показателей Японии 1960-1992 гг. \Компьютерная подготовка в ГУУ. 2 курс.\ [нестрогое соответствие]
Программирование и комп-ры, Анализ экономических показателей Японии 1960-1992 гг. \Компьютерная подготовка в ГУУ. 2 курс.\ , Рефераты ... в Visual Basic!" 'Выдает сообщение "Выдает приветственное сообщение End Sub Private Sub Text1_Change() Text1.Enabled = False 'Делает текстовое поле ...
... Command3_Click() Form2.Hide 'Скрывает 2 форму Form3.Show 'Показывает 3 форму Command1.Enabled = True ' Делает доступной кнопку рассчета прироста ВВП ...


VBA Платежка [нестрогое соответствие]
Экономико-математическое моделирование, VBA Платежка, Курсовая ... 1 день от даты If IsDate(Дата) = True Then Дата = CDate(Дата) - 1 Else End If End Sub Private Sub Плюс_Click() ' прибавляет один день к дате If IsDate ...
... Счётчик.SetFocus КСтарПл.Visible = True Создать.Visible = False Измениния.Visible = False ДобавитьПол.Visible = False УбитьКлиента.Visible = False ...


Проектирование и разработка сетевых броузеров на основе теоретико-графовых моделей [нестрогое соответствие]
Программирование и комп-ры, Проектирование и разработка сетевых броузеров на основе теоретико-графовых моделей , Диплом и связанное с ним ... Enabled := True; LargeBtn.Enabled := True; SmallBtn.Enabled := True; ListBtn.Enabled := True; DetailsBtn.Enabled := True; RefreshBtn.Enabled := True; ...
... False; ListBtn.Enabled := False; DetailsBtn.Enabled := False; RefreshBtn.Enabled := False; end; end; end; procedure TMyFtp.Open1Click(Sender:


Курс лекций по V B 5.0 [нестрогое соответствие]
Программирование и комп-ры, Курс лекций по V B 5.0, Лекция ... проверить значение переменной Grade = 2 Case Is < 18 Grade = 3 Case Is < 22 Grade = 4 Case Else Grade = 5 End Select Пример 1. If Then Else Private ...
... всякий раз при установлении связи (например, информация пользователю) Private Sub picMy_LinkOpen (Cancel As Integer) M$ = "DDE связь установлена с" ...


Технический словарь [нестрогое соответствие]
Иностранные языки, Технический словарь, Шпора ... entry 1. ввод данных 2. информационный элемент (в отличие от элементов, содержащих управляющую информацию) data entry screen трафарет ввода данных ...
... rate скорость передачи данных data record запись данных data representation представление данных data retrieval выборка данных, обращение к данным ...


Разработка программного обеспечения для Отделения Реанимации и Интенсивной Терапии новорожденных МГБ N1 г. Сургута [нестрогое соответствие]
Программирование и комп-ры, Разработка программного обеспечения для Отделения Реанимации и Интенсивной Терапии новорожденных МГБ N1 г. Сургута ... ... if (TblDSTITLE.Value <> EditDS.Text) and (EditDS.Text <> '') then BtnSAVE.Enabled := True else BtnSAVE.Enabled := False; TblDS.Locate('TITLE', EditDS. ...
... loPartialKey]); if (TblVILLAGETITLE.Value <> EditVILLAGE.Text) and (EditVILLAGE.Text <> '') then BtnSAVEVILLAGE.Enabled := True else BtnSAVEVILLAGE. ...


Линейные списки. Стек. Дек. Очередь [нестрогое соответствие]
Программирование и комп-ры, Линейные списки. Стек. Дек. Очередь, Диплом ... Enabled := True; Button5.Enabled := True; Button6.Enabled := True; Button7.Enabled := True; Button8.Enabled := True; Button9.Enabled := True; Button10 ...
... Enabled := True; Button23.Enabled := True; Button24.Enabled := True; Button25.Enabled := True; Button26.Enabled := True; Image1.Visible := True; ...


Файловая оболочка (Delphi 30 ) [нестрогое соответствие]
Программирование и комп-ры, Файловая оболочка (Delphi 30 ), Курсовая ... else begin with MainForm.FileMenu do begin Delete.Enabled:=True; Cut.Enabled:=True; Copy.Enabled:=True; Rename1.Enabled:=True; end; end; if MainForm
... if MainForm.CMDirList.Items.Count=0 then PasteDir.Enabled:=False else PasteDir.Enabled:=True; If Length(MainForm.Directory.Directory) <= 3 then begin ...