Техническая поддержка :

Современные решения

для защиты Windows программ

и восстановления исходного кода

Обсуждение программирования на Visual Basic в конференции ru.visual.basic


VB.NET пpогpаммисты

Hello Artem!

25 Jan 04 23:07, you wrote to Pasha Oleinikov:

AP> О, Боже. VB.NET пpеподают в ВУЗах? Если там обычный GWBasic не могyт
AP> пpеподать так, что хотябы до половины слyшателей дошло, что же бyдyт
AP> знать стyденты, котоpым пpеподавали VB.NET?

Дело не в преподавании.
Дело в желании понять и вообще интересу к предмету.

AP> Мне кажется этот язык нyжно пpеподавать на 4-5 годy пpогpаммеpского
AP> обyчения. Hельзя же так, молодые неокpепшие мозги начать
AP> бобмаpдиpовать констpyктоpами, интеpфейсами, абстpакциями и
AP> полимоpфизмом...

Мы это всё на 2-м курсе начали проходить.(на си++ правда, но дело не в этом)
Конечно кроме нескольких человек никто ничего не понимает, учат наизусть/списывают/покупают курсовые.

* Origin: Linux 2.4.20-9asp (2:5020/1493.69)


Re: Вылетает VB

Мы где-то виделись, Alexander?

26 Jan 04 19:17:07 в RU.VISUAL.BASIC Alexander Belinsky -> All:

AB> Вот так я ее вызываю:

AB> Function Coding(InnStr As String) As String
AB> Dim I As Integer, PB As New PropertyBag, X As Variant, Y As Integer
AB> PB.WriteProperty "BText", InnStr
AB> ReDim dK(32) As Byte
AB> For I = 0 To 32
AB> dK(I) = 1
AB> Next
AB> Y = UBound(PB.Contents) Mod 8

AB> X = Des(0&, dK(0), PB.Contents(0), UBound(PB.Contents) + 1)

AB> End Function

AB> VB не ругается а "молча" вылетает с такими ругательствами:

Попробуй так.

Dim b() As Byte
b = PB.Contents
X = Des(0&, dK(0), b(0), UBound(b) + 1)

Всего хорошего!
Дмитрий Козырев aka Master

* Origin: Дорогу осилит идущий. (2:5023/11.148)


Re: А как засунуть программу туды к часикам

Мы где-то виделись, Alexander?

25 Jan 04 18:19:11 в RU.VISUAL.BASIC Alexander Shherbakov -> All:

AS> Под Win9X form_mousedown, ловящая ивенты на иконке в трее, содержит Y=0, а
AS> значение X приведенное к (X and &HFF)/Screen.TwipsPerPixelX содержит тип
AS> ивента.

Когда ты засовываешь программу к часикам, ты указываешь сообщение, которое
будет посылаться форме при клике/прочих действиях с иконкой. Так повелось, что
этим сообщением практически всегда является WM_MOUSEMOVE. Когда передается это
сообщение форме, ожидается, что в wParam будут координаты курсора на форме (X
= LoWord, Y = HiWord); когда же сообщение приходит от иконки, то там вместо
координат оказывается код, обозначающий действие с иконкой (например,
WM_LBUTTONDOWN).
Если scalemode = vbpixels, то X будет равен этому коду.

AS> Под ХП, думаю и под 2К тоже, X и Y содержат отличные значения от
AS> вышеприведенных.

Под 2K все нормально. Я думаю, это ты в программе чего-нить напутал. Попробуй,
например, убрать And &HFF в коде выше.

Всего хорошего!
Дмитрий Козырев aka Master

* Origin: Дорогу осилит идущий. (2:5023/11.148)


Re: EventClassModule

Мы где-то виделись, Moskalevsky?

22 Jan 04 16:26:13 в RU.VISUAL.BASIC Moskalevsky Igor -> All:

MI> Public WithEvents appWord As Word.Application
MI> Пишу обработку события:

[...]

MI> Dim X As New EventClassModule
MI> Sub Register_Event_Handler()
MI> Set X.App = Word.Application
MI> End Sub

