Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
14/01/2010 06:45
Konu Sahibi
accessman
Yorumlar
4
Okunma
1491
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
Kullanici Avatari

accessman

Aktif Üye
Aktif Üye
 Belirtilmemiş
 2.367
 561
 31/10/2008
425
 Denizli
 
 Ofis 2003
 20/09/2016,00:20
Çözüldü 
iyi sabahlar arkadaşlar
form2 deki iki buton ile form1 i açıyorum
problemim şu
sekme1 butonu tıkladığımda form1 açıldığında sekme1 üstte olsun
sekme2 butonu tıkladığımda form1 açıldığında sekme2 üstte olsun
bunu kod ile nasıl belirtebilirim
teşekkürler


Ek Dosyalar
.rar   sekme.rar(Dosya Boyutu: 8,14 KB / İndirme Sayısı: 20)
@benbendedeilem

Kullanici Avatari

ozanakkaya

sledgeab
Kurucu
OZ.... AK....
 41
 11.274
 464
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
 Dün,22:40
Çözüldü 

Kod:
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
34
35
36
Private Sub Komut0_Click()
On Error GoTo Err_Komut0_Click

    Dim stDocName As String
    Dim stLinkCriteria As String

    stDocName = "Form1"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
    Forms!Form1!TabCtl2.Pages(0).SetFocus

Exit_Komut0_Click:
    Exit Sub

Err_Komut0_Click:
    MsgBox Err.Description
    Resume Exit_Komut0_Click
    
End Sub

Private Sub Komut1_Click()
On Error GoTo Err_Komut1_Click

    Dim stDocName As String
    Dim stLinkCriteria As String

    stDocName = "Form1"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
    Forms!Form1!TabCtl2.Pages(1).SetFocus
Exit_Komut1_Click:
    Exit Sub

Err_Komut1_Click:
    MsgBox Err.Description
    Resume Exit_Komut1_Click
    
End Sub


"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 

Kullanici Avatari

accessman

Aktif Üye
Aktif Üye
 Belirtilmemiş
 2.367
 561
 31/10/2008
425
 Denizli
 
 Ofis 2003
 20/09/2016,00:20
Çözüldü 
çok teşekkürler admin
kod şu şekilde yazılırsa hata veriyor
-----------------
DoCmd.OpenForm "rekor", acNormal, "", stLinkCriteria , acReadOnly, acDialog

If sec.Value = 1 Then Forms!rekor!TabCtl2.Pages(0).SetFocus
If sec.Value = 2 Then Forms!rekor!TabCtl2.Pages(1).SetFocus

yani kodda
, acDialog kısmı eklenirse hata veriyor
problem nedir
nasıl yazmamız gerekiyor
teşekkürler


@benbendedeilem

Kullanici Avatari

ozanakkaya

sledgeab
Kurucu
OZ.... AK....
 41
 11.274
 464
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
 Dün,22:40
Çözüldü 

Kod:
DoCmd.OpenForm "Form1", acNormal, "", "", , acNormal

kodunu deneyin.


"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 

Kullanici Avatari

accessman

Aktif Üye
Aktif Üye
 Belirtilmemiş
 2.367
 561
 31/10/2008
425
 Denizli
 
 Ofis 2003
 20/09/2016,00:20
Çözüldü 
teşekkürler


@benbendedeilem


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Sekme Denetimi (enable) Özelliği mustinba 6 187 08/08/2018, 18:21
Son Yorum: mustinba
Çözüldü Sekme İçinde Sekme ve Butonla Alt Sekme Sayfasının Açılması karabattak 3 2.359 09/05/2016, 11:21
Son Yorum: szkr
Çözüldü SEKME SIRASINI BULMA moskovic 4 898 07/12/2015, 02:16
Son Yorum: moskovic
Çözüldü Access Sekme İçerisine Alt Form Ekleme Alper Mete 2 1.364 10/08/2015, 11:01
Son Yorum: Alper Mete
Çözüldü Sekme Sayfaları arasında tek tuşla geçiş Dadadu 5 1.603 18/05/2015, 20:47
Son Yorum: Dadadu

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2018 MyBB Group.