vb.net文本函数 vb·net

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 string$函数

VB6的String()函数，在VB.NET中，改用 StrDup()函数，使用格式与VB6的String()函数类似：

例如：

VB6中，String(5,"*") ，是产生5个星号字符，"*****"

VB.Net中，改用 StrDup(5,"*") ，也是产生5个星号字符，"*****"

vb.net 编写一个函数

注意：参数为动态数组；

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如何利用“文本中是否包含某字符串”作为判断条件应该用什么函数？

有一个字符串函数：Instr(n,S1,S2)

该函数的功能：从字符串S1的左起第N位开始，向右逐位进行搜索匹配字符串S2，如果找到匹配，就返回一个整数指明匹配的位置，否则就返回0。如果缺省n，就是默认从字符串S1的左起第1位开始，进行搜索匹配字符串S2。

例如1：Instr(1,"abcde","a")，返回1

例如2：Instr(3,"abcde","a")，返回0

例如3：Instr(1,"abcde","c")，返回3

例如4：Instr(1,"abcde","cde")，返回3

例如5：Instr(4,"ab12cd12e12","12")，返回7，这里从字符串"ab12cd12e12"左起第4位开始向右搜索匹配字符串"12"，找到的是中间一个“12”，这个“12”是位于字符串"ab12cd12e12"左起的第7个字符。

而：Instr(1,"ab12cd12e12","12")，返回3

Instr("ab12cd12e12","12")，返回3

VB.net如何识别输入的函数表达式?

后缀表达式要求输入的也是后缀形式的，这里肯定不符合习惯。比如要输入表达式a+b常规的，也就是中缀表达式为:3+2。后缀表达式为32+。唉，扯远了，你学数据结构没，表达式求值需要的是栈的知识。去看看吧。

总之你这里需要的是进行表达式求值的算法。给你提一下需要研究需要注意的问题，注意表达式里的符号的优先级。

表达式里的未知数都是小问题啦，等你把表达式都转成栈的形式，把数据栈里的未知数换成你定义好的变量，再把栈里的表达式求出来