В процедуре

Public Property Get Числитель() As Integer    Числитель = mEnd Property

какое ключевое слово означает доступность?

Что в процедуре

Public Property Get Числитель() As Integer    Числитель = mEnd Property

является определителем типа?

В процедуре

Public Property Get Числитель() As Integer    Числитель = mEnd Property

что является именем свойства?

Будет ли выполнена следующая программа

Public Sub WorkWithArithmetic()  Dim X As Integer, Y As Integer  Dim U As Single, V As Single  Dim Z As Double  U = 26.5: V = -8.2  Z = U / V: X = CInt(U / V): Y = U \ V  Debug.Print X, Y, Z, U, V, X \ Y, X Mod Y, U Mod VEnd Sub

Как можно прервать пошаговое выполнение процедуры и вернуться к этому режиму уже в вызывающей процедуре?

Какие имена книг останутся в коллекции Documents приложения Word после завершения работы этой программы?

Public Sub WorkWithDocuments()Dim N As Long, I As ByteDim PathDir As StringPathDir = "e:\O2000\CD2000\Ch1\"With Documents    .Add NewTemplate:=True    .Open (PathDir & "DocThree")    .Open (PathDir & "DocFive")    .Item(3).CloseEnd WithEnd Sub

Какие имена книг останутся в коллекции Documents приложения Word после завершения работы этой программы?

Public Sub WorkWithDocuments()Dim N As Long, I As ByteDim PathDir As StringPathDir = "e:\O2000\CD2000\Ch1\"With Documents    .Add    .Add NewTemplate:=True    .Open (PathDir & "DocThree")    .Open (PathDir & "DocFive")    .Item(1).Close    .Item(2).CloseEnd WithEnd Sub

Какие имена книг останутся в коллекции Documents приложения Word после завершения работы этой программы?

Public Sub WorkWithDocuments()Dim N As Long, I As ByteDim PathDir As StringPathDir = "e:\O2000\CD2000\Ch1\"With Documents    .Add NewTemplate:=True    .Add    .Open (PathDir & "DocFive")    .Open (PathDir & "DocThree")    .Item(2).Close    .Item(3).CloseEnd WithEnd Sub

Можно ли использовать переменную одного проекта, не объявленную как Public в другом проекте?

With NewAcquaintance .Name = "Елена" .Age= 40 .Height = 168 With .LastMeeting  .Place= "библиотека"   .Date= #08/03/99# End WithEnd With

Какое будет полное имя у объекта .Age?

Какие имена книг останутся в коллекции Workbooks приложения Excel после завершения работы этой программы?

Public Sub WorkWithbooks()Dim N As Long, i As ByteDim PathDir As StringPathDir = "e:\O2000\CD2000\Ch1\"With Workbooks    .Add    .Open (PathDir & "BookThree.xls")    .Open (PathDir & "BookFive.xls")    .Item(2).Close    .Item(3).CloseEnd WithEnd Sub