这段可笑的代码更坚定了我在VB.NET上的信心了

本想在GOOGLE上搜索一个代码转换器，不料竟搜到这个让涕淌大口吐奶的网站：
http://www.vbconversions.com/topten.aspx （别忘了是右键点击然后在新窗口中打开！）

冠冕堂皇地列了十条TopTen理由，其中第一条尤其经典——C#代码的执行速度比VB.NET要快。

它举了一个计算质数数目的程序的例子（偏偏只提供VB的代码而不给C#版本的，实在不知道他是如何得出结论的），便一口咬定C#用的时间比VB少了一半还多。我实在是忍不住好奇心，斗胆冒着中毒的危险，下载了它的VB源程序（你要吃饱了也可以去下，没毒你别想歪了：http://www.vbconversions.com/sieve.zip）。

代码如下，我简直要喷饭了……

Private Sub llStart_LinkClicked(ByVal sender As System.Object, ByVal e As _
                                    System.Windows.Forms.LinkLabelLinkClickedEventArgs) _
                                    Handles llStart.LinkClicked
        If IsNumeric(Me.txtMaxNbr.Text) = False Then
            MsgBox("Max Nbr must be numeric!", _
                            MsgBoxStyle.Exclamation, _
                            "Max Nbr Not Numeric")
            Return
        End If

Dim N, i, j
        N = CInt(Me.txtMaxNbr.Text)
        '他居然要申请一个这么大的数组，看官你莫急，先猜猜他想干什么。
        Dim z(N)
        Dim startTime As DateTime = Now

'initialize array
        '这步纯属吃饱撑的没代志做！他不知道VB里数组初始化本来就是零么？
        For i = 0 To N
            z(i) = 0
        Next

'mark multiples of i

'用这种办法求质数，弓虽两个字！
        For i = 2 To N / 2
            For j = 2 * i To N Step i
                z(j) = 1
            Next
        Next

'count unmarked numbers, which are primes
Dim nbr = 0

'如此虔诚地重新再搜索一遍数组
        For i = 2 To N
            If z(i) = 0 Then
                nbr += 1
            End If
        Next

Dim ts As New TimeSpan(Now.Ticks - startTime.Ticks)

'没话说了呵呵，看到这我只能傻笑
Me.lblNbrPrimes.Text = nbr
Me.lblTime.Text = ts.ToString

End Sub

实在不知道怎么还有这么搓的人敢堂而皇之地在网上发这种拙劣算法的代码（涕淌心想他都可以去南大应聘教授了呵呵），然后毫无根据地也能得出一个可笑的结论。说实话，看完这“TopOne”，我后面的九条都不想看了。我的信心剧增啊！！！

ps 写本文时，从疯牛涕淌宿舍窗外时时传来哄闹声——听说中国队已经7:0领先香港队了，你说香港不放水打死我我都不信——今晚怎么发生了这么多啼笑皆非的事情？

这段可笑的代码更坚定了我在VB.NET上的信心了相关推荐

vba 编辑combobox内容_初识Visual Basic编辑器并建立一段简单的代码
大家好,从今日开始我正式推出"VBA之EXCEL应用"教程,这个教程是面向初学人员的教程,教程一共三册,十七个章节,从简单的录制宏实现一直讲到窗体的搭建,都是我们在利用EXCEL工 ...
【译】五个ES6功能，让你编写代码更容易
原文地址: Five ES6 features to make your life easie 原文作者: Scott Domes 译者: vonmo 众所周知,学习新语法是一件很怪异的事情.我们大多 ...
一名Android程序员如何减少代码中该死的-if-else-嵌套，怎么让代码更简洁？
减少代码中该死的-if-else-嵌套,让代码更简洁! 写在前面不知大家有没遇到过像"横放着的金字塔"一样的if else嵌套: if (true) {if (true) {if ...
RecyclerView复杂适配器的终极形态?代码更解耦
本文已授权微信公众号:鸿洋在微信公众号平台原创首发.RecyclerView复杂适配器的"终极形态"?代码更解耦前言 RecyclerView是Android开发中很常用的控 ...
mysql 利用触发器(Trigger)让代码更简单
一,什么触发器 1,个人理解触发器,从字面来理解,一触即发的一个器,简称触发器(哈哈,个人理解),举个例子吧,好比天黑了,你开灯了,你看到东西了.你放炮仗,点燃了,一会就炸了. 2,官方定义触发器 ...
30段超实用CSS代码
上周,研发频道发表了一篇" Web开发者不容错过的20段CSS代码",大家一致觉得很实用.该文是笔者对后30个的翻译,希望对大家有帮助. 1.花式连字符(&) 这个类应该在 ...
Web开发者的福利 30段超实用CSS代码
上周,研发频道发表了一篇" Web开发者不容错过的20段CSS代码",大家一致觉得很实用.该文是笔者对后30个的翻译,希望对大家有帮助. 1.花式连字符(&) 这个类应该在 ...
为什么用了 DDD 以后，代码更难懂了？
每过一段时间,就会有人跳出来批判 DDD,这东西到底是垃圾还是银弹? 在某某公司干活的时候,有一批人声称要用 DDD 改造老旧系统,彻底解决核心流程规模化之后,项目难以维护的问题.之前某篇文章里的这张 ...
3 个简单的技巧让你的 vue.js 代码更优雅！
关注逆锋起笔,回复"加群" 加入我们一起学习,天天进步作者:红尘炼心 https://juejin.cn/post/7005751368937897991 前言近来入坑了一个 ...

这段可笑的代码更坚定了我在VB.NET上的信心了

这段可笑的代码更坚定了我在VB.NET上的信心了相关推荐

最新文章

热门文章