[Resolvido]Não consigo fazer que a Variável receba um valor para usar no Projeto

Olá Eder,
Via OpenArgs, pode fazer, veja o meu teste abaixo.
Abraço

Olá Eder,
Actualizei exemplo acima, com o seguinte código também podemos fazer via variável global:

Código:

Option Compare Database
Option Explicit
' AHTEIXEIRA 2016 para MaximoAccess
' Access definição variáveis globais
Global GBL_Empresa As String

Public Function SetGBL_Empresa(strEmpresa As String)
   GBL_Empresa = strEmpresa
End Function

Public Function GetGBL_Empresa()
   GetGBL_Empresa = GBL_Empresa
End Function

Abraço

Olá Teixeira!
Eu sou bem noob nesse negocio de programação e tem algumas coisas que eu não to entendendo no codigo se puder me explicar eu agradeço


Option Compare Database
Option Explicit
' AHTEIXEIRA 2016 para MaximoAccess
' Access definição variáveis globais
Global GBL_Empresa As String ' aqui declara a variavel texto

Public Function SetGBL_Empresa(strEmpresa As String) 'Porque SET e declara que é texto
  GBL_Empresa = strEmpresa 'variavel texto é igual variavel texto
End Function

Public Function GetGBL_Empresa() ' porque GET sem declarar nada
  GetGBL_Empresa = GBL_Empresa 'variavel texto e igual a variavel texto
End Function

e na hora de de falar empresa e igual a quem????

empresa = gbl_empresa

se eu quiser declara outra variavel tipo funcionario
vai ser mais ou menos assim?
-------------------------------------------------------------------------------------------------------------------
Option Compare Database
Option Explicit
' AHTEIXEIRA 2016 para MaximoAccess
' Access definição variáveis globais
Global GBL_Empresa As String ' aqui declara a variavel texto
global GBL_Funcionario as string

Public Function SetGBL_Empresa(strEmpresa As String) 'Porque SET e declara que é texto
  GBL_Empresa = strEmpresa 'variavel texto é igual variavel texto
  GBL_Funcionario = ?????? 'fiquei sem saber o que fazer kk
End Function

Public Function GetGBL_Empresa() ' porque GET sem declarar nada
  GetGBL_Empresa = GBL_Empresa 'variavel texto e igual a variavel texto
End Function
--------------------------------------------------------------------------------------------------------------------

Novamente Obrigado.

Olá, estou no telemóvel mas vamos a isso.

Neste caso pediu para EMPRESA, entao num modulo criamos a definição da variavel pretendida:

GBL_Empresa

Depois foram criadas duas funções, uma para atribuir a empresa à variável global (SETGBL_Empresa) e outra para obter (GETGBL_Empresa).

Assim no seu programa, sempre que desejar atribuir ou buscar a empresa, chama pela função.

Estude o exemplo.

Quanto ao funcionário, sim , terá que fazer o mesmo.
Abraço e já sabe com o MaximoAccess é sempre aprender.

Olá, Com funcionário:

Código:

Option Compare Database
Option Explicit
' AHTEIXEIRA 2016 para MaximoAccess
' Access definição variáveis globais
Global GBL_Empresa As String
Global GBL_Funcionario As String


Public Function SetGBL_Empresa(strEmpresa As String)
  GBL_Empresa = strEmpresa
End Function

Public Function GetGBL_Empresa()
  GetGBL_Empresa = GBL_Empresa
End Function

Public Function SetGBL_Funcionario(strFuncionario As String)
  GBL_Funcionario = strFuncionario
End Function

Public Function GetGBL_Funcionario()
  GetGBL_Funcionario = GBL_Funcionario
End Function

Uma explicação adicional, eu uso esta técnica do SET (atribuir à variável) e GET (obter da variável), pois assim também funciona em consultas, veja


resultado:


Abraço

Olá Eder,
O tópico foi dividido, não devemos misturar temas.
Compreendeu o exemplo das variáveis?
Os utilizadores do fórum agradecem o retorno.
Abraço