在RichTextBox1貼檔(貼上圖形)

 Private Sub RadioButton3_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton3.CheckedChanged
        'ISO 3511-1977(國際標準化)
        Dim ffilee As String = Application.StartupPath & "\images\ISO3511A.jpg"
        RichTextBox1.Text = ""
        img = Image.FromFile(ffilee)
        Clipboard.SetImage(img)
        RichTextBox1.Paste()
    End Sub