Twin Basic

@Argus19 · Регистрация: 24.09.2017

Студворк — интернет-сервис помощи студентам

Несмотря на то, что проект Twin Basic по словам авторов в заключительной стадии "бета", скачал и попробовал.
Непривычный интерфейс.
Открыл проект, созданный в IDE Visual Basic 6.0, скомпилировал и 32 и 64 разрядные версии. По объёму результирующего кода получилось больше. Может быть нет оптимизации кода.
Кто-нибудь из форумчан может что-то сказать об этой IDE ?

@Замабувараев · 07.12.2024, 19:48

Сообщение от HackerVlad

Это не работает даже в TwinBasic, не говоря уже про VB6

В бесиках из 1998 года не работает, в чём‐нибудь посовременнее (FreeBASIC, VB.Net) работает.

Сообщение от testuser2

Удобнее искать

InStr вернёт индекс подстроки в буфере, а как потом вычислить индекс в массиве?

Сообщение от testuser2

Или заменить какую-то подстроку во всем массиве

Если «а» заменяем на «аааа», то оно в буфер не влезет = лишние манипуляции с памятью и копированием всего буфера.
Если «аааа» заменяем на «а», остаются неиспользованные куски памяти (мусор), которые нельзя вернуть системе. Кстати, как вы после такой замены отличите мусор от настоящей строки?

@testuser2 · 08.12.2024, 03:08

Сообщение от Замабувараев

InStr вернёт индекс подстроки в буфере, а как потом вычислить индекс в массиве?

Надо смотреть по ситуации, но для более общего случая, просто берем этот индекс, и делим его на средний делитель(заранее вычисленный) = длина буфера / количество строк. От полученого значения можно быстро найти нужный элемент, в котором свопадет указатель. В таком бы случае я еще бы держал массив смещений.. Но, это если нужен индекс в массиве, а он не всегда нужен. Но плюс таких строк не только в этом, они совместимы с С-шным стандартом строк, т.е. можно работать с такими строками на прямую, без преобразования. Единственно, что мне не нравится, что строка обязательно должна быть нультерминальной (или не обзязательно?). Ведь в заголовке содержится размер. Как бы я хотел видеть, допустим, есть длинная строка, нам нужна какая-то ее часть, просто мапим другую переменную на часть этой строки и пользуемся.

Добавлено через 11 минут

Сообщение от Замабувараев

Если «а» заменяем на «аааа», то оно в буфер не влезет = лишние манипуляции с памятью и копированием всего буфера.
Если «аааа» заменяем на «а», остаются неиспользованные куски памяти (мусор), которые нельзя вернуть системе. Кстати, как вы после такой замены отличите мусор от настоящей строки?

Это опять же разговор, если нужно чего-то изменять, что не всегда нужно. Для этого можно написать специальный класс. Если заменяется какая-то строка и она не влазит, значит выделяем еще одни аллок.. Любой мусор нужно просто занулять.

@Mikle Quits · 08.12.2024, 08:17

Сообщение от HackerVlad

Это не работает даже в TwinBasic, не говоря уже про VB6

Сообщение от Замабувараев

В бесиках из 1998 года не работает

Работает несколько не так, через Variant:

Visual Basic
1
2
  Dim Vector As Variant
  Vector = Array("Первый", "Второй", "Третий")

@testuser2 · 08.12.2024, 08:46

В ТВ так можно

Сообщение от testuser2

Dim a As Long = 9
Dim b As Long = 7
Dim c() As Long = Array(a, b)

Добавлено через 11 минут
На VB cтроковый можно так инициализировать

Visual Basic
1
Dim Vector$(): Vector = Split("Строка1, Строка2, Строка3", ", ")

@testuser2 · 10.12.2024, 18:45

Интересная была последний недельный обзор, в сообществе TB начали обсуждать реализацию Excel XLL на TB

@testuser2 · 16.12.2024, 16:55

Сообщение от testuser2

Для этого можно написать специальный класс.

Заморочился я чутка с этой темой, было такое дело в общем..

@HackerVlad · 17.12.2024, 16:33

Twin Basic - это очень хорошая вещь, очень удобные подсказки в IDE

Я, например, всегда раньше думал что объявив

Visual Basic
1
Dim i, i2 As Long

то будет 2 переменные As Long, а оказывается As Long будет только вторая, а первая будет Variant такую проблему сразу подчёркивает TwinBasic например и предлагает переписать более правильно код, например на

Visual Basic
1
Dim i As Long, i2 As Long

@HackerVlad · 17.12.2024, 16:36

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

@HackerVlad · 17.12.2024, 16:39

Но с ресайзингом я там и не разобрался в TwinBasic. Если в VB6 всё понятно и легко прописать в Form_Resize изменение положения элементов формы, то в Твине этот код обречён на провал почему-то, разбираться некогда было с этим, но просто факт.

I can · 17.12.2024, 16:42

Сообщение от HackerVlad

оказывается As Long будет только вторая,

А что эту "фичу" из VB6 так и оставили?

@HackerVlad · 17.12.2024, 16:51

Сообщение от I can

