Question

我有一个人们输入数字或范围的文本框，例如12-15，并生成一个随机数。目前，如果第二个数字小于第一个数字，我可以按照我想要的方式工作，但如果只列出一个数字则不能。

如果没有单词（1）或者它小于单词（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)

Answer 1

更改此行

Dim rnum2 As String = words(1)

到

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

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

想想看，即使这样也可以实现：

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

如果数组中有2个元素 - 它将分配单词（1），否则单词（0）

VB.net如果或声明

1 个答案: