(12/01/2020, 21:00)berduş yazdı:

x = Screen.ActiveControl.selstart

Screen.ActiveControl.value=Screen.ActiveControl.text 

Screen.ActiveControl.SelStart = x

oluyor mu?

Evet şimdi tam oldu ayrıyeten koda screen yazmaya gerek kalmadanda kod çalışıyor.

Bağlantılı comboboxlara geçtim yapamazsam yeni konu açacağım ordanda yardımınızı beklerim

Iyi calismalar)

(12/01/2020, 21:12)berduş yazdı: Iyi calismalar)

Dosyanın son halinide ekleyecektim ekleyemedim.

Sağolunuz.

Sorulara tekrar taşıdım
Artık dosyanızı ekleyebilirsiniz.

(12/01/2020, 21:19)berduş yazdı: Sorulara tekrar taşıdım
Artık dosyanızı ekleyebilirsiniz.

Dosyanın son hali.

Combobox1.Colum = cn.Execute("select distinct Ad from Tablo1").GetRows

Tekrar merhaba.

Yeni konu açmadan acaba yukarıdaki kodun Access karşılığı nedir yani getrows kullanımı nasıl.