database bir alana baska alandan sayı ve combobox listesinden karakter getirmek

[enrique24]

merhabalar arkadaşlar sorum su sekilde

sıra no- otomatik numara
modul -combobox listeden

cagri no ise hem sıra nodan no gelicek hemde modulun ilk 3 harfi nasil yapabiliriz acillll:::::


1 - bilisim - 1bil
2 - yayın - 2yay
seklinde

 

[enrique24]

dosyayi ekledim

yardımcı olursanız cok sevinirim

 

[omerceri]

combobox2'ye tıklayınca combobox2'deki bilginin ilk üç karekteri Metin Kutusu Metin0'a geliyor. Kod aşağıda

Private Sub Combobox2_Click()
Metin0.ControlSource = "=" & """" & Left(combobox2 , 3) & """"
End Sub

 

[enrique24]

cok sagoll

teşekkurler birşey daha sorabilirmiyim peki cagri noya hem otomatik sayı ,hemde bu modulun 3 harfini nasil yanyana yazdirabilirim.ilgin icin cok tesekkurler

 

[modalı]

Sayın enrique24,

Aşağıdaki kod parçasını kullanın:

Private Sub Combo8_AfterUpdate()
Dim strModül As String
strModül = Left(Trim(Me.Combo8), 3)
Me.Cagri_No = strModül & Str(Me.Sira_No)
End Sub

İyi çalışmalar

 

[enrique24]

teşekkürler

cok tesekkur ederim.çok yardımcı oldun.sen 1 numarasın modali:icelim: