Merhaba benim sorum excel deki değişkenlerin geçerlilikleri ile ilgili.
Aşağıda kod satırlarını verdiğim program parçasında 3 adet değişken kullanıyorum. Bulardan
sayi1 ve toplam "Integer" cinsinden
sabit ise "Const" cinsinden
ben bu verilerin tanımlamaları ana prosedurde veri atamalarını ise alt prosedurde "birazda geçmiş zamanlardaki programlama alışkanlığı ile" yaptım (sabit adlı "const" cisnsinden değişkende ise durum farklı). Programı çalıştırdığımda aşağıdaki sonuçları alıyorum;
topla prosedurundeki toplam=0
topla prosedurundeki sayi1=2
topla prosedurundeki sabit=
ana prosedurdeki toplam=0
ana prosedurdeki sayi1=
ana prosedurdeki sabit=2
SORUM ŞU : ana prosedürde tanımladığım verilerin tüm prosedürlerde (hatta user formdaki prosedürlerde de) geçerli olması için nasıl bir tanımlama yapmalıyım?
Not : ben prosedürler arasında veri aktarmak yada fonksiyon kullanmak istemiyorum.
Cevaplarınız için şimdiden teşekkürler
Sub ana()
Dim sayi1, toplam As Integer
Const sabit = 2
Call topla
MsgBox ("ana prosedurdeki toplam = " & toplam)
MsgBox ("ana prosedurdeki sayi1 = " & sayi1)
MsgBox ("ana prosedurdeki sabit = " & sabit)
End Sub
Sub topla()
sayi1 = 2
toplam = sayi1 * sabit
MsgBox ("topla proseduründeki toplam = " & toplam)
MsgBox ("topla proseduründeki sayi1 = " & sayi1)
MsgBox ("topla proseduründeki sabit = " & sabit)
End Sub
Aşağıda kod satırlarını verdiğim program parçasında 3 adet değişken kullanıyorum. Bulardan
sayi1 ve toplam "Integer" cinsinden
sabit ise "Const" cinsinden
ben bu verilerin tanımlamaları ana prosedurde veri atamalarını ise alt prosedurde "birazda geçmiş zamanlardaki programlama alışkanlığı ile" yaptım (sabit adlı "const" cisnsinden değişkende ise durum farklı). Programı çalıştırdığımda aşağıdaki sonuçları alıyorum;
topla prosedurundeki toplam=0
topla prosedurundeki sayi1=2
topla prosedurundeki sabit=
ana prosedurdeki toplam=0
ana prosedurdeki sayi1=
ana prosedurdeki sabit=2
SORUM ŞU : ana prosedürde tanımladığım verilerin tüm prosedürlerde (hatta user formdaki prosedürlerde de) geçerli olması için nasıl bir tanımlama yapmalıyım?
Not : ben prosedürler arasında veri aktarmak yada fonksiyon kullanmak istemiyorum.
Cevaplarınız için şimdiden teşekkürler
Sub ana()
Dim sayi1, toplam As Integer
Const sabit = 2
Call topla
MsgBox ("ana prosedurdeki toplam = " & toplam)
MsgBox ("ana prosedurdeki sayi1 = " & sayi1)
MsgBox ("ana prosedurdeki sabit = " & sabit)
End Sub
Sub topla()
sayi1 = 2
toplam = sayi1 * sabit
MsgBox ("topla proseduründeki toplam = " & toplam)
MsgBox ("topla proseduründeki sayi1 = " & sayi1)
MsgBox ("topla proseduründeki sabit = " & sabit)
End Sub