从品牌网站建设到网络营销策划,从策略到执行的一站式服务
VB6的String()函数,在VB.NET中,改用 StrDup()函数,使用格式与VB6的String()函数类似:
成都创新互联专注于汾西企业网站建设,自适应网站建设,成都做商城网站。汾西网站建设公司,为汾西等地区提供建站服务。全流程按需网站开发,专业设计,全程项目跟踪,成都创新互联专业和态度为您提供的服务
例如:
VB6中,String(5,"*") ,是产生5个星号字符,"*****"
VB.Net中,改用 StrDup(5,"*") ,也是产生5个星号字符,"*****"
Function 是函数,不是过程,不论在VB、VB.NET、C等等,均是函数。
很简单,在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
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图