string - VB.Net 如果或者语句

  显示原文与译文双语对照的内容
133 3

我有一个文本框,人们输入一个数字或者范围,例如 12 -15,一个随机数是生成的。 当前如果第二个数字小于第一个号码,我可以让它工作,但是如果只列出了一个号码。

如果没有 words(1) 或者小于 words(0),rnum1应该等于 rnum2. ( 如果它少了一点,我就做了。)


Dim words As String() = TextBox2.Text.Split("-")
Dim rnum1 As String = words(0)
Dim rnum2 As String = words(1)
Dim RandomClass As New Random()
Dim RandomNumber As Integer

If rnum2 <rnum1 Then
rnum2 = rnum1

End If

RandomNumber = RandomClass.Next(rnum1, rnum2)

时间: 原作者:

139 3

更改此行


Dim rnum2 As String = words(1)


Dim rnum2 As String = IF(words.Length = 2, words(1), rnum1)

它检查单词 array 中是否有 2个元素。 如果是- 它使用 array的第二个元素,否则它将重新分配第一个元素。

来思考一下,甚至可以通过以下方式实现:


Dim rnum2 As String = words(words.Length - 1)

如果 array 中有 2个元素,它将分配 words(1), ( 0 )

原作者:
...