A.S.C Filtre, Grafik ve Raporlama Eklentisi

2 Sayı Arasındaki Asal Sayıları Bulma Fonksiyonu
#1
değerli access-sql forum sakinleri ödevimde yardımcı olabilecek varmıdır acaba ? 


AralarindaAsal fonksiyonu adında iki parametre alan bir fonksiyon yazınız. Bu fonksiyonda, dışarıdan aldığı iki sayı arasındaki asal sayıları bularak ekrana yazdırsın



  Alıntı
Bu mesajı beğenenler:
#2
Sn cılgınsnman; Yârdim isterken daha fazla açıklama yapılmalı. Internet üzerinden araştırma ile daha fazla yardım bulabilirsiniz.

Access dosyasında form oluşturup, 1 adet liste kutusu, 2 adet metin kutusu, 1 adet etiket, bir adet düğme oluşturun ve aşağıdaki kodu düğme tıklama olay yordamına taşıyın.

Visual Basic
  1. Private Sub Komut0_Click()
  2. List1.RowSource = vbNullString = Me.Etiket7.Caption
  3. k = Val(Text1) - 1
  4. l = Val(Text2) - 1
  5. Oku:
  6. k = k + 1
  7. For a = k To l
  8.    c = a \ 2 + 1
  9.    For i = 2 To c
  10.        b = a Mod (i)
  11.        If b = 0 Then GoTo Oku
  12.    Next i
  13.    List1.AddItem (a)
  14. Next a
  15. Me.Etiket7.Caption = List1.ListCount & " Adet Asal Sayi var."
  16. End Sub





  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [SORGU] Iki Alan Arasındaki Verileri Filtreleme kamil_55 8 218 26-05-2021, 13:43
Son Mesaj: kamil_55
  [RAPOR] Tek Sayı Olan Kayıtlar akinokrizo 5 178 24-04-2021, 19:33
Son Mesaj: akinokrizo
access-sql-2 [FORM] Liste kutusu çift tıklama faklı formda kayıt bulma... rafetgulmez 7 6.978 06-04-2021, 13:42
Son Mesaj: kamil_55
  [VBA] Iki Tarih Arası Büyük Olanını Bulma benuva 12 464 28-02-2021, 22:47
Son Mesaj: userx53
  [FORM] Form üzerinde Dsum Fonksiyonu ctnerdal 3 158 17-02-2021, 13:51
Son Mesaj: ekremer1969
  [FORM] Ondalık Sayı Yazamama sorunu mbturkoglu 3 10.359 06-01-2021, 11:34
Son Mesaj: ramazan4503
  [FORM] Seçilen Haftanın/ayın Ilk Ve Son Günlerini Bulma ates2014 32 924 04-01-2021, 22:41
Son Mesaj: ates2014
  [TABLO] Farklı Verileri Bulma golf2000 9 379 03-01-2021, 12:03
Son Mesaj: golf2000

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi