24 Kasım 2011 Perşembe

Kes, Kopyala, Yapıştır (Cut, Copy, Paste Application)



          Bu programdaki amacımız veri kısmına yazdığımız bilgiyi kes ya da kopyala komutlarını kullanarak formun hemen altında yer alan radiobuttonlardan hangisi seçilirse onun altında yer alan TextBox'lara yapıştırmak. 
          

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        TextBox1.Focus()
        TextBox1.SelectAll()
        TextBox1.Cut()
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        If RadioButton1.Checked = True Then
            TextBox2.Text = ""
            TextBox2.Paste()
        End If
        If RadioButton2.Checked = True Then
            TextBox3.Text = ""
            TextBox3.Paste()
        End If
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        TextBox1.Focus()
        TextBox1.SelectAll()
        TextBox1.Copy()
    End Sub
End Class



Hiç yorum yok:

Yorum Gönder

Hürriyet