Definere variable som er globalt tilgjengelig.

[K..]

Heisann folkens!

 

Sitter og lager et excel-form med noen knapper jeg ønsker å styre ved hjelp av Visual Basic. Siden det blir ganske mange knapper i arket mitt ønsker jeg å kalle tekstboksene på følgende vis:

Private Sub Controls_A_Click()
result = MsgBox("Innhold", Button + Icon, Head)
If result = 6 Then
noe
Else
noe anent
End If
End Sub

 

I "ThisWorkbook" har jeg lagt inn følgende:

Public Sub Workbook_open()	
'Dialogboksutseende blir definert
Head = "Dialogbokstittel"
Button = vbYesNo
Icon = vbQuestion
End Sub

 

Når jeg starter opp dokumentet kjøres Public Sub Workbook_open(), men når jeg trykker på boksene vises de helt tomme. Dvs, ant. alternativer, header osv. blir ikke hentet. Antar jeg må definere variablene på en eller annen måte slik at de blir tilgjengelig fra hele dokumentet, men vet ikke helt hvordan dette foregår.

 

Takker for all hjelp!

[miXer]

For å deklarere globale variabler, må disse angis utenfor alle Sub'ene, men innenfor klassen.

Slik som dette:

Public Class Form1

 

Dim sak As String = "etellerannet"

 

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

MsgBox(sak)

End Sub

 

End Clas

 

Så har du forskjellige måte å deklarere variabelen på. Du har Dim(vanlig), Public(Tilgjengelig fra Form1 og eventuelt andre former du har i prosjektet ditt), Const(En variabel som ikke kan forandres) osv..

Endret 11. februar 2009 av miXer