... Ниже приводится код данного класса: DBClass.cls Option Explicit Private WithEvents ConRs As ADODB.Recordset Private dbConn As ADODB.Connection Private mvarConStr As String Private mvarSQLStr As String Private Sub Class_Initialize() Set dbConn = New ADODB.Connection End Sub Private Sub Class_GetDataMember(DataMember _ As String, Data As Object) Set Data = ConRs End Sub Public ... Создадим на форме один текстовый блок Text1 и присвоим его свойству Index значение 0. ...

... Full silvery Moon illuminates terrain. ... Begun a next moon eclipse, when Land barriers a Moon from the Sun and throws its shade on it. ... Drawing 1. ... Drawing 6 Drawing 6 shows a splendid photo of full moon eclipse 18-19 november 1975 during is packed phases doing Dennis de Chikko. ... Eclipse, which will occur 9 november 2003, is a repetition through сарос (cycle of repetitions of eclipses equal 6585 days or 18 years 11 days) full moon eclipse from 28 octobers 1985 with the maximum phase 1,07....