Question

求助VB.NET 编写 程序代码 求代码

编写一个计算矩形面积的通用过程，然后调用该过程计算矩形的面积。

设计步骤如下：

① 建立应用程序用户界面和添加控件，并设置各对象的属性。设置如图所示。

Answer 1

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        TextBox3.Text = Val(TextBox1.Text) * Val(TextBox2.Text)

    End Sub

End Class

追问

追答

Dim sum As Double, i As Integer
For i = 1 To 200
If i Mod 7 = 0 Then
sum = sum + i
End If
Next i
Label1.Text = "1--200之间能被7整除的整数的和=" & sum