Как-то так
Цитата:
Public Sub ty()
Dim r(0 To 11) As TableRow, i%, summa as Currency, avg As Currency
'Читаем из первой таблицы, предварительно созданной руками данные в массив структур TableRow
For i = 0 To 11
r(i).Id = Cells(2 + i, 1).Value
r(i).manufacturer = Cells(2 + i, 2).Value
r(i).buyer = Cells(2 + i, 3).Value
r(i).product = Cells(2 + i, 4).Value
r(i).price = Cells(2 + i, 5).Value
r(i).Cost = Cells(2 + i, 6).Value
Next i
'А теперь выводим рядом те же данные в таблицу №2, раз так надо
For i = 0 To 11
Cells(2 + i, 8) = r(i).Id
Cells(2 + i, 9) = r(i).manufacturer
Cells(2 + i, 10) = r(i).buyer
Cells(3 + i, 11) = r(i).product
Cells(2 + i, 12) = r(i).price
Cells(2 + i, 13) = r(i).Cost
Next i
summa = MySum(Ubound(R))
avg = summa / UBound(R)
End Sub
|
Цитата:
Сообщение от Терри П
Я говорил, что в сложных промышленных коммерческих системах на больших Unix серверах и гигантских объемах данных для коммерции используется java в основном.
|
Я читал об этом много раз, но мне сложно понять, насколько это обусловлено той модой, которая была на яву лет 10 назад. То, что мода стала промстандартом, ещё не аргумент в пользу объективного превосходства одной технологии или ЯП над другими.
Паскалеобразная ада до сих пор удерживает нишу военных, космических и авиационных разработок и мне кажется, что это неспроста. Хотя, казалось бы:
Цитата:
|
Сообщение от Вика про ЯП Оберон
По утверждению Вирта, разработчики языка Java за несколько лет до её создания «изучили исходные коды Оберона и, в частности, исходные коды обероновских сборщиков мусора. Потом они испортили Оберон синтаксисом Си и назвали получившееся словом Java».
|
Мой вопрос: насколько успех ява определяется маркетингом, а насколько его реальными преимуществами?