VB.NET自定義函數(shù)

很簡(jiǎn)單，在end select前再多加一種情況case else return "XXXx",因?yàn)槟阒惶峁┝?-9這10種情況

成都創(chuàng)新互聯(lián)公司成立與2013年，是專業(yè)互聯(lián)網(wǎng)技術(shù)服務(wù)公司，擁有項(xiàng)目成都網(wǎng)站制作、網(wǎng)站建設(shè)、外貿(mào)網(wǎng)站建設(shè)網(wǎng)站策劃，項(xiàng)目實(shí)施與項(xiàng)目整合能力。我們以讓每一個(gè)夢(mèng)想脫穎而出為使命，1280元文山州做網(wǎng)站,已為上家服務(wù),為文山州各地企業(yè)和個(gè)人服務(wù),聯(lián)系電話:18982081108

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

關(guān)于VB.Net 的函數(shù)定義問(wèn)題如下

【轉(zhuǎn)】VB.net是怎樣做到的——Handles和WithEvents - ==Sdhjt的窩== - 博客頻道 - CSDN.NET

看看這個(gè)博客應(yīng)該可以幫到你。一般定義方法，函數(shù)，不需要“Handles abc”這一截

vb.net 編寫一個(gè)函數(shù)

注意：參數(shù)為動(dòng)態(tài)數(shù)組；

Private Function MyF(ByRef d() As Integer)

ReDim d(4, 13) As Integer

Dim i As Integer

Dim j As Integer

Dim n As Integer

Dim MyNum(4) As Integer

For i = 1 To 4

MyNum(i) = 0

Next i

Randomize

For i = 1 To 4

For j = 1 To 13

n = Int(Rnd * 4 + 1)

Do While MyNum(n) = 13

n = Int(Rnd * 4 + 1)

Loop

d(i, j) = n

MyNum(n) = MyNum(n) + 1

Next j

Next i

End Function

VB.net 定義方法的問(wèn)題

sub是可以有參數(shù)的，但是是沒有返回值的。

你可以用function

如

Function?add(ByVal?a?As?Integer,?ByVal?b?As?Integer)

add?=?a?+?b

End?Function

a = add(1,1) ?這樣a = 2

在vb.net中如何定義staticextern函數(shù)

在vb.net中定義staticextern函數(shù)：用static聲明的局部變量。static是C++中常用的修飾符，它被用來(lái)控制變量的存貯方式和可見性。extern，C是使C++能夠調(diào)用C寫作的庫(kù)文件的一個(gè)手段。