Аналогично:

Set appWord = Word.Application

MI> Hу так вот, вопрос: В каком "любом модуле" я могу объявить новый
MI> EventСlassModule?

Думаю, это не имя класса, а т.н. имярек.

Всего хорошего!
Дмитрий Козырев aka Master

* Origin: Дорогу осилит идущий. (2:5023/11.148)


Вылетает VB

||*()*|| Ах это вы, Dmitriy ? А я вас не узнал без санитара...

27 янв 04 года ты писал(а) к мне:

[...skipped...]

DK> Попробуй так.

DK> Dim b() As Byte
DK> b = PB.Contents
DK> X = Des(0&, dK(0), b(0), UBound(b) + 1)

Спасибо! Hаблюдается некоторый прогресс...
:-)
В вышеприведенной конструкции когда шифруется один байт все ок. При попытке зашифровать хотябы строчку вот таким образом:

Function Coding(InnStr As String) As String
Dim I As Currency, PB As New PropertyBag
Dim BB() As Byte
PB.WriteProperty "BText", InnStr
ReDim dK(32) As Byte
For I = 0 To 32
dK(I) = 1
Next
BB = PB.Contents

For I = 0 To UBound(BB)
Coding = Coding & Des(0&, dK(0), BB(I), UBound(BB) + 1)
Next
End Function

...продолжается вылетание с такой руганью:

Программа VB6 вызвала сбой при обращении к странице памяти
в модуле KERNEL32.DLL по адресу 0167:bff7a138.
Регистры:
EAX=04a7e2e0 CS=0167 EIP=bff7a138 EFLGS=00010202
EBX=03111270 SS=016f ESP=007ff258 EBP=007ff28c
ECX=cbbb9966 DS=016f ESI=031109b8 FS=4a6f
EDX=af33385d ES=016f EDI=04a7eb98 GS=0000
Байты по адресу CS:EIP:
89 51 08 8b 53 08 8b 43 04 89 42 04 8d 93 0b 10
Содержимое стека:
007ff28c 031109c0 005d0000 005e8d80 bff7b31d 005d0000 031109b8 000008b8 00000200 bff94645 005fc7f0 007ff3b0 031109b8 007ff2f0 7ff214db 005d0000

I'll be back, Dmitriy !
www.caligari.zp.ua - реальная психологическая и психиатрическая помощь. Анонимно. Пока бесплатно.

* Origin: Иисус изменил вашу жизнь. Сохранить? [Y/N] (2:4641/500.99)


VB.NET пpогpаммисты

Здравствуйте, Artem!

Monday January 26 2004 23:20, Artem Prokhorov -- Pasha Oleinikov:

AP> Да меня больше интеpесовал именно вопpос не кто на чем пишет, а кто за
AP> это деньги полyчает. Из тех двоих, кто мне ответил мылом, оба
AP> СОБИРАЮТСЯ или HАЧИHАЮТ писать на VB.NET за деньги.

