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 не может вернуться назад
я правильно понял?

Новые блоги и статьи Все статьи Все блоги /
Был праздник вчера, а я и не знал. kumehtar 28.07.2026 27. 07. 2026г. Intel Core 2 Duo исполнилось 20 лет Новости компьютерного мира и их обсуждение (4) Салют, шампанское, овации! :drink:	Нейтральные знания, чистый код - бла-бла-бла-бла, на самом деле кликбейт и самореклама, плагиат, и вот почему Hrethgir 27.07.2026 То-есть отклонение такой публикации говорит само за себя, и пусть только возьмут на вооружение после отклонения публикации - это будет чистейшим актом плагиата. Отклонял Хабр. Дословно, отклонённая. . .	тв 16 бой ии anaschu 27.07.2026 Великий Перелом ИИ: Как уравнения ОДУ Radau дожали цензурные фильтры Алисы Фиксируем в мемофонде Теории Всего беспрецедентный факт в истории ИИ-зондирования. В затяжном многораундовом. . .	мв 15. непроверенное, возможно, глюк anaschu 27.07.2026 НАУЧНО-АНАЛИТИЧЕСКИЙ ОТЧЕТ. РАЗДЕЛ 1. 1: «НАУКА» (РАСШИРЕННАЯ СТЕХИОМЕТРИЧЕСКАЯ И ГЕНЕТИЧЕСКАЯ ВЕРСИЯ)Тема: Теоретическое обоснование инвариантности 19-мерного тензорного ядра непрерывных ОДУ и. . .
Очистка реквизитов и табличных частей документа при копировании (вариант 2) Maks 26.07.2026 Алгоритм из решения ниже разработан на примере нетипового документа "ЗаявкаНаРаботу", разработанного в КА2. Задача: Заменить алгоритм запрета копирования документов для сотрудников с ролью "Стажер",. . .	Доктрина интенционального знания - Доктрина для портала "Срез". Hrethgir 25.07.2026 Может найдётся кто захочет оценить доктрину. . . Написания правил участия для меня роскошь, требующая лимита времени, поэтому все сообщения не прошедшие модерацию будут видны только участникам портала,. . .	сукцессия 44. Решил подать на припринт в межународные сервисы препринтов. Но нужно одобрение от ученых anaschu 25.07.2026 Английский вариант. Пока кто то не одобрит мою личность, мне не получиться это опубликовать на препринте. Но заявку на публикацию статьи я сегодня подам.	сукцессия 43. Вторая научная статья за месяц- прайминг и гатгил anaschu 25.07.2026 две стороны одной монеты

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

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

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

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

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

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

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

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

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

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