А что эту "фичу" из VB6 так и оставили?

Похоже на то. Логически же вроде, если так подумать, то два Long должно быть, ну может это я просто всегда так глупо мыслил...

@The trick · 17.12.2024, 16:57

I can, обратная совместимость с существующем кодом.
HackerVlad, логически как раз два Longа не должно быть, т.к. при объявлении Dim I, I- Variant.

@testuser2 · 17.12.2024, 17:17

Если сделать так, то можно добавить фичу и не терять обратной совместимости
Dim As Long: l1, l2, l3
или так
Dim (l1, l2, l3) As Long

Добавлено через 3 минуты
Почему они этого не сделали, ведь там уже много чего сделали грамотного, +=, Return res, причем они не убрали старый Return, Если без аргумента то он работает по старому, с аргументом - по новому.

@HackerVlad · 17.12.2024, 17:19

Кто знает как расайзинг прописывать в Твине? Я так и не понял этого.

Добавлено через 45 секунд
Тут уже обратной совместимости ну просто нет с ресайзингом элементов...

@testuser2 · 17.12.2024, 17:31

Я не знаю на счет ресайзинга. Но я бы еще хотел добавить, что с указателями там поубавили функционала. В TB не работает трюк со стеком аргументов как в VB/VBA, там аргументы ссылки хранятся где-то в другом месте. Там добавили
CType(Of Type)(Ptr), но эта тема завернута в вариант (возвращает вариант). Но у них вроде идут дискуссии насчет указателей, может быть в будущем что-то добавят.

Добавлено через 5 минут
Еще там траблы с обявлением.
Если объявить так, Dim lAr&() , а не As Long
То массив будет завернут в вариант

@HackerVlad · 17.12.2024, 17:31

Сообщение от testuser2

они не убрали старый Return

Я не знал что в VB6 есть Return как он работает там? "по-старому"?

@testuser2 · 17.12.2024, 17:32

Сообщение от HackerVlad

Return как он работает там?

Прочитай про GoSub (подпрограммы)

@HackerVlad · 17.12.2024, 17:41

Я не любитель этого короткого кода с объявлениями & как Long $ как String и так далее...

Добавлено через 1 минуту
Одно дело оператор GoTo или GoSub и совсем другое дело Return

Добавлено через 2 минуты
Короче я просто ничего не знаю про Return в vb6

Добавлено через 23 секунды
и GoSub я никогда не пользовался

Добавлено через 3 минуты
В MSDN только худо-бедно мельком написали про это: https://learn.microsoft.com/ru... -statement

Пример из MSDN:

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
Sub GosubDemo() 
Dim Num 
' Solicit a number from the user. 
 Num = InputBox("Enter a positive number to be divided by 2.") 
' Only use routine if user enters a positive number. 
 If Num > 0 Then GoSub MyRoutine 
 Debug.Print Num 
 Exit Sub ' Use Exit to prevent an error. 
MyRoutine: 
 Num = Num/2 ' Perform the division. 
 Return ' Return control to statement. 
End Sub ' following the GoSub statement.

Добавлено через 1 минуту
Короче я всё равно ничего не понял.

@testuser2 · 17.12.2024, 17:55

Сообщение от HackerVlad

Короче я всё равно ничего не понял.

https://vbaplanet.com/gosub.php

@HackerVlad · 17.12.2024, 18:19

testuser2, спасибо большое, тут понятнее

Добавлено через 14 секунд
буду учить

Добавлено через 1 минуту
Как я понял GoSub лучше чем GoTO тем что он может вернуться назад через Return, а GoTo не может вернуться назад
я правильно понял?

Новые блоги и статьи Все статьи Все блоги /
Оказывается, Unreal Engine позволяет качество на порядки выше, чем было в Lineedge Etyuhibosecyu 05.07.2026 Жаль, конечно, что я не узнал об этом, пока Lineedge существовала, а то бы Noname2331 написал, что волки превращаются в пиксельную кашу, а я бы его попросил скачать какую-нибудь бриллиантовую или Pro. . .	Doom для терминала без стрельбы и монстров. 3D Raycasting на ascii. dcc0 05.07.2026 Попросил нейронную сеть deepai. org написать рейкастинг 3D с библиотекой ncurses для Linux. Чтобы можно было ходить на стрелочки. Чтобы стены были отрисованы символами. Справилась. Первый вариант. . .	Установка статуса документа по условию Maks 05.07.2026 Алгоритм из решения ниже реализован на нетиповом документе "НарядПутевка" разработанного в КА2. Задача: в табличной части "Материалы" документа при записи автоматически устанавливать статус. . .	Сезонность и суточность закисления почв anaschu 04.07.2026 200 часов это все равно моловато. Есть ситуации, но нестандартные, когда смена происходит за 5 лет. Но обычно это 50 лет и более. Наверное, закисление почвы происходит сезонно в средней. . .
В чем ценность человеческого опыта в глобальном смысле? kumehtar 03.07.2026 Возможно, ценность человека не в том, что он однажды достигает мудрости, а в том, что он становится носителем карты пути. Он знает не только истину, но и последовательность внутренних изменений,. . .	интеграция AnyLogic с самописным REST API и переход на Odoo anaschu 03.07.2026 Успешная интеграция AnyLogic с самописным REST API и переход на промышленную Odoo WMS Сегодня проделал огромный путь от простой симуляции физических процессов до построения полноценной. . .	Поиск всех путей на ориентированном графе. Linux dcc0 02.07.2026 Переработка старого кода из моей статьи. Через несколько переработок от PHP кода к C89 (надеюсь, 89). Но довольно запутанно получилось. Код для Linux. Но если убрать time и то, что с ним. . .	Сам себя обучал rest api anaschu 02.07.2026 Педагогический лайфхак: Почему чистый REST API для ученика намного круче, чем готовые библиотеки Когда мы отказались от капризного JAR-файла AnyLogic и переписали код на стандартный HttpClient,. . .