В результате обсуждения этот вопрос вроде бы более-менее прояснился. Сухой остаток: деньги только начинают платить, но похоже, что ситуация меняется к лучшему. Кстати, давеча в RU.DOTNET пробежало следующее (там о C#, но тем не менее):

Logic Explorers Inc. is looking for the experienced C# developers in
Saint-Petersburg, good knowledge of OOP, .NET framework (WinForms, ASPX) is
a must, Visual Studio addins is a plus. Salary 1000$/month. Please email
resume in English at job [@] logicexplorers.com.

AP> Ага. Только если Microsoft опять всех не кинет, и не похоpонит .NET
AP> технологию, pаньше чем к ней пpидyт деньги, как они кинyли напpимеp
AP> тех, кто pешил всеpьез изyчать COM+.

Будем надеяться, что этого не произойдет.

С уважением, Pasha
* Origin: СПбГПУ, ФПС, ПОПКиЛС, 3 семестр (www.avalon.ru) (2:5030/1212)


VB.NET пpогpаммисты

Здравствуйте, Artem!

Monday January 26 2004 23:23, Artem Prokhorov -- Alexander Trishin:

AP> Hе пеpвый pаз слышy, что пpи пеpеходе на .NET люди бpосают VB и
AP> пеpеходят на C#. Интеpесно, из-за каких фактоpов?

Тут уже хорошо ответили, но я хотел бы от себя добавить следующее. Безусловно, одна из главных причин - синтаксис. Программы на VB (и VB .NET в частности) читаются очень тяжело в силу своей громоздкости. Слова вроде Inherits, Implements и т.д., признаться, несколько раздражают. С другой стороны, это же бейсик, и он должен оправдывать свое название хотя бы тем, что код должен по возможности быть ближе к естественному языку. Этого добиться удалось, но, к сожалению, ценой читаемости. Отсутствие аналога begin...end, {...} и т.д. тоже не радует. Далее, в бейсике слишком много вольностей с приведением типов, а такое желание простоты имхо чревато ошибками. Еще упоминали про шарповский lock (это с многопоточностью связано), тоже правда... наконец, отсутсвует XML-документирование (в следующей студии обещали). C# же лишен вышеперечисленных недостатков и действительно является наиболее широкими воротами в мир .NET. С другой стороны, не взирая на наличие этих недостатков, VB .NET является мощным ОО-языком, отвечающим большинству современных требований.

С уважением, Pasha
* Origin: СПбГПУ, ФПС, ПОПКиЛС, 3 семестр (www.avalon.ru) (2:5030/1212)


Re[2]: VB.NET пpогpаммисты

Здравствуйте, Eugeny!

Tuesday January 27 2004 08:50, Eugeny V. Ivlev -- Alexander Trishin:

AT>> Многое из доступного сейчас в C# появится в VB.NET, но в C#
AT>> появится refactoring - ну ооочень полезная штука. Ориентация
AT>> VB.NET немного другая, и там refactoring попросту не будет.
EI> А откуда эта информация?

С сайта микрософта, вестимо :)

EI> Я так понимаю обсуждается будущие версии этих
EI> продуктов, если так, то не кинешь ли ссылку на страницу с описанием
EI> новинок?

Hа сайте микрософта очень быстро можно добраться до Microsoft Developer Tools Roadmap 2004-2005, там лежит обзор двух будущих студий - Whidbey и Orcas. В обзоре все написано.

AT>> Вообщем С# всегда на несколько шагов вперед.

EI> Конечно. Так и должно быть. Только не всегда нужны ВСЕ возможности
EI> языка. В основном и возможностей VB.NET за глаза хватает.

Hу, это кому как :)

С уважением, Pasha
* Origin: СПбГПУ, ФПС, ПОПКиЛС, 3 семестр (www.avalon.ru) (2:5030/1212)


VS.Net Prerequisities

Hello all.

Что это такое и где его взять?

Ivan

* Origin: Hе беса ли куют? (2:5023/19.9)


Re: VB.NET пpогpаммисты

From: Alexander Trishin

Eugeny V. Ivlev wrote on Tue, 27 Jan 2004 05:50:31 +0000 (UTC):

> AT> Многое из доступного сейчас в C# появится в VB.NET, но в C# появится
> AT> refactoring - ну ооочень полезная штука. Ориентация VB.NET немного другая,
> AT> и там refactoring попросту не будет.
>
> А откуда эта информация? Я так понимаю обсуждается будущие версии этих
> продуктов, если так, то не кинешь ли ссылку на страницу с описанием
> новинок?

msdn.microsoft.com/vstudio/productinfo/roadmap.aspx
А еще есть версия Whidbey, разданная на PDC

> Конечно. Так и должно быть. Только не всегда нужны ВСЕ возможности
> языка. В основном и возможностей VB.NET за глаза хватает.

Кнопки на форму класть - может и хватает, но если это не гуй - нет уж,
увольте :)

--
AT
* Origin: Demos online service (2:5020/400)



Назад Содержание Вперед