Listeye alma - Baskı Önizleme +- AccessTr.neT (https://accesstr.net) +-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html) +--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html) +--- Konu Başlığı: Listeye alma (/konu-listeye-alma.html) |
Cvp: Listeye alma - akd - 20/02/2010 Merhaba arkadaşlar, listeden listeye almada yeni bir sorunum çıktı, liste2 deki 2.sutunu liste4 deki 1.sutununa liste2 deki 3-4-5.sutunu liste4 deki 2.sutununa alamak istedim Column la yapmak istedim olmadı bir türlü, örnegi ekledim. İlgilenecek arkadaşlara şimdiden teşekkürlerimi sunarım... Cvp: Listeye alma - Hayri16 - 20/02/2010 Sayın akd; Yukarıdan aşağı liste2 deki bütün kayıtlar mı Liste 4 e aktarılacak. Yoksa üzerine tıklanıp seçilen mi? Cvp: Listeye alma - Hayri16 - 20/02/2010 Hepsini aktarmayı düşünseydin zaten listeyi oluştururken sorguyu o şekilde yapardın "mantığını yürüterek" seçme durumunda aktarma yapmak istediğine karar verdim.Şöyle yapabilirsin bence: Kod:
Private Sub Liste2_Click() Cvp: Listeye alma - Seruz - 20/02/2010 Kod:
Dim i, a, b, c As String Sn. Hayri16, neredeyse tamamen aynı şekilde yazmışız İyi Geceler. Cvp: Listeye alma - akd - 20/02/2010 Çok çok teşekkür ederim sayın hayri16 ve seruz hocalarım, 1 sorum daha olacak, Dim p As Integer, t As Integer p = Me.M5.Column(11) t = Me.M5.Column(12) Me.FYY.AddItem "ACIKLAMA" & ";" & "FİYAT" Me.FYY.AddItem "Toptan Fiyat" & ";" & Format(p, "##,0") Me.FYY.AddItem "Perakende Fiyat" & ";" & Format(t, "##,0") bu kodda p ve t sutunundakiler sayısal deger bunlara kuruş formatı vermek istedim bir türlü olmadı, neden acaba? Aynı kodlar çalıştı, anlamadım bende Cvp: Listeye alma - Hayri16 - 20/02/2010 Sayın akd; p ve t değerlerinin format yapısını bilemediğim için sağlıklı bir şey diyemiyorum ama CCur fonksiyonu sayısal değeri parasal değere çevirir. ..format(p,"##,0") yerine CCur(p) diyerek bir dene istersen. Sayın Seruz sizi bekliyorum |