Bem vindo ao SOS Designers

Faça o seu cadastro gratuito no Portal SOS Designers e tenha um acesso personalizado.

Empresas

Cadastre gratuitamente suas vagas, crie sua propria Lista de Curriculos Favoritos, e tenha um acesso personalizado.

Usuarios

Cadastre gratuitamente seu curriculo, crie sua propria Lista de Noticias Favoritas e tenha um acesso personalizado.

Área de Empresas | Vagas

Área de acesso a empresas cadastradas que desejam postar vagas de empregos no Portal e pesquisar curriculos.

Cadastre-se gratuitamente
Esqueceu a sua senha?

Área de Usuarios | Curriculos

Área do Usuario que deseja cadastrar seu curriculo e pesquisar vagas.



Cadastre-se gratuitamente
Esqueceu a sua senha?


Redes Sociais
Siga o Portal SOS Designers no Twitter Siga o Portal SOS Designers no Facebook

ASP


Você está aqui: Home » ASP » Passe as variaveis por valor sem ByVal

Passe as variaveis por valor sem ByVal


Pesquisar no Portal SOS Designers





Tempo Real



Siga o SOS Designers








pub_flash( 'http://www.sosdesigners.com/banners/mkt digital_flash_300x250.swf', 300, 250 ); " alt="Tecnoponta - 300 x 250 - MKT Digital" />
Se você deseja passar as variáveis por valor, para uma Sub ou Function que não teve seus argumentos declarados com ByVal, use '('e ')' em torno da variável que vc está passando como parâmetro.

Veja o código do exemplo. A variával Var2 tem seu valor alterado, porque foi passada por referência (default no VB até a versão 6), enquanto que a variável Var1 não, embora a sub MudaValor não teve seus primeiro argumento declarado como ByVal.

Sub MudaValor(Var1 As String, Var2 As String)

Var1 = "Valor alterado"
Var2 = "Valor alterado"

End Sub

'====================

Private Sub Form_Click()

Dim Var1 As String
Dim Var2 As String

Var1 = "O valor não foi alterado"
Var2 = "O valor não foi alterado"

MudaValor (Var1), Var2

Print Var1
Print Var2

Print

Var1 = "O valor não foi alterado"
Var2 = "O valor não foi alterado"

MudaValor Var1, Var2

Print Var1
Print Var2

End Sub

'===========================

Execute o programa, e no form que abrir, dê um clique no mesmo. O resultado das chamadas à Sub MudaValor aparecerão impressas no próprio form



Deixe seu comentário:





© Copyright 2002-2018
Portal SOS Designers
Webmaster: Luiz Antonio Bovi