vb.net DataGridView中粘贴的问题解决-还是有问题待解决

最新推荐文章于 2024-08-12 13:53:22 发布

真正的山野村夫

最新推荐文章于 2024-08-12 13:53:22 发布

阅读量1.2k

点赞数

分类专栏： DataGridView 字符串处理

本文链接：https://blog.csdn.net/wiltan/article/details/80543443

版权

本文探讨了在VB.NET中遇到的DataGridView控件粘贴问题，并分享了解决方案的代码片段，但指出仍有未解决的问题待进一步探讨。

摘要由CSDN通过智能技术生成

今天晚上没事就给倒腾一下这个在DGV中的粘贴问题。以下是代码：

Public Class Form1

    Private Sub DataGridView1_CellClick(sender As Object, e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellClick
        TextBox1.Text = "THIS IS " & IsNothing(DataGridView1.CurrentCell.Value)
        If IsNothing(DataGridView1.CurrentCell.Value) = False Then
            Dim L As String = DataGridView1.CurrentCell.Value.ToString
            For I As Int16 = 0 To L.Length - 1
                R.Text = Asc(L(I)) & vbCrLf
            Next
        Else
            R.Text = ""
        End If
    End Sub

    Private Sub DataGridView1_KeyUp(sender As Object, e As System.Windows.Forms.KeyEventArgs) Handles DataGridView1.KeyUp
        If e.Control And e.KeyCode = Keys.V Then
            If Clipboard.GetText <> "" Then
                Dim s() As String
                s = Clipboard.GetText.ToString.Sp