×

Loading...
Ad by
  • 最优利率和cashback可以申请特批，好信用好收入offer更好。请点链接扫码加微信咨询，Scotiabank -- Nick Zhang 6478812600。
Ad by
  • 最优利率和cashback可以申请特批，好信用好收入offer更好。请点链接扫码加微信咨询，Scotiabank -- Nick Zhang 6478812600。

@Florida

不是我有偏见啊，VB.NET有的时候真的很Sucks，就拿C#里面及其常见的Action Delegate操作来举个例子

binghongcha76(一只大猫)
本文发表在 rolia.net 枫下论坛比如，C#我有如下操作
Action<string> a = s => Console.WriteLine(s);
a("C# good");

简单优美，再看看我用VB该怎么写，按理说应该这么写
VB里面优美俺是想也不敢想的，只求尽量简单一些

Module Module1

Sub Main()
Dim ac As Action(Of String)
ac = Sub(x) Console.WriteLine(x)
ac("VB SUCKS")
End Sub

End Module

原以为很轻松的一种转换，居然没法通过编译，微软VB小组的人难道都是吃shit的？
我只能把程序改成这个样子

Sub Main()
Dim ac As Action(Of String)
ac = AddressOf Print
ac("VB sucks")
End Sub

Sub Print(ByVal x As String)
Console.WriteLine(x)
End Sub

也就是说，我没法用像在C#里面那样用一条语句完成对Action变量的赋值，而必须引用另外一个函数的名字，对于用惯了C#的程序员，这简直就是噩梦

或者，我把程序改成这个样子，也可以
Module Module1

Sub Main()
Dim ac As Action(Of String)
ac = AddressOf Print
ac("VB sucks")

ac = Function(s) Print1(s)
ac("VB sucks again")

End Sub

Sub Print(ByVal x As String)
Console.WriteLine(x)
End Sub

Function Print1(ByVal x As String) As String
Console.WriteLine(x)
Return x
End Function

End Module

看到没有，我用Function也可以，但是必须要返回个没有意义的数值。浪费资源，时间，感情，但关键是对事情本来意义的颠覆，Action的定义是不返回任何值的，但是在VB里面居然允许用Function来返回值，而且编译也不出错

