vb.net积分函数 c#积分函数( 二 )


在vb.net中,做一个系统答题的设计,怎么给每道题的答案积分 , 最后得到总分?最简单的是定义个单精度变量 , 比如n
然后用到If...Then... 判断语句 。
举例说明:1+1=2判断这个语句
if text1.text="2" thenn+=20'这个数值是可以随便设置的 , 就是这道题目的分值 。
如果有什么不明白可以QQ联系我 。
vb.net中的mid()用法VB.NET编程Mid函数一般用于返回原字符串中子串,比如说:
Dim MyString, FirstWord, LastWord, MidWords
MyString = "Mid Function Demo" 建立一个字符串 。
FirstWord = Mid(MyString, 1, 3) ' 返回 "Mid" 。
LastWord = Mid(MyString, 14, 4) ' 返回 "Demo" 。
MidMidWords = Mid(MyString, 5) ' 返回 "Funcion
具体函数说明如下:返回 Variant (String),其中包含字符串中指定数量的字符 。
mid函数的语法:
Mid(string, start[, length])
mid函数的参数:
string 必要参数 。字符串表达式,从中返回字符 。如果 string 包含 Null,将返回 Null;
start 必要参数 。为 Long 。string 中被取出部分的字符位置 。如果 start 超过 string 的字符数,VB.NET Mid函数返回零长度字符串 ("");
length 可选参数;为 Variant (Long) 。要返回的字符数 。如果省略或 length 超过文本的字符数(包括 start 处的字符) , 将返回字符串中从 start 到尾端的所有字符 。
VB.NET自定义函数很简单,在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
关于vb.net积分函数和c#积分函数的介绍到此就结束了,不知道你从中找到你需要的信息了吗 ?如果你还想了解更多这方面的信息,记得收藏关注本站 。

推荐阅读