Доказательство, что VBA калечит мозг

[perasperaadastra]

Я считаю, что VBA нужно запретить, потому что ОНО необратимо калечит мозг. Вот смотрите, элеметарный вопрос в экселе — есть байт 10001101, а нужно получить 01110010. Очень простой вопрос, да? А теперь посмотрим ответ от знатока VBA:

Public Function binverse(wCell As String) As String
Dim x, y As Integer
Dim nResult As String
nResult = vbNullString
x = Len(wCell)
For y = 1 To x
If Mid(wCell, y, 1) = "1" Then
nResult = nResult & "0"
Else
nResult = nResult & "1"
End If
Next
binverse = nResult
End Function

https://www.excelforum.com/excel-genera ... verse.html

Аааааааааа! Это же необратимые повреждения мозга! Срочно нужна лоботомия! Микрософт нужно судить за предумышленное убийство!

[thinker]

For excel:
https://www.mrexcel.com/forum/excel-que ... excel.html

для vba лень искать

[ALV00]

На любом языке кроме Ассемблера и С решение будет неуклюжим. Но языках высокого уровня низкоуровневые операции делать неудобно.

[Medium-rare]

Это старинный уже продукт для автоматизации действий в офисных продуктах, битовые операции в котором никогда не были приоритетом. А так да, нафиг VBA сейчас вообще, за пределами Офиса, в котором надо написать программку, что-то там агрегирующую с разных страниц в Экселе и выводящую в Ворд.

[Flash-04]

LOL! ну нет там побитового XOR

[perasperaadastra]

Коллеги, вы чаво! Зачем там побитовые операции???

255 - 0b10001101 = 0b01110010 и всё

Эксел умеет переводить битовую строку в число и обратно. Thinker правильную ссылку привел. А вот в той ссылке, которую я привел, увы, случилось VBA головного мозга...

[thinker]

А вот в той ссылке, которую я привел, увы, случилось VBA головного мозга...

Только потому что кто-то привел неуклюжий способ перевода? Почему вы его назвали "знатоком"? Какое это имеет отношение к "VBA головного мозга"? С каких это пор можно критиковать язык высокого уровня за то, что в нём нет простых, встроенных функций низкого уровня, коим является побитная инверсия? В VBA ещё нельзя переслать значение переменной в регистр процессора. Кому от этого холодно или тепло?

[perasperaadastra]

>С каких это пор можно критиковать язык высокого уровня за то, что в нём нет простых,

Я не за это критикую, а за "VBA way".

[perasperaadastra]

VBA ужасен и крив.

Если в powerpoint сделать shp.Line.DashStyle = msoLineRoundDot, то получится разряженный пунктир. А если это же самое сделать через меню, то пунктир будет нормальный (плотный). Чтобы в VBA получить такой же результат нужно сделать
сначала shp.Line.DashStyle = msoLineRoundDot
а потом shp.Line.DashStyle = msoLineSysDot

Но самое интересно, если зайти вот сюда (осторожно, сервер дает доступ через модем 56k — вы можете умереть, не дождавшись загрузки!): https://msdn.microsoft.com/VBA/PowerPoi ... powerpoint
можно обнаружить, что msoLineSysDot не существует.

ЛОЛОЛОЛОЛО! Микрософт всех поимел!