Udostępnij za pośrednictwem


Porady: tworzenie procedury (Visual Basic)

Należy ująć procedury między początkową instrukcji deklaracji (Sub lub Function) i końcową instrukcji deklaracji (End Sub lub End Function).Kod procedury wszystkie leży pomiędzy te instrukcje.

Procedury nie może zawierać innej procedury, więc sprawozdaniu początkowy i końcowy muszą być poza inne procedury.

Jeśli kod, który wykonuje to samo zadanie w różnych miejscach, można napisać zadania raz jako procedury, a następnie wywołać ją z różnych miejsc w kodzie.

Aby utworzyć procedurę, która nie zwraca wartości

  1. Poza inne procedury, użyj Sub instrukcji, następuje End Sub instrukcji.

  2. W Sub instrukcji, postępuj zgodnie z Sub słowa kluczowego z nazwą procedury, a następnie listę parametrów w nawiasach.

  3. Umieścić instrukcje kodu procedury między Sub i End Sub instrukcji.

Aby utworzyć procedury, która zwraca wartość

  1. Poza inne procedury, użyj Function instrukcji, następuje End Function instrukcji.

  2. W Function instrukcji, postępuj zgodnie z Function słowa kluczowego z nazwą procedury, a następnie listę parametrów w nawiasach, a następnie As klauzuli określający typ danych zwracanej wartości.

  3. Umieścić instrukcje kodu procedury między Function i End Function instrukcji.

  4. Użyj Return instrukcji, aby zwrócić wartość kod wywołujący.

Aby połączyć nowe procedury z stare, powtarzających się bloków kodu

  1. Należy upewnić się, czy zdefiniować nowe procedury w miejscu, w którym starego kodu ma dostęp do niego.

  2. W bloku kodu stare, powtarzające się, zastępują sprawozdania, które powtarzających się zadań z pojedynczą instrukcją, która wywołuje Sub lub Function procedury.

  3. Jeśli procedura jest Function , zwraca wartość, upewnij się, że instrukcja wywołującego wykonuje akcję z wartością zwróconą, takie jak przechowywanie go w zmiennej, albo też wartości zostaną utracone.

Przykład

Następujące Function procedury oblicza najdłuższy bok lub przeciwprostokątnej trójkąta prostokątnego, biorąc pod uwagę wartości dla obu stron.

Function hypotenuse(ByVal side1 As Single, ByVal side2 As Single) As Single 
    Return Math.Sqrt((side1 ^ 2) + (side2 ^ 2))
End Function

Zobacz też

Koncepcje

Procedury w Visual Basic

Sub — Procedury (Visual Basic)

Procedury funkcji (Visual Basic)

Procedury własności (Visual Basic)

Procedury operatorów (Visual Basic)

Parametry i argumenty procedur (Visual Basic)

Procedury rekurencyjne (Visual Basic)

Przeciążanie procedury (Visual Basic)

Programowanie zorientowane obiektowo (C# i Visual Basic)

Inne zasoby

Obiekty i klasy w Visual Basic