- •1)Структурные особенности Visual Basic. Подпрограммы. Пример.
- •2. Диалоговые окна MsgBox и InputBox. Примеры.
- •3. Четыре принципа объектно-ориентированного программирования. Их реализация в Visual Basic.
- •4. Классы. Интерфейс классов. Создание динамических библиотек на основе классов в Visual Basic. Регистрация библиотек.
- •5. Способы объявления объектных переменных в Visual Basic.
- •6. Раннее и позднее связывание с объектом. Примеры.
- •7. Способы объявления событий классов. Примеры.
- •8. Создание элемента управления ActiveX в Visual Basic. Отображаемые и пользовательские свойств и методы ActiveX-компонент. Передача события приложению–контейнеру. Регистрация компонент.
- •9. Пример динамического способа формирования объектов на форме vb.
- •10)Пример работы с коллекцией объектов, свойствами и методами объектов.
- •11. Работа с отладчиком Visual Basic. Окна Watch, Immediate.
- •12. Оператор On Error. Методы объектов Debug. Условная компиляция. Примеры
- •13. Свойства и методы объектов Debug, Err. Примеры.
- •Объявление переменных
- •Математические операции
- •Строковые операции
- •Оптимизация приложений
- •Оптимизация скорости работы приложения
- •Оптимизация размера приложения
- •Оптимизация размера графики приложения
- •15. Основные свойства и методы объектов Screen. Примеры
- •Свойство ActiveControl
- •16. Основные свойства и методы объектов Clipboard. Примеры.
- •17. Основные свойства и методы объектов App. Примеры
- •18.Редактор меню Menu Editor. Оконные приложения.Основные свойства объекта Menu. Примеры.
- •Отображение контекстных меню
- •Изменения кода для отображения контекстных меню
- •19.Основные объекты (FileSystemObject, File, Drive, Folder и TextStream.), их свойства и методы библиотеки Scripting.FileSystemObject
- •20. Основные свойства, методы и события объекта UserControl.
- •26. История развития объектных моделей.
- •27. Компонентные приложения. Особенности компонент.
- •28. Интеграция приложений средством Automation.
- •29. Объектная модель ms Word. Свойства и методы объекта Application модели ms Word. Пример.
- •30. Примеры процедур на определение списка всех панелей инструментов и тем главного меню ms Word.
- •32. Свойства и методы объектов Options, Dialogs, Selection и Range объектной модели ms Word.
- •33. Объекты, свойства и методы семейства CommandBars
- •34. Объекты и семейства объекта vbe
- •Объект CodeModule .Представляет программу, определенную для таких компонентов проекта как форма, класс или документ. Дополнительные сведения
- •Объект CommandBarEvents
- •Семейство CommandBars
- •Объект vbComponent
- •Семейство vbComponents
- •Объект CodePane
- •Семейство CodePanes
- •Объект Events
- •Семейство LinkedWindows
- •Объект Property
- •Семейство Properties
- •Объект Reference
- •Семейство References
- •Объект ReferencesEvents
- •Объект vbe
- •Объект vbProject
- •Семейство vbProjects
- •Объект Window
- •Семейство Windows
- •Редактор Visual Basic
- •Библиотека объектов Office 2000 и Object Browser
- •37. Объектная модель ms Excel. Свойства и методы объекта Application.
- •38. Объектная модель ms Excel. Свойства, методы, события объекта WorkBook.
- •39. Объектная модель ms Excel. Свойства, методы, события объекта WorkSheet
- •40. Методы класса WorkSheetFunction объектной модели ms Excel. Пример на вычисление выражения.
- •41. Пример использования объекта SpreadSheet в проектах vb.
- •42. Функции работы с матрицами окна vba Excel. Пример решения системы линейных уравнений.
- •43. Свойства объекта Range объектной модели ms Excel.
- •44. Методы объекта Range объектной модели ms Excel. Примеры.
- •45. Пример сортировки слов в строке с использованием объектной модели ms Excel.
- •46. Пример вычисления корня нелинейного уравнения с использованием объектной модели ms Excel.
- •47. Свойства и методы объекта Chart объектной модели ms Excel. Пример.
- •Терминальные свойства объекта Chart
- •Методы объекта Chart
- •События объекта Chart
- •Построение обработчиков событий
- •48. Пример отображения на форме vb графика функции с использованием объектной модели ms Excel. Рассмотреть способ передачи графика через диск и через буфер обмена.
- •49. Методы SolverOk и SolverAdd библиотеки Solver.Xla.
- •50. Методы SolverOptions, SolverSolve и SolverDelete, SolverSave, SolverLoad библиотеки Solver.Xla.
- •52. Пример динамического способа формирования объектов на форме vba Excel.
- •51. Пример решения системы нелинейных уравнений с использованием объектной модели ms Excel.
- •53. Объектная модель (объекты и коллекции) ms Access.
- •54. Свойства и методы объекта Application объектной модели ms Access.
- •55. Интерфейсы объектов данных и интерфейсы прикладного уровня программирования.
- •56. Объектная модель dao рабочей области ms Jet. Объекты и семейства. Пример открытия бд Access.
- •57. Объектная модель dao рабочей области odbcDirect.
- •59.Ручной и программный способ установления связи с источником данных.
- •62.ActiveX-компонент WebBrowser и объект InternetExplorer для работы в www из проектов Visual Basic.
- •86.Особенности работы с логическим инструментом. Пример отображения в окне прямоугольника заданного размера, толщины и цвета.
- •87.Работа со строками в Windows. Изменение цвета и фона строки текста.
- •89.Пример работы с базовыми шрифтами.
- •95.Пример отображения базовых геометрических фигур, использующих api-функции.
- •96.Создание и заполнение произвольных областей. Пример.
42. Функции работы с матрицами окна vba Excel. Пример решения системы линейных уравнений.
Решить систему линейных уравнений вида АХ=В
Для простоты примем, что количество уравнений не будет более девяти. Элементы матриц А я В заполним случайными вещественными числами. Тогда, очевидно, матрица А не будет вырождена. Чтобы получить неизвестные переменные вектора X, необходимо преобразовать систему к следующему виду: Х=АЛВ, то есть получить обратную матрицу А, а затем умножить ее на вектор В.
Класс WorkSheetFunction содержит следующие функции для работы с матрицами: ММи1т.(ЛД) - осуществляет перемножение матриц А к В, MInverse(4) - находит обратную (А') матрицу, Transposed) - осуществляет транспонирование (Аг) матрицы, MDeterm(/l) - вычисляет определитель матрицы.
Private Sub Form_Load()
Caption = "Работа с матрицами"
CommandlCaption = "Решить АХ=В"
Textl =""
Text2 =""
Text3 =""
End Sub
Private Sub Command1_Click()
Dim a(10, 10) As Double, b(10) As Double, s As String, p As Double Dim ObjExcel As Object
Set ObjExcel = CreateObjectfExcel. Application") 'Создать объект COM n% = 1при1Вох("Введите порядок системы ЛУ, не более 9") 'Задаем свойства рабочей книги и листа
With ObjExcel
.WorkBooks.Add 'Создать Книгу
.ActiveSheet.Name = "Матрицы" 'Присвоить имя для листа - Матрицы .Visible = False 'Сделать Excel невидимым
.DisplayAlerts = False 'Запретить отображение окна сохранения
End With
For i% = 1 To n 'Циклы формирования элементов матриц и
For j% = 1 То п 'отображения их в ячейках Листа (свойство Cells)
a(i,j) = Rnd*10 + 1
s = s + Format(a(i, j), "#0.000") + vbTab
ObjExcel.Cells(i, j) = a(i, j) Next j
s = s + vbCrLf
Next i
Textl = s 'Отображение элементов матрицы А в поле Textl
s =""
For i% = 1 To n
b(i) = Rnd*10 + 1
s = s + Format(b(i), "#0.000") + vbCrLf
ObjExcel.Cells(i, 10) = b(i) Next i
'Отображение элементов матрицы В в поле Text3 Text3 = s With ObjExcel
'Выводим элементы вектора X, начиная с ячейки А10 и вниз.
'Объект Range задает диапазон ячеек, а его свойство Cells - адрес
'ячейки в формате R1C1 (то есть: R-row, С -column). Свойство Value -
'устанавливает или возвращает значение в ячейках диапазона. .Range(.Cells(10, 1), .Cells(9 + n, 1)).Value = .MMult(.MInverse(.Range _
(.Cells(1, 1), ,Cells(n, n))), .Range(.Cells(1, 10), .Cells(n, 10))) End With s ="" For i% = 1 To n
'В цикле считываем значения из ячеек и помещаем их в строку р = ObjExcel.Cells(10 + i -1, 1).Value s = s + Format(p, "#0.000") + vbCrLf Next i
'Отображение элементов вектора X в поле Text2 Text2 = s ObjExcel.Quit Set ObjExcel = Nothing End Sub
43. Свойства объекта Range объектной модели ms Excel.
Свойство |
Описание |
Value |
Возвращает (помещает) значение из ячейки или в ячейки диапазона. В примере x=Range(“C1”).Value присваивается значение в переменную x из ячейки C1, а в примере Range(“A1:B2”).Value=1 в диапазон вводится 1 |
Name |
Возвращает (вводит) имя диапазона. В следующем примере Range(“A1:B2”).Name=”Итоги” диапазону “A1:B2” присваивается имя ”Итоги” |
Count |
Возвращает число объектов в наборе. В примере переменной x присваивается значение, равное числу строк диапазона A1:B2 : x=Range(“A1:B2”).Rows.Count |
CurrentRegion |
Возвращает число строк текущего диапазона, ограниченного пустыми строками и столбцами и содержащего ячейку. В следующем примере переменной n присваивается значение, равное числу строк в текущем диапазоне, содержащем ячейку A1: n=Range(“A1”).CurrentRegion.Rows.Count |
Formula |
Возвращает (вводит) формулу в формате A1. Например, в ячейку C2 введена формула =A4+B5: Range(“C2”).Formula=”=A4+B5” |
FormulaArray |
Возвращает (вводит) формулу диапазона в формате A1. В отличие от обыкновенной формулы рабочего листа, формула диапазона вводится на листе не посредством нажатия на клавишу Enter, а с помощью комбинации клавиш Ctrl+Shift+Enter. Например, в диапазон E1:E3 введена формула {=Sum(A1:A3* A1:A3)} : Range(“E1:E3”).FormulaArray=”=Sum(A1:A3* A1:A3)” |
FormulaR1C1 |
Возвращает (вводит) формулу в формате R1C1. Например, Range(“B2”).FormulaR1C1=”=sin(R3C2)” |
Text |
Возвращает содержимое диапазона в текстовом формате |