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