Udostępnij za pośrednictwem


Jak: 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 języka Visual Basic

Procedury typu Sub (Visual Basic)

Procedury typu Function (Visual Basic)

Właściwość procedur (Visual Basic)

Operator procedur (Visual Basic)

Parametry procedury i argumenty (Visual Basic)

Procedury cykliczne (Visual Basic)

Procedura przeciążenie (Visual Basic)

Programowanie zorientowane obiektowo (C# i Visual Basic)

Inne zasoby

Obiekty i klasy w języku Visual Basic