Skip to main content

AccessTr.neT


Drag Drop (sürükle Bırak)

Drag Drop (sürükle Bırak)

#7
(11/11/2020, 14:00)berduş yazdı:

If Len(strControlName) Then       
ThisTextBox.Parent(strControlName) = ThisTextBox.Parent(ThisTextBox.Name).Text
End If
kodunu aşağıdaki gibi değiştirip dener misiniz?
    If Len(strControlName) Then
        If strControlName <> ThisTextBox.Name Then
            ThisTextBox.Parent(strControlName) = ThisTextBox.Parent(ThisTextBox.Name).Text
            ThisTextBox.Parent(ThisTextBox.Name).Text = ""
        End If
    End If
Sayın berduş teşekkür ederim. İstediğim gibi oldu. Değiştirilmiş olarak ekliyorum. Belki başkalarının da işine yarayabilir.
.rar DragDrop_A2003_V1.rar (Dosya Boyutu: 39,41 KB | İndirme Sayısı: 7)
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Drag Drop (sürükle Bırak) - Yazar: macirercan - 10/11/2020, 12:52
RE: Drag Drop (sürükle Bırak) - Yazar: ozanakkaya - 10/11/2020, 18:59
RE: Drag Drop (sürükle Bırak) - Yazar: macirercan - 11/11/2020, 10:05
RE: Drag Drop (sürükle Bırak) - Yazar: ozanakkaya - 11/11/2020, 10:51
RE: Drag Drop (sürükle Bırak) - Yazar: macirercan - 11/11/2020, 11:25
RE: Drag Drop (sürükle Bırak) - Yazar: berduş - 11/11/2020, 14:00
RE: Drag Drop (sürükle Bırak) - Yazar: macirercan - 11/11/2020, 14:28
RE: Drag Drop (sürükle Bırak) - Yazar: berduş - 11/11/2020, 15:07