Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
05/01/2012 22:22
Konu Sahibi
Technoman
Yorumlar
13
Okunma
3087
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
Konu Kapalı

Technoman

Novice Coder
Kullanici Avatari
Üye
M.... O....
30
9
09/11/2011
0
İstanbul
Ofis 2007
11/01/2012,22:36
Çözüldü 
Henüz acemiyim ve gelişmeye çalışıyorum. Ben bir yarışma projesi yapıyorum kendimce. Biraz ilerledim. Neler yapılacağını çıkardım ama istediklerimi nasıl yapacağımı bulamadım. Sizlerden yarım almayı düşündüm. Yapmak istediklerimin hepsini not belgesine yazdım. Ana formdaki her şeyin işlevini ayrıntılı bir şekilde yazdım.

Adım adım da olsa yavaş yavaş da olsa çok hızlı da olsa yardım eder misiniz? Projem aşağıdaki ekte. Rar.da Access belgesi ve not belgesi var. Yapmaya çalıştıklarım not belgesinde yazıyor. Yardımınız olmadan yapamam. En azından bir bakın



ozanakkaya

sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.797
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Bugün,00:06
Çözüldü 
Site Kuralları:
6/d-) Birden fazla soruyu aynı konuda sormak yasaktır. Her soru için farklı başlıklı yeni konu açınız.
[Sürekli ihlal halinde Uyarı Puanı: +2]
10-) Konu açarken sorununuzu açık bir şekilde ifade etmelisiniz. Sorunuz ile ilgili form, rapor, sorgu vs. nesne isimlerini mutlaka belirtiniz. Sorunuzu mutlaka konuya yazınız, sorunuzu Access form üzerine yazmayınız, konuya soru veya resim içeren slayt veya döküman eklemeyiniz.
[Uyarı Puanı: +2]

Her soru için yeni konu açmanız gerekiyor. Bu şekilde sorunuz ile kimse ilgilenmez.



iscinar

İsmail ÇINAR
Kullanici Avatari
Uzman
İ.... Ç....
860
30/05/2011
275
İstanbul
Ofis 2013 64 Bit
06/08/2017,13:05
Çözüldü 
Site Kuralları
Madde 10-) Konu açarken sorununuzu açık bir şekilde ifade etmelisiniz. Sorunuz ile ilgili form, rapor, sorgu vs. nesne isimlerini mutlaka belirtiniz. Sorunuzu mutlaka konuya yazınız, sorunuzu Access form üzerine yazmayınız, konuya soru veya resim içeren slayt veya döküman eklemeyiniz.
[Uyarı Puanı: +2]

Sn.sledgeab
Kusura bakmayın ben yazana kadar siz yazmışsınız bile


Toprağa her türlü kötü şey atılmasına rağmen
Topraktan hep güzel şeyler biter . (Akşemseddin)

ozanakkaya

sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.797
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Bugün,00:06
Çözüldü 
Bıkıncaya kadar birşeyler yapmaya çalıştım, ekleme yapılabilir.

Ek Dosyalar
Bilgi Yarışması_sled1.rar



Technoman

Novice Coder
Kullanici Avatari
Üye
M.... O....
30
9
09/11/2011
0
İstanbul
Ofis 2007
11/01/2012,22:36
Çözüldü 
Kuralları ihlal ettiğim için özür dilerim. Bir daha yapmam. Çok güzel olmuş bu hali ile bile kullanılır. Ben o kadar kodu yazamazdım kesinlikle. Sağolasın admin.
Yarışmacı yanlış yaptığında yeniden başlaması için bir tuş yapmayı düşünüyorum. İlk kayda git deyince toplam kazanç v.s değişmiyor. Bunu nasıl yapabilirim. Yani bütün bilgileri nasıl sıfırlayabilirim bu buton ile.



ozanakkaya

sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.797
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Bugün,00:06
Çözüldü 
ilk kayda git şeklinde buton kullanacaksanız butonun tıklandığında olayına

Visual Basic Code
DoCmd.GoToRecord , , acFirst
TOPLAMKAZANÇ = "0 TL."

yazmanız yeterli, ayrıca bu butona, önceki yarışmacının verdiği cevapları silmek için

Visual Basic Code
DoCmd.SetWarnings False
DoCmd.RunSQL ("UPDATE Sorular SET Sorular.CEVAP = Null;")
DoCmd.SetWarnings True

kodu da eklemelisiniz

Doğru cevap- kaybettiniz etiketi için kodu aşağıdaki ile değiştir.

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
Sub yansondogru()
On Error Resume Next
Me.Kutu63.Visible = True
Dim i As Integer
Dim PauseTime, Start
PauseTime = 1.6
Start = Timer
Do While Timer < Start + PauseTime
DoEvents
Loop
For i = 1 To 16
PauseTime = 0.2
Start = Timer
Do While Timer < Start + PauseTime
DoEvents
Loop
If i \ 2 = i / 2 Then
Kutu63.Visible = False
Else
Kutu63.Visible = True
Kutu63.BorderColor = vbGreen
Me.Etiket64.Visible = True
Me.Etiket64.Caption = "DOĞRU CEVAP"
Me.Etiket64.ForeColor = vbGreen
End If
If i = 6 Then
Kutu63.BorderColor = vbBlack
Me.TimerInterval = 400
End If
Next

Me.Kutu63.Visible = False
End Sub



Konu Kapalı
Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü Yardım : Tablodaki Bir Verinin Combobox İle Secilerek Tutarının Gösterilmesi orba 2 89 18/09/2017, 04:55 orba
Çözüldü Sürekli Formda Kayıt Girdisi Üstte Olması Yardım... bilservisci 13 365 28/08/2017, 01:42 bilservisci
Çözüldü Formdan Çıkıldığında Metin Kutularını Temizlenmesi Hk. Yardım sadooo 20 1.089 11/05/2017, 22:59 sadooo
Çözüldü Arama Kutusu Hakkında Yardım AloneX 6 442 05/05/2017, 13:52 AloneX
Çözüldü Kasa Hareketleri İçin Yardım Tablodan Tabloya Otomatik Ekleme uMits 35 1.592 12/04/2017, 19:21 uMits

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
Forum use Krzysztof "Supryk" Supryczynski addons.