Наличие необязательного параметра в функции

Question

Очень быстрый вопрос: я хочу создать функцию с необязательным параметром, потому что я не могу найти необходимость в параметре в функции. В результате я закодированы следующие функции в Visual Basic:

Sub characterListLength(ByVal Optional) 
    Dim rowCount As Integer 
    Dim endOfArray As Boolean 
    While endOfArray = False 
     If dataArray(0, rowCount) And dataArray(1, rowCount) = "" Then 
      arrayLength = rowCount 
      endOfArray = True 
     Else 
      rowCount += 1 
     End If 
    End While 



End Sub 

Однако на первой линии:

Sub characterListLength(ByVal Optional) 

Существует ошибка, где, как ожидается, идентификатор, где код говорит (ByVal Необязательный) , Я не уверен, как исправить эту ошибку и иметь необязательный параметр. Если бы кто-нибудь мог объяснить, что еще мне нужно сделать, чтобы исправить это, это было бы очень полезно.

Answer 1

Вам нужно фактической переменной, что-то вроде:

Sub characterListLength(Optional ByVal optionalNumber As Integer = 0) 

Answer 2

Вы должны дать параметр имя и изменить порядок ключевых слов

Sub characterListLength(Optional ByVal p = Nothing) 

Answer 3

Если вы сказали:

, потому что я не могу найти необходимость в параметре в функции

Затем с помощью метода без параметров:

Sub characterListLength() 
    'Here your code 
End Sub 

Answer 4

Лучше «точка-nettier» альтернатива необязательных параметров заключается в использовании перегруженных методов. Рассмотрим следующее:

Overloads Sub ShowMessage() 
    ShowMessage("This is the default alter message") 
End Sub 

Overloads Sub ShowMessage(ByVal Message As String) 
    Console.WriteLine(Message) 
End Sub 

Написано, как это вы можете вызвать вышеописанный метод в обоих направлениях:

ShowMessage() 'will display default message 
ShowMessage("This is custom message") 'will display method from the parameter 

Демо: http://dotnetfiddle.net/OOi26i