Seçileni Raporlamadaki ifadeler

Katılım
31 Ağustos 2005
Mesajlar
1,534
Excel Vers. ve Dili
Excel 2003 - Türkçe
Merhaba,

Aşağıdaki sorumdan da anlayacağınız gibi, access öğrenmeye 1-,1,5 ay önce başladım ve kendimce birşeyler yapmaya çalışıyorum.Sitemizdeki değerli üstatlarımızın yardım ve açıklamalarıyla da bu işi az da olsa yapabileceğim gibi geliyor.

Bu yüzden sorum çok acemice bile olsa, açıklamalarınız bana ışık tutacaktır.

Kod:
[SIZE=3][FONT=Times New Roman]Private Sub Komut188_Click()[/FONT][/SIZE]
[SIZE=3][FONT=Times New Roman]On Error GoTo Err_Komut188_Click[/FONT][/SIZE]
 
[SIZE=3][FONT=Times New Roman]  Dim stDocName As String[/FONT][/SIZE]
 
[SIZE=3][FONT=Times New Roman]  stDocName = ChrW(114) & ChrW(112) & ChrW(83) & ChrW(105) & ChrW(99) & ChrW(105) & ChrW(108) & ChrW(101) & ChrW(71) & ChrW(246) & ChrW(114) & ChrW(101) & ChrW(89) & ChrW(97) & ChrW(122) & ChrW(100) & ChrW(305) & ChrW(114) & ChrW(68) & ChrW(101) & ChrW(116) & ChrW(97) & ChrW(121)[/FONT][/SIZE]
[SIZE=3][FONT=Times New Roman]  DoCmd.OpenReport stDocName, acNormal[/FONT][/SIZE]
 
[SIZE=3][FONT=Times New Roman]Exit_Komut188_Click:[/FONT][/SIZE]
[SIZE=3][FONT=Times New Roman]  Exit Sub[/FONT][/SIZE]
 
[SIZE=3][FONT=Times New Roman]Err_Komut188_Click:[/FONT][/SIZE]
[SIZE=3][FONT=Times New Roman]  MsgBox Err.Description[/FONT][/SIZE]
[SIZE=3][FONT=Times New Roman]  Resume Exit_Komut188_Click[/FONT][/SIZE]
 
[FONT=Times New Roman][SIZE=3]End Sub[/SIZE][/FONT]
Bir programda gördüğüm ve seçileni raporlayan bu kodda:

1- ChrW(114) & ChrW(112) & ChrW(83) & kelimeleri neyi ifade etmektedir.


2- Kodda raporun adı da yazmadığı halde, nasıl bir yöntemle ilgili rapor yazdırılmaktadır.


Değerli bilgi ve açıklamalarınıza şimdiden teşekkürler.


Selam ve saygılarımla.
 
Katılım
15 Kasım 2006
Mesajlar
583
Excel Vers. ve Dili
Ms Office 2003 Türkçe
msgbox ile stdocname i ekrana yazdırın.

yine msgbox ile ChrW(114) yı ekrana yazdırın.

imlec ChrW üzerindeyken F1 tuşuna basın.
 
Katılım
31 Ağustos 2005
Mesajlar
1,534
Excel Vers. ve Dili
Excel 2003 - Türkçe
Sayın yeni54;

Yukarıda da belirttiğim gibi daha çok acemiyim.

1-ChrW nedir?

2-msgbox ile stdocme nasıl ekrana yazılır?

Sizin vaktinizi alıyorum. Ama böyle sora sora öğreneceğiz.

Selamlarımla.
 
Katılım
15 Kasım 2006
Mesajlar
583
Excel Vers. ve Dili
Ms Office 2003 Türkçe
Cevaplamak sorun değil ama,

işin en başında olduğunuz için, her cevaptan emin olun onlarca soru daha çıkacaktır.

Forumdan bu şekilde sora sora öğrenme yöntemini acilen bırakıp, önce bir kaynaktan -ki bu kaynağın bir kitap olmasını şiddetle öneririm- sabırla öğrenmeye başlamanız lazım.

Belli bir seviyeden sonra forum faydalı olmaya başlıyor.

Şimdi, chrw(x) ne yapar? Şunu yapar:
x, integer değer olmak üzere bir parametre alır. Aldığı bu parametrenin ascii tabloda karşılığı olan değeri geri döndürür.
Örneğin, A harfinin ascii tablodaki karşılığı 65 tir.
chrw(65) den bahsedildiğinde aslında A harfinden bahsedilmiş oluyor.

şimdi bu açıkalamada size yabancı olabilecek ifadelere gelelim:
-- ascii tablo nedir?
-- int nedir?
-- parametre nedir?
-- geri döndürmek nedir?

gördüğünüz gibi bu uzayıp gider.

(yine işi uzatacak şeyler var, mesela chr, chrb,chr$, chrw...)

Herzaman dediğim gibi, önce biryere kadar teorik bilgi tabanı oluşturulmalı,
sonra uygulamaya geçilmeli.

Umarım beni yanlış anlamazsınız.
 
Son düzenleme:
Katılım
31 Ağustos 2005
Mesajlar
1,534
Excel Vers. ve Dili
Excel 2003 - Türkçe
Sayın yeni54;

İlginize çok teşekkür. Tavsiyelerinizi tutacağım

Bir de msgbox ile stdocme veya ChrW(114) nasıl ekrana yazılır?

Bu konuda da açıklama yaparsanız sevinirim.

Selam ve saygılarımla.
 
Katılım
15 Kasım 2006
Mesajlar
583
Excel Vers. ve Dili
Ms Office 2003 Türkçe
1. Herhangi bir formun dizayn ını açın,
2. Bu forma bir buton ekleyin,
3. Bu buton un üzerinde ike F7 ye basın
4.
Private Sub Command0_Click() '

End Sub
şeklinde kod yazım sayfası açılacaktır.

5.
Private Sub Command0_Click() '
msgbox chrw(65)
End Sub

yazın

6. alt+F11 ile formun bulunduğu ekrana geri dönün
7. F5 e basıp formu çalıştırın
8. oluşturduğunuz butona basın.
 
Katılım
31 Ağustos 2005
Mesajlar
1,534
Excel Vers. ve Dili
Excel 2003 - Türkçe
Sayın yeni54;

Bir kez daha teşekkürlerimi sunuyorum.
 
Üst