我需要帮助输出用逗号分隔的数字平方

Question

公共类Form1

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
TextBox2.Text = TextBox1.Text ^ 2
End Sub
Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
TextBox1.Text = Nothing
TextBox2.Text = Nothing
End Sub

结束类上面的代码输出文本框1中输入的任何单个值的平方，但我需要一些帮助来输入用逗号分隔的几个值，然后输出这些单独值的平方。例如3，4输出9，16

Answer 1

我不会为你做这一切，因为这看起来像是家庭作业，但这里有一些提示：

TextBox2.Text = TextBox1.Text ^ 2

1( 通过将Option Strict On放在代码文件的顶部或将其放在项目属性"编译"选项卡中，启用Option Strict。这将有助于提高编码的严格性。在这里，您需要一个字符串(TextBox1.Text(，让VB自动将其转换为数字(这可能会失败(，对其进行平方，然后自动将其重新转换为字符串以存储在TextBox2.Text中。这是个坏消息；在自己的脑海中始终清晰明了，并在编码中明确各种数据类型之间的差异。包含数字的字符串与数字不是一回事！

2( 将文本框放在表单上后重命名它们。没有什么比阅读一段变量名是无关垃圾的代码更令人沮丧的了。当你在6个月后回到一些复杂的代码并思考"什么…"时，你会发现这一点；将一个文本框重命名为resultTextBox或inputTextBox需要几秒钟的时间，并使您的代码立即更容易为您和您呼叫的任何人所理解

用逗号分隔

下面的代码行将把一个字符串拆分成一个字符串数组，用逗号分隔：

Dim csv = "3,6"
Dim arr = csv.Split(","c) 
Console.WriteLine(arr(0)) 'prints 3
Console.WriteLine(arr(1)) 'prints 6

以下代码行将字符串转换为整数：

Dim s = "3"
Dim i = Convert.ToInt32(s)

数学运算现在可以在它上执行

i = i * i 'square it

以下代码行将把一个整数转换为字符串：

Dim i as Integer = 3
Dim s as String = i.ToString() 's is now "3"

下面的代码行将在数组中循环，将数组中的值附加到字符串变量中，并添加逗号。最后，它去掉了多余的尾部逗号

Dim s as New String
For Each x as String in arr
s = s & x & ","
Next x
s = s.TrimEnd(","c)

这里还有另一种方法，使用String.Join辅助方法：

Dim s as String = String.Join(","c, arr)