Vb.net Net不知道如何得到这个编译也复古基本

嘿，我不能编译这个，我想VB.net是最好的尝试，让这个代码运行

我的大部分问题都是关于一种叫黄油的点心。“严重性代码说明项目文件行抑制状态 警告BC42104变量“butter”在赋值之前已被使用。运行时可能导致空引用异常。 "

System.InvalidCastException:'从字符串“This”到类型“Integer”的转换无效。'

Module Module1

    Sub Main()

        Dim cocco
        Dim apple
        Dim butter
        Dim rice

01:     GoTo 50
02:     cocco = apple + butter
04:     Print(cocco)
05:     Randomize(Timer)
06:     rice = 1
08:     rice = rice + Int(Rnd() * 10)
10: REM 
12:     GoTo 860
14:     apple = "random "
16:     butter = "number "
18:     cocco = apple + butter
20:     Print(cocco)
22:     GoTo 27
24: REM
26: REM
27:     Print(rice)
28:     GoTo 212
30: REM
50:     apple = "This "
60:     GoTo 02
210: REM
212:    apple = "and terminates "
214:    butter = ":-) !"
216:    cocco = apple + butter
218:    Print(cocco)
220:    End
850: REM
860:    apple = "only "
870:    butter = "prints "
880:    cocco = apple + butter
890:    Print(cocco)
900:    GoTo 14


    End Sub

End Module

---

这段代码有很多问题。一些建议： 1） 在解决方案资源管理器中单击“我的项目”。单击“编译”链接并设置选项Strict on。这将突出显示许多错误，然后您可以跟踪并修复这些错误

2） 所有Dim语句都应具有与之关联的变量类型。例如，dim butter as String=“”和dim rice as integer=0

3） 虽然我认为Goto语句确实有一些非常特殊的用途，但它们有助于编写通心粉代码。考虑使用子例程来重新设计。

---

祝你好运，继续尝试。

错误发生在Print语句中。在VB.Net中，Print默认为Filesystem.Print，它需要一个整数作为参数。如果将Print更改为Console.WriteLine，则输出将显示在输出窗口中

---

Randomize（Timer）也有一个问题-因为Timer是System.Windows.Forms类，所以可以使用Randomize（）初始化随机数生成器。

给你。编译的Windows窗体VB.net应用程序。检查调试菜单>窗口>即时，这是调试的位置。将输出打印到

Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim cocco As String = ""
        Dim apple As String = "This "
        Dim butter As String = ""
        Dim rice As Integer
        cocco = apple & butter
        Debug.Print(cocco)
        Dim r As New Random
        rice = 1
        rice = rice + r.Next(10)
        apple = "only "
        butter = "prints "
        cocco = apple & butter
        Debug.Print(cocco)
        apple = "random "
        butter = "number "
        cocco = apple & butter
        Debug.Print(cocco)
        Debug.Print(rice)
        apple = "and terminates "
        butter = ":-) !"
        cocco = apple & butter
        Debug.Print(cocco)
    End Sub
End Class

---

您正在尝试使用VB.NET编译BASIC？另外，代码中的错误是正确的-在给它赋值之前，您正在尝试访问

butter

。我想是的，我真的不知道如何使用它们。我不认为windows有一个基本的编译器。只要在谷歌上搜索“Windows10的基本编译器”就会返回很多结果。此外，我认为在你开始编写代码之前，你需要先学习BASIC和VB.NET。嘿，为指针干杯，我大部分时间都使用c#而且我在这方面也很糟糕，我妈妈一直用最糟糕的语言给我发这些可怕的编程难题。嘿，干杯，我真的不使用控制台应用程序，所以我刚用了CopyIta，我想我需要一个readline或是在结尾处的某种中断/暂停。是的Console.Read（）类似的东西