Основные возможности Visual Basic. Макова Н.Е. - 83 стр.

              Circle (4000, 2000), 1000, , , 2 – эллипс, полученный из ок-
         ружности радиусом 1000 горизонтальным сжатием в 2 раза.
              Circle (4000, 2000), 1000, , , 1/3 – эллипс, полученный из ок-
         ружности радиусом 1000 вертикальным сжатием в 3 раза.
              Circle (4000, 2000), 1000, , 1, 3, 2 – дуга эллипса.
              Circle (4000, 2000), 1000, , -1, -3, 2 – сектор эллипса.
              Метод Cls просто стирает все нарисованное и напечатанное.
              Метод Point (x,y) сообщает цвет любой точки на объекте.
              Метод PaintPicture копирует с одного объекта на другой
         прямоугольный кусок изображения.
              Задача. Пусть в объекты Picture1 и Picture2 загружены кар-
         тинки. Взять прямоугольный кусок из картинки в Picture2 и вста-
         вить, немного сжав, в определенное место картинки в Picture1.
              Решением является одна строка:
            Picture1.PaintPicturePicture2.Picture, 500,600,800,4500,1000,900,1200
              В объект Picture1 вставляется фрагмент из Picture2.Picture,
         причем левый верхний угол исходного изображения имеет коор-
         динаты (4500,1000), его ширина – 900, высота – 1200. Левый
         верхний угол результирующего изображения имеет координаты
         (500,100), его ширина – 600, высота – 800.

                                Цвет в Visual Basic
                Как до сих пор мы придавали цвет какому-нибудь элементу
         VB?
              -   В режиме проектирования мы устанавливали соответ-
         ствующее свойство в окне свойств. Для этого в закладке Palette
         выбирали один из нескольких десятков цветов.
              -   В режиме работы пользовались операторами типа
         Form1.BackColor = vbRed.
              Имеется всего 8 цветов, представленных этим способом:
                 vbBlack       - черный
                 vbRed        - красный
                 vbGreen      - зеленый
                 vbYellow     - желтый
                 vbBlue       - синий
                 vbMagenta    - фиолетовый
                 vbCyan       - голубой
                 vbWhite      - белый



                                                                               83

PDF created with FinePrint pdfFactory Pro trial version www.pdffactory.com