在vb.net中定义staticextern函数：用static声明的局部变量。static是C++中常用的修饰符，它被用来控制变量的存贮方式和可见性。extern，C是使C++能够调用C写作的库文件的一个手段。
成都创新互联公司是网站建设专家,致力于互联网品牌建设与网络营销，专业领域包括网站制作、成都做网站、电商网站制作开发、小程序开发、微信营销、系统平台开发，与其他网站设计及系统开发公司不同，我们的整合解决方案结合了恒基网络品牌建设经验和互联网整合营销的理念，并将策略和执行紧密结合，且不断评估并优化我们的方案，为客户提供全方位的互联网品牌整合方案！
【转】VB.net是怎样做到的——Handles和WithEvents - ==Sdhjt的窝== - 博客频道 - CSDN.NET
看看这个博客应该可以帮到你。一般定义方法，函数，不需要“Handles abc”这一截
很简单，在end select前再多加一种情况case else return "XXXx",因为你只提供了0-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