Kopyala Yapıştır Algoritması

[RooTKhaLeD]

Kopyala Yapıştır Algoritması ;

Dim veri As String
Private Sub Timer1_Timer()
If veri <> Clipboard.GetText Then
Text1 = Text1 & Date & "/" & Time & "=" & Clipboard.GetText & Chr(13)
veri = Clipboard.GetText
End If
End Sub

 

[by-baho]

algoritmamı kodları degilmi bu
sahte kod felan olsa tamam dicegimde bildigin kodlarını vermissin algoritma degil bu

 

[OptiMistics]

teşekkür ederim.