如果是簡單的移動(dòng),先把圖形繪制到大小和PictureBox的Bitmap上,然后再繪制到PictureBox就行。
成都創(chuàng)新互聯(lián)公司專注于陽原網(wǎng)站建設(shè)服務(wù)及定制,我們擁有豐富的企業(yè)做網(wǎng)站經(jīng)驗(yàn)。 熱誠為您提供陽原營銷型網(wǎng)站建設(shè),陽原網(wǎng)站制作、陽原網(wǎng)頁設(shè)計(jì)、陽原網(wǎng)站官網(wǎng)定制、微信小程序定制開發(fā)服務(wù),打造陽原網(wǎng)絡(luò)公司原創(chuàng)品牌,更為您提供陽原網(wǎng)站排名全網(wǎng)營銷落地服務(wù)。
不過在VB.NET中用GDI繪制最好用BufferedGraphics圖形緩沖區(qū),速度馬馬虎虎(VB就這樣了),但是不閃爍,不存在背景擦除的問題。
Dim?newfile?As?New?List(Of?String)
For?Each?line?As?String?In?System.IO.File.ReadAllLines("TextFile1.txt")
If?Not?line.StartsWith("3")?Then?newfile.Add(line)
Next
System.IO.File.WriteAllLines("TextFile1.txt",?newfile)
建個(gè)集合,用System.IO.File的ReadAllLines讀出所有內(nèi)容,逐個(gè)判斷,如果是需要的加入集合,如果是要?jiǎng)h除的什么都不做,最后用WriteAllLines寫入即可。
這里說明一下,上面那個(gè)代碼是用來刪除所有以3開頭的文本行。
先殺進(jìn)程再刪除文件
Visual Basic code
//殺進(jìn)程代碼
Private?Sub?KillProcess(ByVal?processName?As?String)
Dim?myproc?As?System.Diagnostics.Process?=?New?System.Diagnostics.Process
Try
For?Each?thisproc?As?Process?In?Process.GetProcessesByName(processName)
If?(Not?thisproc.CloseMainWindow())?Then
thisproc.Kill()
End?If
Next
Catch
End?Try
End?Sub
方法有很多
1.拖動(dòng)移開一些控件 把下邊的控件顯示出來 選擇 del刪除
2.通過屬性窗口調(diào)出該控件屬性,這時(shí)該控件的邊框會(huì)被標(biāo)記,然后點(diǎn)擊該控件邊緣的控制點(diǎn)(作用是給他控制焦點(diǎn)),然后按del
3.打開代碼窗口, 打開窗口設(shè)計(jì)代碼, 刪除你不需要的控件的定義和初始化語句(一般先刪除定義語句,然后所有有關(guān)的定義語句都會(huì)標(biāo)記語法錯(cuò)誤,然后就可以方便的看出來 ,最后就是把標(biāo)記了錯(cuò)誤的相關(guān)語句刪除就ok了.)
你這要實(shí)現(xiàn)的功能個(gè)步驟是這樣:1.在搜索欄中填入姓名,點(diǎn)擊查詢按鈕后找到該學(xué)生信息,并顯示在下面dataGridView中;2.點(diǎn)擊要?jiǎng)h除數(shù)據(jù)的哪行數(shù)據(jù);3.點(diǎn)擊刪除按鈕后刪除該數(shù)據(jù)并提示成功。
上面的第一個(gè)步驟查找的你應(yīng)該會(huì)做了吧?第三個(gè)步驟在點(diǎn)擊“刪除”按鈕時(shí),也就是在刪除按鈕點(diǎn)擊事件中要做:1.獲取選中行的學(xué)號(hào)
String sno= dataGridView1.SelectedRows[0].Cells["學(xué)號(hào)"].Value.ToString();2.執(zhí)行SQL語句,刪除該數(shù)據(jù)
string sql = string.Format("delete 表 where 學(xué)號(hào)=‘{}’",sno);SqlConnection conn = new SqlConnection("....");SqlCommand cmd = new SqlCommand(sql,conn);cmd.ExecuteNonQuery();3.提示刪除成功,并刷新dataGridView
以上代碼是C#,你VB.NET也差不多的,只是聲明變量時(shí)候順序不一樣,應(yīng)該能看懂吧。上面信息希望對你有幫助^^
Private?Sub?btnRemovePath_Click(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?btnRemovePath.Click
Try
'?先建立目錄以便用于后續(xù)的刪除示范。
If?Not?Directory.Exists("D:\網(wǎng)易")?Then
Directory.CreateDirectory("?D:\網(wǎng)易?\Test1")
Directory.CreateDirectory("?D:\網(wǎng)易?\Test2")
Directory.CreateDirectory("?D:\網(wǎng)易?\Test3")
End?If
'?刪除子目錄?Test1。
Directory.Delete("?D:\網(wǎng)易?\Test1",?True)
'?刪除子目錄?Test2。
Dim?myDirectoryInfo?As?New?DirectoryInfo("?D:\網(wǎng)易?\Test2")
myDirectoryInfo.Delete(True)
'?將目錄?C:\AlexDirDemo?及其以下的文件和子目錄全數(shù)刪除。
Directory.Delete("?D:\網(wǎng)易?",?True)
Catch?ex?As?Exception
MessageBox.Show(ex.Message)
Exit?Sub
End?Try
'?啟動(dòng)?Windows?資源管理器。
Process.Start("explorer.exe",?"D:\")
End?Sub
分享題目:vb.netgdi刪除的簡單介紹
轉(zhuǎn)載源于:http://jinyejixie.com/article26/dsseccg.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站維護(hù)、品牌網(wǎng)站設(shè)計(jì)、服務(wù)器托管、商城網(wǎng)站、建站公司、域名注冊
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來源: 創(chuàng)新互聯(lián)