VB6的String()函數(shù),在VB.NET中,改用 StrDup()函數(shù),使用格式與VB6的String()函數(shù)類似:

成都創(chuàng)新互聯(lián)專注于汾西企業(yè)網(wǎng)站建設(shè),自適應(yīng)網(wǎng)站建設(shè),成都做商城網(wǎng)站。汾西網(wǎng)站建設(shè)公司,為汾西等地區(qū)提供建站服務(wù)。全流程按需網(wǎng)站開發(fā),專業(yè)設(shè)計(jì),全程項(xiàng)目跟蹤,成都創(chuàng)新互聯(lián)專業(yè)和態(tài)度為您提供的服務(wù)
例如:
VB6中,String(5,"*") ,是產(chǎn)生5個(gè)星號(hào)字符,"*****"
VB.Net中,改用 StrDup(5,"*") ,也是產(chǎn)生5個(gè)星號(hào)字符,"*****"
Function 是函數(shù),不是過程,不論在VB、VB.NET、C等等,均是函數(shù)。
很簡單,在end select前再多加一種情況case else return "XXXx",因?yàn)槟阒惶峁┝?-9這10種情況
Public Function Zuhe(ByVal qa As String) As String
Select Case qa
Case "0"
Return "1"
Case "1"
Return "3"
Case "2"
Return "4"
Case "3"
Return "6"
Case "4"
Return "2"
Case "5"
Return "8"
Case "6"
Return "9"
Case "7"
Return "7"
Case "8"
Return "5"
Case "9"
Return "0"
Case else
Return "XXXX"
End Select
End Function
本文標(biāo)題:vb.net函數(shù)是什么的簡單介紹
轉(zhuǎn)載來于:http://chinadenli.net/article13/dseccgs.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供商城網(wǎng)站、網(wǎng)站改版、關(guān)鍵詞優(yōu)化、虛擬主機(jī)、網(wǎng)站收錄、電子商務(wù)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場,如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來源: 創(chuàng)新互聯(lián)