Select Case 語句
創(chuàng)新互聯服務項目包括雙流網站建設、雙流網站制作、雙流網頁制作以及雙流網絡營銷策劃等。多年來,我們專注于互聯網行業(yè),利用自身積累的技術優(yōu)勢、行業(yè)經驗、深度合作伙伴關系等,向廣大中小型企業(yè)、政府機構等提供互聯網行業(yè)的解決方案,雙流網站推廣取得了明顯的社會效益與經濟效益。目前,我們服務的客戶以成都為中心已經輻射到雙流省份的部分城市,未來相信會繼續(xù)擴大服務區(qū)域并繼續(xù)獲得客戶的支持與信任!
根據表達式的值,來決定執(zhí)行幾組語句中的其中之一。
Select Case 語句示例
本示例使用 Select Case 語句來判斷變量的值。示例中第二個 Case
子句包含了變量值,故只有此區(qū)塊內的語句會被完成到。
Dim?Number
Number?=?8???'?設置變量初值。
Select?Case?Number???'?判斷?Number?的值。
Case?1?To?5???'?Number?的值在?1?到?5?之間,包含1?和?5?。
Debug.Print?"Between?1?and?5"
'?下一個?Case?子句是本示例中唯一判斷值為?True?的子句。
Case?6,?7,?8???'?Number?的值在?6?到?8?之間。
Debug.Print?"Between?6?and?8"
Case?9?To?10???'?Number?的值為?9?或?10。
Debug.Print?"Greater?than?8"
Case?Else???'?其他數值。
Debug.Print?"Not?between?1?and?10"
End?Select
VB.net 的寫法:
Me.DataGridView1.Rows(i).Select=true
i 是Integer 在這里可以用 DataGridView1.CurrentCell.RowIndex 來替代也就是:
Me.DataGridView1.Rows(DataGridView1.CurrentCell.RowIndex).Select=true
選單元格:
DataGridView1(i,j).Selected=True
Try??
'你想要寫的程序??
catch??
'捕獲你想寫的程序里面所有發(fā)生的異常??
finally??
'無論發(fā)生還是不發(fā)生異常,你都想執(zhí)行的代碼?
End?Try????
'例如:
Try??
A語句??
Catch?ex?As?Exception?
debug.print?ex.Message???
End?Try