首次在本网站发帖;主要是因为我遇到了一个很大的问题,我的视觉基础课上有一个我们被分配的问题。可以看到完整的问题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框中。我希望我至少有一些意义。
答案 0 :(得分:0)
你可以将屈曲变量设置为布尔值为Mark Hall建议的值,或者将单词“True”或“False”改为字符串,以便你的屈曲变量接受它们 IE只是将Double Quote(s)添加到True(将其变为“True”)和False(将其变为“False”)