Free kids game download  Printable kids game. If you are going on vacation with children, take some copies of this table game with you “Oflameron”. You should not pay money for it – it is free of charge. Just download the file with the game forms in a popular Word format from the site and print the necessary number of forms. You children will be engaged in a catching contest and you can have a good rest. The game “Oflameron” is not like other games you already know. 1, 2, 3 or 4 players can play on one blank (game form).

Free template  Free template. Here you can find website templates, web design manuals for beginners, free content, Java scripts and ready web sites. All materials are downloadable and absolutely free to use. All ready web sites are adapted for advertising software and optimized for effective Web search engine indexing.

Visual BASIC 6.0 и COM-компонент Word
Скачай курсовик


    Возможно Вам нужно разработать
программу на Visual Basic, обрабатывающую Word документы или Вы пишете курсовую работу. Тогда Вам будет полезен полный листинг программы на Visual Basic, демонстрирующий некоторые возможности работы с редактором MS Word. В примере использовался пакет MS Office 2003 Professional, но Вы легко можете работать и с предыдущими версиями офисного продукта. Для этого достаточно в листинге изменить только одну строку - вместо подключения Microsoft Word 11.0 Object Library подключить более раннюю версию, которая установлена на Вашем компьютере. Например, Microsoft Word 9.0 Object Library и т.д.
    

Программы Курсовая

    Работа с COM     КУРСОВАЯ РАБОТА - Скачай бесплатно >>>>  [Сайты]  

    
Курсовые работы [1]
    
Курсовые работы [2]
    
    
Раскрутка сайтов (ZIP)
    
    
Шаблоны сайтов
Барби Одежда для Барби Одежда Барби Одежда Барби Одежда Барби Одежда Барби

Как работать с приложением Word из Visual BASIC
    
    Программирование

Курсовая работа

        Здесь выложена курсовая работа по разработке программы, демонстрирующей использование приложения Word из пакета Office 2003 Pro как COM компонента в программе на Visual BASIC. Программа содержит 6 примеров, иллюстрирующих разные варианты работы с Word - поиск и выделение символов в таблице, поиск и замену текста в таблице, поиск и выделения ячеек в таблице, поиск текста в таблице и замену текста, цветат текста и цвета ячеек таблицы, полный пример работы с таблицей (пример №6).
    
    В качестве шаблона используется документ MS Word oflameron-form2.xml, сохраненный в формате XML. Вы совершенно легко можете использовать для обработки документ в формате .doc, для этого не нужно вносить никаких изменений в код.
    
    Для начала работы скопируйте файл oflameron-form2.xml в c:\oflameron-form2.xml
    
    В меню Visual Basic в пункте Project выберите References ... и в списке компонент поставьте галочку напротив "Microsoft Word 11.0 Object Library" (если у Вас установлен Word 2003). Если у Вас на компьютере установлена более старая версия Word, то компонента "Microsoft Word ..... Object Library" будет не версии 11.0 а другой. Выберите ту, которая есть у Вас.
    
    Курсовик
    
    Чтобы работать с Word как COM компонентом, используем раннее связывание
    Dim wrd As New Word.Application
    
    wrd.Visible = True - показать Word
    Set doc = wrd.Documents.Add("c:\oflameron-form2.xml") - загрузить шаблон документа

