Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - VBA

Страница: 1 |

 

  Вопрос: Помогите, пожалуйста=) Добавлено: 31.05.09 13:17  

Автор вопроса:  BuTa
Вот задача:
Нужно найти максимальный элемент в массиве.

Dim massiv(1 To 100) as single
Dim k as integer
Dim i as integer
Dim MsxChislo as Single
 
Цикл For next =))))

И вот еще: Программа. в результате выполнения программе на листе в Excel появляется таблица, так вот как в программе сдлеать так чтобы таблица это была отформаирована, т.е. шрифт был 12 Times new Roman, чтобы линии таблицы были выделены??? не знаю понятно объяснила или нет, если нет скажите, по другому объясню=)))
Заранее спасибо=))))

Ответить

  Ответы Всего ответов: 8  

Номер ответа: 1
Автор ответа:
 Unknown_Master



Вопросов: 11
Ответов: 264
 Профиль | | #1 Добавлено: 31.05.09 14:41
Скажу сразу - на первый вопрос тебе НИКТО не ответит, т.к. народ не любит людей, которые не любят думать.
На второй - ещё есть шансы)

Ответить

Номер ответа: 2
Автор ответа:
 Unknown_Master



Вопросов: 11
Ответов: 264
 Профиль | | #2 Добавлено: 31.05.09 14:42
Женский ник кстати не помогает)))

Ответить

Номер ответа: 3
Автор ответа:
 BuTa



Вопросов: 1
Ответов: 3
 Профиль | | #3 Добавлено: 31.05.09 14:57
Ну не зн, я пыталась ее сделат, ну у меня просто ничего вышло=( если дейтвительно не могу понять.

Ответить

Номер ответа: 4
Автор ответа:
 Unknown_Master



Вопросов: 11
Ответов: 264
 Профиль | | #4 Добавлено: 31.05.09 15:08
Попробуй составить алгоритм. Последовательность действий, которые приведут к необходимому результату.А уж преобразовать его в код - несложно.

Ответить

Номер ответа: 5
Автор ответа:
 VβÐUηìt



Вопросов: 246
Ответов: 3333
 Web-сайт: смекаешь.рф
 Профиль | | #5
Добавлено: 31.05.09 16:12
Беляш ты ваще. Нефик девушку в заблуждение ставить)))
  1.  
  2.  
  3. Dim massiv(1 To 100) as single
  4. Dim k as integer
  5. Dim i as integer
  6. Dim MsxChislo as Single
  7. 'Ввод массива
  8. for i = 1 to 100
  9. input massiv(i)
  10. next i
  11. 'Обработка
  12. MsxChislo = massiv(1)
  13. For i = 2 to 100
  14. if massiv(i) > msxchislo then msxchislo = massiv(i)
  15. next i
  16. 'Вывод
  17. print msxchislo



Насчет
И вот еще: Программа. в результате выполнения программе на листе в Excel появляется таблица, так вот как в программе сдлеать так чтобы таблица это была отформаирована, т.е. шрифт был 12 Times new Roman, чтобы линии таблицы были выделены??? не знаю понятно объяснила или нет, если нет скажите, по другому объясню=)))

В экселе есть функция записи макросов - он пишет код под то, что ты в нем делаешь. Включи запись, сделай шрифт какой тебе нужно и посмотри, какой сгенерировался код.

Ответить

Номер ответа: 6
Автор ответа:
 BuTa



Вопросов: 1
Ответов: 3
 Профиль | | #6 Добавлено: 31.05.09 17:35
ОЙ спасибо большое=))))

Ответить

Номер ответа: 7
Автор ответа:
 BuTa



Вопросов: 1
Ответов: 3
 Профиль | | #7 Добавлено: 31.05.09 17:35
ОЙ спасибо большое=))))

Ответить

Номер ответа: 8
Автор ответа:
 Unknown_Master



Вопросов: 11
Ответов: 264
 Профиль | | #8 Добавлено: 31.05.09 19:27
Бараш, скотина - весь кайф обламал.

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам