Сравнение ключевых слов разных языков

[gaidar]

Постоянно возникают вопросы, поэтому прилепливаю тему:
http://msdn2.microsoft.com/en-us/library/zwkz3536(VS.71).aspx

[boobs]

Крута, пасиб.

[Estilla]

Постоянно возникают вопросы, поэтому прилепливаю тему:
http://msdn2.microsoft.com/en-us/library/zwkz3536(VS.71).aspx

Content not found...

[Williams]

Content not found...

Ссылка обрезалась при апгрейде форума - копируй вручную

[Viktor_V]

Там нет Паскаля. А надо

[FireFenix]

Паскаль маст дай

[Денис]

FireFenix
C чего Вы взяли?
У меня весь корпоративный софт на нем написан и продолжает писаться.

[Viper]

Для холиваров есть холивары!

[Williams]

Паскаль не в тему хотя бы только потому, что в таблице сравниваются стандартные языки дотнэта

[ANDLL]

У меня весь корпоративный софт на нем написан и продолжает писаться.

А курс акций конечно растет? Или эта "корпорация" без акций?
Я к тому, что тот факт что конторка в мухосранске пишет под свои нужды софт на паскале, говорит о том, на чем специализируются программисты конторы, а не о плюсах паскаля

[BasiС]

Есть хороший ресурс по автоматической конвертации кода для .NET 4.0: http://codeconverter.sharpdevelop.net/SnippetConverter.aspx
Возможности:
C# to VB.NET
C# to Boo
C# to Python
C# to Ruby
VB.NET to C#
VB.NET to Boo
VB.NET to Python
VB.NET to Ruby
рекомендую!

[Qwertiy]

Как записать на VB.NET

Код: Выделить всё

X = Obj as DateTime?;

Конструкции

Код: Выделить всё

X = TryCast(Obj, Date?)
X = TryCast(Obj, Nullable(Of Date))

не компилируются.

[FireFenix]

Что такое Х и Obj?

Если включить телепатию и принять, что данные переменные имеют типы как представлено ниже

Код: Выделить всё

        Dim X As DateTime? = Nothing
        Dim Obj As Object = Nothing

        Obj = DirectCast(DateTime.Now, Object)
        X = DirectCast(Obj, DateTime?)

        System.Windows.Forms.MessageBox.Show(X.ToString)


То ошибка в TryCast, TryCast применимо только к классам (точнее к типам, которые передаются по ссылке, т.е. для которых существует состояние Nothing [без Nullable])

[Qwertiy]

Если включить телепатию и принять, что данные переменные имеют типы как представлено ниже

Телепатия - штука хорошая
Да: Dim X As Date?, Obj As Object, разумеется.

То ошибка в TryCast, TryCast применимо только к классам (точнее к типам, которые передаются по ссылке, т.е. для которых существует состояние Nothing [без Nullable])

Сообщение об ошибке я понял. Вопрос не в том, почему ошибка, а в том, как её обойти. Для C# такое приведение является корректным и я удивлён, что оно не компилируется в VB.NET.

На всякий случай:

Код: Выделить всё

Module All

Sub Main()
  Dim X As Date?, Obj As Object

  Obj = Nothing
  X = DirectCast(Obj, Date?) ' Ok
  Console.WriteLine(X)
  X = CDate(Obj) ' Wrong result
  Console.WriteLine(X)

  Obj = Now()
  X = DirectCast(Obj, Date?) ' Ok
  Console.WriteLine(X)
  X = CDate(Obj) ' Ok
  Console.WriteLine(X)
  X = CObj(TryCast(Obj, Nullable)) ' Wrong result
  Console.WriteLine(X)

  Obj = New Date?(Now())
  X = CObj(TryCast(Obj, Nullable)) ' Wrong result
  Console.WriteLine(X)

  Obj = DBNull.Value
  'X = DirectCast(Obj, Date?) ' Exception
  'Console.WriteLine(X)
  'X = CDate(Obj) ' Exception
  'Console.WriteLine(X)
  X = CObj(TryCast(Obj, Nullable)) ' Ok!!! But...
  Console.WriteLine(X)
  X = DirectCast(CObj(TryCast(Obj, Nullable)), Date?) ' Ok!!! But...
  Console.WriteLine(X)

  Console.ReadKey()
End Sub

End Module

[FireFenix]

Вопрос не в том, почему ошибка, а в том, как её обойти.

Я тебе сказал как обойти правильно сделать

Для C# такое приведение является корректным.

Да ладно?

Код: Выделить всё

            DateTime X;
            object Obj = null;

            Obj = DateTime.Now as object;
            X = Obj as DateTime;

            System.Windows.Forms.MessageBox.Show(X.ToString());


The as operator must be used with a reference type or nullable type ('System.DateTime' is a non-nullable value type)

P.S. to Смотритель раздела: прикрепите к шапке ссылку http://www.harding.edu/fmccown/vbnet_cs ... rison.html

[Qwertiy]

Да ладно?

А где в твоём коде Nullable?
Так попробуй:

Код: Выделить всё

object obj = DateTime.Now as object;
DateTime? x = obj as DateTime?;

http://www.harding.edu/fmccown/vbnet_csharp_comparison.html

Ссылка полезная, но косяки там попадаются.

[FireFenix]

хм, да. В этом случае не пашет... значит кривой костыль Nullable, ждём некст версии, 2011 не за горами с вин8

[Qwertiy]

ждём некст версии

VS11 Beta - the same...