home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / Basic / doc / Visual Basic / Image830.gif < prev    next >
Graphics Interchange Format  |  1999-11-20  |  328.1 KB  |  660x671  |  8-bit (161 colors)
   ocr: TIpouenypa KOMMEHTOPHH Sub Combo2. Click() . Combo2.Enabled = False leakTMBM3ALMR CIMCKa UBETOB H Label2.Enabled = False u METKH C Ha3BAHHEM LBeTO - L Textl.Text Textl.Text 3anHcb Ha3BAHHS uBera B TEKCTOBOC Combo2.Text + Chrs(13) + ChrS(10) OKHO H TIOATOTOBKI HO3HLHH ma BBona cheayiouen CTPOKH - . If Combo2.Text = "KpacHblH Then IIponepka BblbpaHHoro UBET M3 CIHCKA Label8.BackColor = KOn uBeTa M, B 3BMCHMOCTH OT BbiopaHHoro Elsclf Combo2.Text = "Besbii" Then uBeTa, H3MCHEHHC uBera $poHa METKM C Label8.BackColor = Kon usera HO3BAHHCM a LBeTe (KOIBI LBETOB Elself Combo2.Text = "YepHBIR npMBCACHB ...