@Argus19 1446 / 463 / 78 Регистрация: 24.09.2017 Сообщений: 2,542 Записей в блоге: 24

	Twin Basic 27.10.2024, 20:05. Показов 32522. Ответов 331 Метки нет (Все метки) Несмотря на то, что проект Twin Basic по словам авторов в заключительной стадии "бета", скачал и попробовал. Непривычный интерфейс. Открыл проект, созданный в IDE Visual Basic 6.0, скомпилировал и 32 и 64 разрядные версии. По объёму результирующего кода получилось больше. Может быть нет оптимизации кода. Кто-нибудь из форумчан может что-то сказать об этой IDE ? 3

@testuser2 1402 / 860 / 93 Регистрация: 08.02.2017 Сообщений: 3,672 Записей в блоге: 2
	10.12.2024, 18:45
	Интересная была последний недельный обзор, в сообществе TB начали обсуждать реализацию Excel XLL на TB 0

@HackerVlad Вернулся 1748 / 644 / 45 Регистрация: 10.09.2021 Сообщений: 2,786
	17.12.2024, 16:36
	Вот это мне очень понравилось, так сказать подсказки для чайников. Я вот сейчас вспомнил, что раньше, давно, у меня были проблемы в коде из-за этого и не понимал, помню, долгое время, почему у меня не работал скрипт, как раз из-за такого ошибочного объявления переменных... Миниатюры 0

@HackerVlad Вернулся 1748 / 644 / 45 Регистрация: 10.09.2021 Сообщений: 2,786
	17.12.2024, 16:39
	Но с ресайзингом я там и не разобрался в TwinBasic. Если в VB6 всё понятно и легко прописать в Form_Resize изменение положения элементов формы, то в Твине этот код обречён на провал почему-то, разбираться некогда было с этим, но просто факт. 0

@The trick Модератор 10060 / 3905 / 885 Регистрация: 22.02.2013 Сообщений: 5,854 Записей в блоге: 79
	17.12.2024, 16:57
	I can, обратная совместимость с существующем кодом. HackerVlad, логически как раз два Longа не должно быть, т.к. при объявлении Dim I, I- Variant. 1

@testuser2 1402 / 860 / 93 Регистрация: 08.02.2017 Сообщений: 3,672 Записей в блоге: 2
	17.12.2024, 17:17
	Если сделать так, то можно добавить фичу и не терять обратной совместимости Dim As Long: l1, l2, l3 или так Dim (l1, l2, l3) As Long Добавлено через 3 минуты Почему они этого не сделали, ведь там уже много чего сделали грамотного, +=, Return res, причем они не убрали старый Return, Если без аргумента то он работает по старому, с аргументом - по новому. 1

@HackerVlad Вернулся 1748 / 644 / 45 Регистрация: 10.09.2021 Сообщений: 2,786
	17.12.2024, 17:19
	Кто знает как расайзинг прописывать в Твине? Я так и не понял этого. Добавлено через 45 секунд Тут уже обратной совместимости ну просто нет с ресайзингом элементов... 0

@testuser2 1402 / 860 / 93 Регистрация: 08.02.2017 Сообщений: 3,672 Записей в блоге: 2
	17.12.2024, 17:31
	Я не знаю на счет ресайзинга. Но я бы еще хотел добавить, что с указателями там поубавили функционала. В TB не работает трюк со стеком аргументов как в VB/VBA, там аргументы ссылки хранятся где-то в другом месте. Там добавили CType(Of Type)(Ptr), но эта тема завернута в вариант (возвращает вариант). Но у них вроде идут дискуссии насчет указателей, может быть в будущем что-то добавят. Добавлено через 5 минут Еще там траблы с обявлением. Если объявить так, `Dim lAr&()` , а не As Long То массив будет завернут в вариант 0

@HackerVlad Вернулся 1748 / 644 / 45 Регистрация: 10.09.2021 Сообщений: 2,786
	17.12.2024, 18:19
	testuser2, спасибо большое, тут понятнее Добавлено через 14 секунд буду учить Добавлено через 1 минуту Как я понял GoSub лучше чем GoTO тем что он может вернуться назад через Return, а GoTo не может вернуться назад я правильно понял? 0