VB.net如果或聲明

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）