Морской Бой

[Liska-Melisska]

Не могу разобраться в коде, помогите закоментить плиз!

[EducatedFool]

Это из статистики по проекту:

File VBAProject (Морской бой.xls)
Code Lines 476 (95%)

Вы действительно думаете, что кто-то от нечего делать будет комментировать 476 строк кода?

Ладно бы Вы сказали, какие строки в каких процедурах Вам не совсем понятны - тогда другое дело...

[valerij]

Сообщение от Liska-Melisska

Не могу разобраться в коде

А врет игра, я выиграл намного ходов, он заставил меня все равно играть,
ну и естественно выиграл

[Pavel55]

EducatedFool, а где ты посмотрел общее кол-во строк кода? Я бы не сказал, что данный код корректно написан (имхо). Но труда вложено очень много. Я тут случайно выделил ячейку вне поля, куда надо было нанести выстрел и нажал "Огонь" - и игра сразу закончилась ((

[Pavel55]

- Добавил ещё одну кнопку. Может кому пригодится )
- Исправил баг, который возникал если случайно указали ячейку вне игрового поля
- нашёл ещё баг. Если ранить какой-нибудь корабль (4х, 3х, 2х палубный), а потом убить однопалубный, то раненый корабль сразу взрывается весь. Поясню: Нажимаем на кнопку "Подсказка", подбиваем одну ячейку 4х палубного корабля, а потом сразу стреляем в однопалубный, 4х палубный взрывается весь.

[EducatedFool]

EducatedFool, а где ты посмотрел общее кол-во строк кода?

Надстройка MZ-Tools для VBA. Щелкаем правой кнопкой на модуле / форме / проекте в окошке "Project Explorer", и выбираем пункт Statistics.

В этой надстройке есть ещё нескольно очень полезных функций, и множество просто полезных.
Запустите файл MZTools3VBASetup.exe из вложения.


Также во вложение добавил ещё несколько полезных утилит: (думаю, у большинства работающих с VBA они уже установлены, но всё же)

IndenterVBA.exe (выравнивает код VBA. Не знаю, как я обходился без неё раньше...)

MsgBox Generator.exe Генерирует код для вызова Msgbox. Использую редко, но вдруг кому понравится.

VBACodeCleaner.xla - уменьшает размер файлов, содержащих код VBA.

VBScroll.rar - делает возможным скроллинг кода VBA без установки специального патча для Office.

На соседнем форуме в этой теме есть много полезных ссылок для пользователей VBA Excel.

[Pavel55]

Спасибо!

VB Scroll конечно же пользуемся )

P.S. Соседний форум знаю) давно там, но до "полезностей" всё никак руки не доходили )

[Pavel55]

Выложу ссылку на новую версию VBA Code Cleaner v.5.0.28

http://www.appspro.com/Downloads/CodeCleaner.exe

Ссылка на страницу этой программы http://www.appspro.com/Utilities/CodeCleaner.htm


Для её удаления из Excel:

- меню Вид - Панель инструментов - Настройка...
- категория Сервис, команда: Надстройки для модели COM...
- Хватаете эту команду и выносите её на панель инструментов
- закрываете окно Настройка
- щёлкаете на вынесенной панельке "Надстройки для модели COM"
- снимаете галочку "VBA Code Cleaner 5.0"
- ОК

[Liska-Melisska]

Всем спасибо за поправки, но вот код так и остался незакоментированным

[Pavel55]

Liska-Melisska, какое слово из этого топика вы не понимаете? http://www.programmersforum.ru/showp...97&postcount=2