vb.net datagridview中選擇范圍，實(shí)現(xiàn)ctrl+c/ctrl+v

DataGridView在vb.net中的應(yīng)用詳細(xì)見附件16. DataGridView選擇的部分拷貝至剪貼板

華鎣網(wǎng)站建設(shè)公司創(chuàng)新互聯(lián)建站,華鎣網(wǎng)站設(shè)計(jì)制作，有大型網(wǎng)站制作公司豐富經(jīng)驗(yàn)。已為華鎣上千多家提供企業(yè)網(wǎng)站建設(shè)服務(wù)。企業(yè)網(wǎng)站搭建\外貿(mào)網(wǎng)站制作要多少錢，請(qǐng)找那個(gè)售后服務(wù)好的華鎣做網(wǎng)站的公司定做！

拷貝模式設(shè)定

DataGridView1.ClipboardCopyMode = DataGridViewClipboardCopyMode.EnableWithoutHeaderText

選中部分拷貝

Clipboard.SetDataObject(DataGridView1.GetClipboardContent())

17.DataGridView粘貼

If DataGridView1.CurrentCell Is Nothing Then

Return

End If

Dim insertRowIndex As Integer = DataGridView1.CurrentCell.RowIndex

Dim pasteText As String = Clipboard.GetText()

If String.IsNullOrEmpty(pasteText) Then

Return

End If

pasteText = pasteText.Replace(vbCrLf, vbLf)

pasteText = pasteText.Replace(vbCr, vbLf)

pasteText.TrimEnd(New Char() {vbLf})

Dim lines As String() = pasteText.Split(vbLf)

Dim isHeader As Boolean = True

For Each line As String In lines

If isHeader Then

isHeader = False

Else

Dim vals As String() = line.Split(ControlChars.Tab)

If vals.Length - 1 DataGridView1.ColumnCount Then

Throw New ApplicationException("列數(shù)が違います。")

End If

Dim row As DataGridViewRow = DataGridView1.Rows(insertRowIndex)

row.HeaderCell.Value = vals(0)

Dim i As Integer

For i = 0 To row.Cells.Count - 1

row.Cells(i).Value = vals((i + 1))

Next i

insertRowIndex += 1

End If

Next line

vb.net 組合鍵Ctrl+Enter怎樣發(fā)送

看了很多這方便的解決方案，很多都是一大段代碼，版本也有差別，既然有可能別人用得起我也用不起。

我用一種最簡單的方法，只要思路對(duì)所有人都能用得起。

其實(shí)非常簡單，就是獲取鍵值，Ctrl+Enter的健值是10，是不是思路一下就通了。以下是源碼：

Private Sub 聊天輸入框_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles 聊天輸入框.KeyPress

If Asc(e.KeyChar) = 發(fā)送快捷鍵值 Then

發(fā)送消息過程()

End If

End Sub

源內(nèi)容出處：

VB.net的快捷鍵

1． F12：轉(zhuǎn)到定義；Shift+F12：轉(zhuǎn)到引用

2． F5：啟動(dòng)；Ctrl+F5：開始執(zhí)行（不調(diào)試）；Shift+F5：停止調(diào)試

3． F7：查看代碼；Shift+F7：查看視圖設(shè)計(jì)器

4． Ctrl+Alt+L：解決方案資源管理器

5． Ctrl+Alt+J：對(duì)象瀏覽器

6． F4：顯示屬性窗口

7． Ctrl+Alt+X：工具箱

8． Ctrl+Alt+C類視圖

9． Alt+Enter：查看屬性

10．F10：逐過程調(diào)試

11．F11：逐語句調(diào)試

12．Ctrl+B：新斷點(diǎn)

13．Ctrl+Shift+F9：清除所有斷點(diǎn)

14．Ctrl+Shift+B生成解決方案

15．Shift+Alt+Enter：全屏

16．大綱顯示：Ctrl+M, Ctrl+M：切換大綱顯示展開；Ctrl+M, Ctrl+L：切換所有大綱顯示；Ctrl+M,Crtl+P停止大綱顯示；Ctrl+M, Ctrl+O：折疊到定義

17．智能感知：Ctrl＋J：列出成員；Ctrl+Shift+空格：參數(shù)信息； Ctrl+K,Ctrl+I：快速信息；Alt+右箭頭鍵：完成單詞