Курсовая бесплатно

    Будем работать с функциями поиска и замены символов (текста) во всем документе
    wrd.ActiveWindow.Selection.Find.Text = "sh" - текст для поиска
    wrd.ActiveWindow.Selection.Find.Replacement.Text = "T" - текст для вставки вместо найденного (замена)
    wrd.ActiveWindow.Selection.Find.Execute - Найти в выделить текст ( в данном примере "sh")
    
    wrd.ActiveWindow.Selection.Find.Execute Replace:=wdReplaceOne - выполнить замену найденного текста
    
    Как программно сменить обои Windows  Free tutorial for beginners Visual Basic programmers  Имиджи игральных карт Adobe Photoshop
    
    Если в какой то ячейке таблицы в документе уже найден заданный текст, то можно выделить эту ячейку и поменять ее атрибуты (например, цвет фона)
    wrd.ActiveWindow.Selection.SelectCell - выделить ячейку таблицы, в которой уже найден текст
    
    wrd.ActiveWindow.Selection.Cells.Shading.BackgroundPatternColor = wdColorWhite - заменить цвет фона ячейки на белый
    
    Игры  Английский язык on-line  Рефераты и курсовые работы по программированию
    
    Цвет текста в выделенной ячейке можно поменять
    wrd.ActiveWindow.Selection.Font.Color = wdColorWhite - заменить цвет текста в ячейке таблицы документа Word
    
    Однако, такой поиск и замена будут выполняться только для одной ячейки. Чтобы выполнить последовательный поиск и замену, нужно написать
    wrd.ActiveWindow.Selection.Find.Wrap = wdFindContinue
    
    Пример:
    For i = 0 To 15
      For j = 0 To 59
      wrd.ActiveWindow.Selection.Find.Text = "sh"
      wrd.ActiveWindow.Selection.Find.Replacement.Text = "T"
      wrd.ActiveWindow.Selection.Find.Wrap = wdFindContinue
      wrd.ActiveWindow.Selection.Find.Execute Replace:=wdReplaceOne
      wrd.ActiveWindow.Selection.SelectCell
      wrd.ActiveWindow.Selection.Font.Color = wdColorWhite
      wrd.ActiveWindow.Selection.Cells.Shading.BackgroundPatternColor = wdColorSeaGreen
      Next j
    Next i
    
    Программирование на Visual Basic 6.0 Документация и примеры  Документация по visual basic  Брендинг. Рекламные кампании

Курсовая работа

    Как распечатать документ
    wrd.ActiveDocument.PrintOut Copies:=1, Pages:="1", ManualDuplexPrint:=False - печать на принтере страницы 1
    
    wrd.ActiveDocument.PrintOut Copies:=1, Pages:="1,2", ManualDuplexPrint:=False - ОДНОСТОРОННЯЯ печать на принтере страниц 1 и 2
    
    wrd.ActiveDocument.PrintOut Copies:=1, Pages:="1,2", ManualDuplexPrint:=True - ДВУСТОРОННЯЯ печать на принтере страниц 1 и 2 (если принтер поддерживает двустороннюю печать).
    
    Как закрыть документ Word
    wrd.ActiveDocument.Close
    
    Как закрыть приложение Word
    wrd.Quit
    
    Работа с COM компонентами  Оптимизация запросов поисковых машин  Земельные участки


    Получить символ по его индексу
    wrd.ActiveDocument.Characters(116).Text
    
    Заменить символ по его индексу
    wrd.ActiveDocument.Characters(116).Text="text"
    
    Получить слово по индексу
    wrd.Words(12).Text
    
    Заменить текст
    wrd.Words(12).Text="Текст для замены"
    
    Количество предложений в документе
    wrd.ActiveDocument.Sentences.Count
    
    Создать новый раздел на текущем листе
    wrd.Application.Selection.InsertBreak (wdSectionBreakContinuous)
    
    Получить 2-е слово, в предложении2,в параграфе 2, в секции 1
    wrd.Sections(1).Range.Paragraphs(2).Range.Sentences(2).Words(2).Text
    
    Количество листов в документе
    wrd.ActiveDocument.BuiltInDocumentProperties(wdPropertyPages)
    
    Переход на лист №10
    wrd.Application.Selection.GoTo(wdGoToPage, , , "10").Select
    
    Перейти к таблице
    wrd.Application.Selection.GoTo(wdGoToTable, , , "1").Select
    
    
Работа с графическими объектами
    
    Создаем ОВАЛ
    Set newoval = wrd.Shapes.AddShape(9, 200, 200, 100, 100)
    Оформление графического объекта
    newoval.Line.ForeColor.RGB = RGB(0, 0, 255) - цвет линии
    newoval.Line.Weight = 2.25 - толщина линии
    newoval.Fill.ForeColor.RGB = RGB(255, 255, 95) - цвет заливки
    
    Создаем ПРЯМОУГОЛЬНИК
    Set 4tngl = wrd.Shapes.AddShape(1, 350, 200, 100, 80)
    Можно менять порядок отображения объектов на странице, поворачивать на произвольный угол и т.д.    [
Бесплатные сайты]
    
    
    

    ТОП-руководство по раскрутке сайтов - 9 Мбайт >>    

         

    

    

    

    

Сайт управляется системой uCoz