Skip to main content

AccessTr.neT


sayılar

sayılar

Çözüldü #1
iyi günler
6 haneli sayılardan oluşan bir metnimiz var
hersayı bir ile dokuz arası sayılardan oluşuyor
yani
632214
923752
888345
gibi
yapmak istediğim bir formul ile aynı rakamlardan aynı sayıda içeren metinleri eşit olduğunu yazan bir formul üretmek
ne gibi
122345 ile 453122 aynı kabul edilmeli
yani şöyle bir örnek vereyim
9 kişilik sınıftan her öğrencinin adı farkklı
altı hediye var
bir öğrenci birden fazla hediye alabilir
çekilişte hediye çıkma sırası önemli değil
122345 te
1. öğrenciye bir
2.öğrenciye iki
......
hediye çıkmış
453122 de de
1. öğrenciye bir
2.öğrenciye iki
......
hediye çıkmış
bu iki metnin birbirine eşit olduğunu nasıl bilgisayar dili ile ifade edebiliriz
teşekkürler
@benbendedeilem
Cevapla
Çözüldü #2
önce ben bir anlasam ne olduğunu sonra bilgisayara anlatıcam... Img-grin
hediyeleri öğrencilere direk versek hocam neden sayılarla uğraşıyorsunuz.
Hayat bu
ölsende yaşamaya mecbursun!
UNUTMA!!!



(hafta sonu mesai olmadığından mesajlardaki çözümleri ancak hafta içi uygulayabiliyorum)
Cevapla
Çözüldü #3
hediye piyangosu diyelim
ama her çekilişten sonra numarayı torbaya atiyoruz
hediye çıkan numaraları bir yere yazıyoruz
her çıkan numaranın kaçıncı çekilişte çıktığı önemli olmayacak sonuçta hangi numaralara kaç kez çıktıysa birbirinin aynı olanlar eşit kabul edilecek
@benbendedeilem
Cevapla
Çözüldü #4
bir bilen
hatta sadece ilgilenen biri bile yokmu
@benbendedeilem
Cevapla
Çözüldü #5
İlgilenmek istiyorum ama elimde işlerim var ayrıca ramazanda daha zor oluyor bu işler. İnanırmısın bu konuyu en az 3 defa okudum ama hala neyi nasıl neden yapmaya çalıştığını algılayamıyorum.
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla
Çözüldü #6
teşekkürler alpeki99
istediğim şu idi
2 3 5 6 7 3
sayıları ile
5 2 3 3 7 6
veya
3 5 7 3 6 2
sayıları aynı sadece sıraları değişik
sıralarının önemli olmadığını
bunların birbirinin aynısı olduğunu bulan bir fonksiyon yazılacak
benim aklıma gelen
bunları büyükten küçüğe sıralayıp bir metin haline getirmek
hepsi ozaman
233567
olacak bizde diyeceğizki bu altı rakam birbirinin aynısıdır
aşağıdaki kod ile sn.horozufuk (yanlış hatırlamıyorsam) çözüm bulmuştu[/code]

Kod:
Dim SONUC As String
Dim rs As DAO.Recordset
    Dim db As Database
    Dim strSQL As String
    Set db = CurrentDb()
    strSQL = "SELECT  * FROM SAYILAR"
    Set rs = db.OpenRecordset(strSQL)
    If rs.EOF = True Then GoTo 150
    rs.MoveFirst
    Do Until rs.EOF
    A(1) = rs!S1
    A(2) = rs!S2
    A(3) = rs!S3
    A(4) = rs!S4
    A(5) = rs!S5
    A(6) = rs!S6
    For L = 1 To 5
    K = Chr(255)
    For I = 1 To 5
    If A(I) <> Chr(0) And A(I) < K Then K = A(I): J = I
    Next I
    B(L) = A(J)
    A(J) = Chr(0)
    Next L
    SONUC = ""
    For I = 1 To 5
    SONUC = SONUC & B(I)
    Next I
    SONUC = SONUC & A(6)
    rs.Edit
    rs!M1 = SONUC
    rs.Update
    rs.MoveNext
    Loop
150
MsgBox ("İŞLEM TAMAM")
End Sub

[code]
@benbendedeilem
Son Düzenleme: 06/09/2010, 17:06, Düzenleyen: accessman.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task