Учебник

    Онлайн учебник -
программирование генератора настольных игр на Visual Basic 6.0
    (c) by Valery V Shmeleff Moscow/Russia
www.oflameron.ru and www.oflameron.com  [Добавить сайт]  [Онлайн учебник]
  

    Использование встроенных функций редактора MS Word из программ на Visual Basic. Рассмотрим работу с таблицами - создание таблиц, установка параметров строк и столюцов, местоположения таблицы.

Freeware


    Dim TableWord As Word.Table 'объявляем объектную переменную в разделе Generals
    
    Set TableWord = DocWord.Tables.Add(DocWord.Range(), 12, 4) 'создаём таблицу 12 строк, 4 столбца
    Таблица будет создана размером во всю ширину страницы. Теперь можно добавлять текст в ячейки таблицы используя метод Cell.
    
    TableWord.Cell(1, 1).Range.Text = "Текст" 'печатаем текст в ячейке 1,1 (строка/столбец)
    
    Управление высотой строк таблицы
    
    TableWord.Rows.Height = 12 'делаем все строки высотой 12 pt
    
    или в сантиметрах
    
    TableWord.Rows(6).Height = CentimetersToPoints(2) 'высотой 2 см ТОЛЬКО для 6-й строки
    TableWord.Columns.Width = CentimetersToPoints(6) 'ширина стольбцов - 6 см
    TableWord.Columns(2).Width = CentimetersToPoints(3) 'ширина 2-го столбца - 3 см
    
    Можно менять положение таблицы
    TableWord.Rows.VerticalPosition = CentimetersToPoints(5) 'по вертикали на 5 см
    TableWord.Rows.HorizontalPosition = CentimetersToPoints(1.5) 'по горизонтали на 1,5 см
    
    Получить количество строк в таблице
    TableWord.Cell(2, 2).Range.Text = "Строк - " & TableWord.Rows.Count 'коллекция Rows
    
    Получить количество столбцов в таблице
    TableWord.Cell(3, 2).Range.Text = "Столбцов - " & TableWord.Columns.Count 'коллекция Columns
    
    Получить количество ячеек в таблице
    TableWord.Cell(3, 2).Range.Text = "Ячеек - " & TableWord.Range.Cells.Count
    
    Вписать текст в ячейку таблицы Tables(1)
    DocWord.Tables(1).Cell(6, 2).Range.Text = "Привет" 'строка 6, столбец 2
    
    

Игровой бланк
    
игровой бланк
[ Скачать ZIP ]


    
    
Freeware - free download software. Next   Freeware Syslog server
    
    

Курсовая работа - программа. Скачать курсовикна Visual Basic. Freeware. Бесплатная курсовая работа
Flashcard Free