Dim p1 As New Point(0, 0)
專(zhuān)注于為中小企業(yè)提供成都網(wǎng)站建設(shè)、成都網(wǎng)站設(shè)計(jì)服務(wù),電腦端+手機(jī)端+微信端的三站合一,更高效的管理,為中小企業(yè)城關(guān)免費(fèi)做網(wǎng)站提供優(yōu)質(zhì)的服務(wù)。我們立足成都,凝聚了一批互聯(lián)網(wǎng)行業(yè)人才,有力地推動(dòng)了1000+企業(yè)的穩(wěn)健成長(zhǎng),幫助中小企業(yè)通過(guò)網(wǎng)站建設(shè)實(shí)現(xiàn)規(guī)模擴(kuò)充和轉(zhuǎn)變。
Dim p2 As New Point(My.Computer.Screen.WorkingArea.Width, My.Computer.Screen.WorkingArea.Height) '除工具欄全屏
Dim pic As New Bitmap(p2.X, p2.Y)
Using g As Graphics = Graphics.FromImage(pic)
g.CopyFromScreen(p1, p1, p2)
PictureBox1.Image = pic
End Using
Clipboard.SetImage(PictureBox1.Image)
截圖到PictureBox1中顯示,然后在把PictureBox1.image放到剪切板中
先把"Form1.vb 的副本"改成"Form2",然后右擊“Form2”---查看代碼---把類(lèi)名改成“Form2”就可以了
新建一個(gè)控件測(cè)試窗體工程,添加一個(gè)DataGridView控件,添加前面我們做的擴(kuò)展控件DataGridViewExt的引用,并在Form1.Designer.vb文件中中將
Friend WithEvents DataGridView1 As System.Windows.Forms.DataGridView
Me.DataGridView1 = New System.Windows.Forms.DataGridView
分別改為:
Friend WithEvents DataGridView1 As DataGridViewExt.DataGridViewExt
Me.DataGridView1 = New DataGridViewExt.DataGridViewExt
然后就可以從Excel,記事本等程序往DataGridView粘貼數(shù)據(jù)了.
第一步,點(diǎn)擊VS工具
請(qǐng)點(diǎn)擊輸入圖片描述
第二步,打開(kāi)后,新建一個(gè)Windows窗體應(yīng)用程序
請(qǐng)點(diǎn)擊輸入圖片描述
第三步,新建完畢后,如圖所示
請(qǐng)點(diǎn)擊輸入圖片描述
第四步,拖動(dòng)文本框與按鈕,如圖示
請(qǐng)點(diǎn)擊輸入圖片描述
第五步,將剪貼板復(fù)制與粘貼代碼輸入,如圖示
請(qǐng)點(diǎn)擊輸入圖片描述
第六步,運(yùn)行程序
請(qǐng)點(diǎn)擊輸入圖片描述
7
第七步,點(diǎn)擊按鈕,成功從剪貼板中復(fù)制與粘貼操作
請(qǐng)點(diǎn)擊輸入圖片描述
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Clipboard.SetDataObject(TextBox1.Text)
End Sub
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
TextBox1.Text = Clipboard.GetDataObject().GetData(DataFormats.Text, False)
End Sub
執(zhí)行存儲(chǔ)過(guò)程調(diào)用的是ADO.net
返回的結(jié)果集是一個(gè)DataSet對(duì)象。 如果不是,請(qǐng)檢查下你的數(shù)據(jù)連接庫(kù),改下代碼。
如果存儲(chǔ)過(guò)程返回的是兩個(gè)結(jié)果集,那么返回的DataSet就有兩個(gè)DataTable對(duì)象。
調(diào)用的時(shí)候 只需要
DataSet ds=dbHelper.RunProcedure("Web_pGetDataPager");//假設(shè)的返回dataset對(duì)象的執(zhí)行存儲(chǔ)過(guò)程的方法。
ds.Tables[0] 就是第一個(gè)結(jié)果集
ds.Tables[1] 就是第二個(gè)結(jié)果集
//弱綁定第二個(gè)結(jié)果集 就是下面這樣
Datagridview.DataSource=ds.Table[1];
Datagridview.DataBind();
本文名稱(chēng):VB.net中復(fù)制窗體 vb復(fù)制控件
網(wǎng)站URL:http://www.rwnh.cn/article18/hhgjdp.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供外貿(mào)建站、虛擬主機(jī)、微信公眾號(hào)、標(biāo)簽優(yōu)化、網(wǎng)站制作、網(wǎng)站策劃
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶(hù)投稿、用戶(hù)轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話(huà):028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)
猜你還喜歡下面的內(nèi)容