function - 编写处理数学函数和 IF 逻辑的 Visual Basic 程序的问题

Question

第一次在本网站发帖；主要是因为我遇到了一个大问题，关于我们分配的视觉基础类(class)的问题。完整问题可见here .

基本上，我遇到了一些问题，我认为我按照指示正确执行了屈曲载荷函数，但我不知道如何将每个不同的 True 或 False 值放入 lstOut 框中。

Public Class Form1

Private Sub btnCompute_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCompute.Click
    Dim area As Double
    Dim length As Double
    Dim width As Double
    Dim load As Double
    Dim buckling1 As String
    Dim buckling2 As String
    Dim buckling3 As String


    length = CDbl(txtIn.Text)
    load = CDbl(txtLbs.Text)
    buckling1 = Test1(load, length, 2, area)
    buckling2 = Test1(load, length, 4, area)
    buckling3 = Test1(load, length, 6, area)


End Sub


Private Function Test1(ByVal load As Double, ByVal length As Double, ByVal width As Double, ByVal area As Double) As Boolean
    If ((0.3 * 1700000 * (length * width)) / (length / width) ^ 2) > load Then
        Return True
    Else
        Return False
    End If
End Function
End Class

这只是第一部分......我真的很难回答这个问题。我对编程有点陌生，函数的概念非常可怕。有人可以给我任何提示或建议吗？

请注意，我并不是要求完成整个问题，我只是想弄清楚如何将 Test1、Test2 和 Test3 函数的所有输出放入 lstOut 框中。我希望我至少说得有道理。

Answer 1

您可以按照 Mark Hall 的建议将屈曲变量设置为 boolean 值，或者将“True”或“False”作为字符串传递，以便您的屈曲变量接受它们IE 只需将双引号添加到 True(将其变为“True”)和 False(将其变为“False”)