更糟糕的是，因为这些限制，有些在C#里面极其容易实现的功能在VB里面很难实现更多精彩文章及讨论，请光临枫下论坛 rolia.net
(#6320709@0)
Last Updated: 2010-10-15
This post has been archived. It cannot be replied.
Report

Replies, comments and Discussions:

  • 工作学习 / 学科技术讨论 / 不是我有偏见啊，VB.NET有的时候真的很Sucks，就拿C#里面及其常见的Action Delegate操作来举个例子 -binghongcha76(一只大猫); 2010-10-15 {1530} (#6320709@0)
    本文发表在 rolia.net 枫下论坛比如，C#我有如下操作
    Action<string> a = s => Console.WriteLine(s);
    a("C# good");

    简单优美，再看看我用VB该怎么写，按理说应该这么写
    VB里面优美俺是想也不敢想的，只求尽量简单一些

    Module Module1

    Sub Main()
    Dim ac As Action(Of String)
    ac = Sub(x) Console.WriteLine(x)
    ac("VB SUCKS")
    End Sub

    End Module

    原以为很轻松的一种转换，居然没法通过编译，微软VB小组的人难道都是吃shit的？
    我只能把程序改成这个样子

    Sub Main()
    Dim ac As Action(Of String)
    ac = AddressOf Print
    ac("VB sucks")
    End Sub

    Sub Print(ByVal x As String)
    Console.WriteLine(x)
    End Sub

    也就是说，我没法用像在C#里面那样用一条语句完成对Action变量的赋值，而必须引用另外一个函数的名字，对于用惯了C#的程序员，这简直就是噩梦

    或者，我把程序改成这个样子，也可以
    Module Module1

    Sub Main()
    Dim ac As Action(Of String)
    ac = AddressOf Print
    ac("VB sucks")

    ac = Function(s) Print1(s)
    ac("VB sucks again")

    End Sub

    Sub Print(ByVal x As String)
    Console.WriteLine(x)
    End Sub

    Function Print1(ByVal x As String) As String
    Console.WriteLine(x)
    Return x
    End Function

    End Module

    看到没有，我用Function也可以，但是必须要返回个没有意义的数值。浪费资源，时间，感情，但关键是对事情本来意义的颠覆，Action的定义是不返回任何值的，但是在VB里面居然允许用Function来返回值，而且编译也不出错

    更糟糕的是，因为这些限制，有些在C#里面极其容易实现的功能在VB里面很难实现更多精彩文章及讨论，请光临枫下论坛 rolia.net
    • 一只大猫写这个贴子，总是等我回贴吧（我就自我感觉一下），老实说，大猫在这发的许多.NET贴子，大部分我都不会，所以我也从中学到很多东西，年龄大了，没那么精力，LINQ及Lambda不是我感兴趣的，回大猫的贴子都是现学现卖。 -tjhong(以后再说); 2010-10-15 {82} (#6320797@0)
      Dim a As Action(Of String) = Sub(s) Console.WriteLine(s)
      a("C# stinks")
      • 这段代码在VB2008下不工作的，没办法，最近接手一个VB2008的项目，越做越生气，有感而发，写了主贴那段心得，其实还有一段，今天补上 -binghongcha76(一只大猫); 2010-10-15 (#6320943@0)
    • 如果还是象很久以前，按程序行数计价的话，除了猫哥们，牛哥们，大多数程序员首选肯定还是vb -c1xwy(洪兴罩俺去战斗); 2010-10-15 (#6320814@0)
      • 给你推荐个网站，可以把你的C＃程序转换成VB.NET,(对于.NET 3.0以后的东西可能转换后可能有些代码要稍作改动，.NET 3.0前是可以直接用的)，看看代码行数有没有变长。 -tjhong(以后再说); 2010-10-15 (#6320827@0)
        • 行数有变化，c# 3217 lines => vb.net 2827 lines => c# 2914 lines. vb似乎还少点，在我看来，唯一的优点也没有了。 -c1xwy(洪兴罩俺去战斗); 2010-10-15 (#6320873@0)
        • 这个网站用了很长时间了，我现在都是先写好C#在用这个网站转换到VB，呵呵，当然涉及到LINQ这些语法的，这个网站转换会出错，这些代码都是我手写 -binghongcha76(一只大猫); 2010-10-15 (#6321005@0)
      • No. I would select DELPHI -pr3dat0r(Coder); 2010-10-25 (#6335926@0)
    • 一只大猫对VB.NET的攻击简直到了污蔑的地步。 -tjhong(以后再说); 2010-10-15 {276} (#6320815@0)
      Module Module1

      Sub Main()
      Dim ac As Action(Of String)
      ac = Sub(x) Console.WriteLine(x)
      ac("VB SUCKS")
      End Sub

      End Module

      原以为很轻松的一种转换，居然没法通过编译，微软VB小组的人难道都是吃shit的？

      评：大猫以走在技术前沿著名，就没在VS２０１０＋.NET 4.0上试试？
      • Sorry啊，熬夜写的，忘了说一下环境了，测试环境是VB 2008。2010我测过，没问题，微软改正了这些Bug。其实说白了就是VB2008不支持匿名函数，这是一个很大的缺陷 -binghongcha76(一只大猫); 2010-10-15 (#6320931@0)
      • 还有，惭愧啊，我真的没走在什么前沿，我说的这些都是.net 2.0时代就已经存在的基础。 -binghongcha76(一只大猫); 2010-10-15 (#6320962@0)
        • 那你不如批评 Java 为什么不能像 F# 那样呢 -sowen(昂居居); 2010-10-15 (#6320969@0)
          • 没用过Java，也不会。我只是原来猜想.net平台语言之间的一些重大优点应该由每种语言共享，比如你提到的 functional language 的风格，很遗憾，VB2008没有引入这个优点 -binghongcha76(一只大猫); 2010-10-15 (#6320988@0)
        • 有时觉得你钻牛角尖里，.NET里定义无数具体的Delegate,我记不住，我也觉得无关紧要，用到就自己来啊。 -tjhong(以后再说); 2010-10-15 {274} (#6321025@0)
          Module Module1

          Delegate Sub dePrint()

          Sub Main()
          Dim myD As New dePrint(AddressOf print)
          myD.Invoke()

          Console.ReadLine()

          End Sub


          Private Sub print()
          Console.WriteLine("fffffffff")
          End Sub
          End Module
    • MS 的东西都是垃圾 -borg_cn(黄非红); 2010-10-15 (#6320861@0)
      • 这个世界上没有真正的垃圾，一切都是看怎么样的人去怎么使用 -sowen(昂居居); 2010-10-15 (#6320940@0)
        • 说的对，所以用MS 的产品的人要么是马路天使，要么是环保人士 -borg_cn(黄非红); 2010-10-15 (#6321024@0)
    • 我们VB.NET也有C＃没有的关键字（With) -tjhong(以后再说); 2010-10-15 {195} (#6320893@0)
      With testObject
      .Height = 100
      .Text = "Hello, World"
      .ForeColor = System.Drawing.Color.Green
      .Font = New System.Drawing.Font(.Font, System.Drawing.FontStyle.Bold)
      End With
      • With is a long time and widely considered poor programming practice. It obscures the context of the code and reduces readability. It is a legacy from VB6. -keychain(人间正道是沧桑); 2010-10-20 (#6327375@0)
    • 意义不一样吧。以前写 pascal 的时候，写完后整篇程序可以像一篇英语作文，直接从上往下人为可以读下来。我一直觉得VB也是维持那种风格的，但是你要求他们实现 functional language 的风格，就好象一定要用锤来使玉女剑法 -sowen(昂居居); 2010-10-15 (#6320935@0)
    • VB程序员很多都是转行过来的，他们对语言没有太高的要求，搞得太复杂，他们未必接受。 -szs11(不器); 2010-10-15 (#6321049@0)
    • 因为主贴提到的一些限制，VB无法提供C#的一些很方便灵活的特性，比如 -binghongcha76(一只大猫); 2010-10-15 {799} (#6321280@0)
      在C# 3.0中有一个很常见的对IEnumerable<T>进行操作的For Each Loop扩展函数，这个扩展函数基本在每一本教授LINQ的书中都被提到过，定义如下

      public static void ForLoop<T>(this IEnumerable<T> s, Action<T> ac)
      {
      foreach (var x in s)
      {
      ac(x);
      }
      }
      这个扩展函数的目的是为了简化一般的Loop循环操作，正常的写法是这个样子，比如我要打印string[]里面每一个字符的值，一般是这么写

      string[] x;
      foreach(var c in x)
      {
      Console.Write(c);
      }

      很烦人，如果利用上边的扩展函数，我可以这样写：
      string[] x;
      x.ForLoop(s=>Console.Write(s))

      简单优美。

      但是因为VB2008不支持匿名函数，我没法用相似的简单方法定义并且使用这个扩展函数（定义可以，但是没法使用）

      当然VB2010作了重大改进，除了语法上保持极其啰嗦的特性之外，C#2008的功能它基本都支持了
    • Bullshit! Did you ever try this Dim a As Action(Of String) = Sub(s) Console.WriteLine(s) a("Test") -keychain(人间正道是沧桑); 2010-10-20 (#6327367@0)
      • 注意语言文明，发言前先把别人的贴子读完。 -tjhong(以后再说); 2010-10-20 (#6327521@0)

More Topics

  • 看大家讨论日语，俺也正在认真学习。其实语言问题应该是很快也很容易就解决的，可能比自动驾驶来的还快。TREK里面，全宇宙的人都在大脑里安装了UNIVERSAL TRANSLATOR，外星人之间相互交流无障碍。废话少说，看视频。。。加上个MIC和耳机，不同国家的人就可以无障碍交流。
  • 肉脸真有搞 IT 的？Linux 把俄国中国伊朗踢出去了好像肉脸 IT 没啥感觉似的
  • 请问web developer和software developer技术上有什么区别？
  • Elon Musk 带着川普总统奔向火星了。
  • 扔硬币的实验研究
    • 枫下论坛主坛 /  工作学习 /  学科技术讨论