关于VB的循环及函数(与mid函数有关)

题目是这样的:
VB设计:输入任意长字符串,将其顺序倒置输出,例如将输入的“qwert”变换成“trewq”
答案如下
Dim s As String
Private Sub Command1_Click()
s = InputBox("输入字符串")
Label3.Caption = s
End Sub

Private Sub Command2_Click()
l = Len(s)
For i = 1 To l
t = t & Mid(s, l - i + 1, 1)
Next i
Text1 = t
End Sub
请帮忙介绍一下mid 函数,还有它的用法
还请解释一下每个步骤的意思及功能
例如t = t & Mid(s, l - i + 1, 1)中,我不懂这个&放在这里是什么意思,还有mid括号里的每个式子是什么意思..
急求答案~谢谢!!!!!!!!!!

Dim s As String '定义一个s变量
Private Sub Command1_Click()
s = InputBox("输入字符串") '为s赋值(输入要颠倒的字母)
Label3.Caption = s '将标签显示你的要颠倒的
End Sub

Private Sub Command2_Click()
l = Len(s) '取字母的总个数
For i = 1 To l '从1 循环到 字母的总个数
t = t & Mid(s, l - i + 1, 1) '取值
Next i '返回i继续循环
Text1 = t '将结果显示在text
End Sub

t = t & Mid(s, l - i + 1, 1)
t 是一变量 "& "是连接符 如 "1" & "1" 后 结果是"11"
mid是返回指定位置和个数的字符串 如 mid("12345",3,2)
返回结果是"34" 表示从第3个字符串开始取取两个字符
实例中的l - i + 1 是从字符串的末尾开始取 然后用 & 连接新的字符串

希望你看懂了
温馨提示:内容为网友见解,仅供参考
第1个回答  2009-04-29
mid (字符串,起始位置,长度)
& 是两字符串连接。
第2个回答  2009-04-29
返回 Variant (String),其中包含字符串中指定数量的字符。

语法

Mid(string, start[, length])

Mid 函数的语法具有下面的命名参数:

部分 说明
string 必要参数。字符串表达式,从中返回字符。如果 string 包含 Null,将返回 Null。
start 必要参数。为 Long。string 中被取出部分的字符位置。如果 start 超过 string 的字符数,Mid 返回零长度字符串 ("")。
length 可选参数;为 Variant (Long)。要返回的字符数。如果省略或 length 超过文本的字符数(包括 start 处的字符),将返回字符串中从 start 到尾端的所有字符。

说明

欲知 string 的字符数,可用 Len 函数。

注意 MidB 函数作用于字符串中包含的字节数据,如同在双字节字符集(DBCS)语言中一样。因此其参数指定的是字节数,而不是字符数。对于使用 MidB的示例代码,请参阅示例主题中的第二个示例。

Mid 函数示例
本示例使用 Mid 语句来得到某个字符串中的几个字符。

Dim MyString, FirstWord, LastWord, MidWords
MyString = "Mid Function Demo" 建立一个字符串。
FirstWord = Mid(MyString, 1, 3) ' 返回 "Mid"。
LastWord = Mid(MyString, 14, 4) ' 返回 "Demo"。
MidWords = Mid(MyString, 5) ' 返回 "Funcion Demo"。

去下载一个MSDN 6.0就行了
第3个回答  2009-04-29
mid是字符串截取函数,用法mid(字符串,起始字符,截取个数)
例如: 串s=“abcdefg”
mid(s,2,3)="bcd"
源程序中 Mid(s, l - i + 1, 1) 含义是倒着截取字符串中的字符,每次截取一个,例如:s="abcde"
循环过程中t分别等于 e、de、cde、bcde、abcde
第4个回答  2009-04-29
DIM函数是返回一个字符串值,其中包含指定数量的字符串。
其语法是:Dim(String,Start[,Length])
其中String必须参数,字符串,需要检测的字符串;Start必须参数,为Long。指定String中的位置,LengthL可选参数,要返回的字符串数。
Mid(s, l - i + 1, 1)中,s是String,l - i + 1是Start,最后的1是Length
t = t & Mid(s, l - i + 1, 1)中的&是连接符,在你的程序中的循环中依次成为一个新字符串。
第5个回答  2009-04-29
mid(原始字符串,起始搜索位置,长度)
mid从“原始字符串”的“起始搜索位置”开始,返回长度为“长度”的“原始字符串”的子串;
t是目标串
s:原始输入的字符串
l:字符串的长度
i:循环变量:
l-i+1:根据i的计数方式(从1到l),则l-i+1的值就是从l到1
1,提出1个字符

关于VB的循环及函数(与mid函数有关)
Private Sub Command1_Click()s = InputBox("输入字符串") '为s赋值(输入要颠倒的字母)Label3.Caption = s '将标签显示你的要颠倒的 End Sub Private Sub Command2_Click()l = Len(s) '取字母的总个数 For i = 1 To l '从1 循环到 字母的总个数 t = t & Mid(s, l - i ...

VB有for循环有mid还有
mid(x,i,1)是从x的第i个开始取一个字符,i=1 to 4分别取的是a b c d left(y,1)是取y左侧的一个字符,始终是1 组合起来就是a1b1c1d1 如果右边不用z,z=mid(x,i,1)+left(y,1)i=1时z=a1 i=2时z=b1 i=3时z=c1 i=4时z=d1 最后z的值是d1 ...

VB 中MID函数的问题
问题就在q = Mid(Text1, o, o + 5)这句上,string要取值MID函数首先不能从0号位取值,至少都为1。应该为q = Mid(Text1, 1, o + 5)另外 for next循环next后面要跟参数o,next o都才对了。

VB编程,请用循环语句,mid等演示给我看
Private Sub Command1_Click()Dim t1 As String, t2 As String, c As String Dim i As Integer, k As Integer, n As Integer t1 = Text1.Text k = Text2.Text For i = 1 To Len(t1)c = Mid(t1, i, 1)n = Asc(c) + k If (n > 90 And n < 97) Or n > 122 Then ...

在VB中,怎么用MID函数,抓取文本框中的数据
For i = 1 To Len(Text1) Step 2 '循环取出字符 If i <= 100 Then a((i - 1) \/ 2) = Mid(Text1, i, 2) 'Mid(原字符,从什么位置开始读取,读取字符的个数)Next For j = 0 To (i - 1) \/ 2 - 1 '显示到窗口 Print a(j)Next Print i Print Len(Text1)'结果为a(...

vb中的Mid函数问题
mid 是取中间字符串的函数,格式是:mid$(a$,m,n),意思是从a$的第m位起,取n个字符的字符串。你这个题里,从第0个开始取值,初始值应该是1,循环体应该从1开始。

vb中的mid函数
mid是截取子字符串函数。用法:dim a$,b$,n1%,n2 a=mid(b,n1,n2)从b字符串左边的第n1个字符开始,从左到右连续截取n2个字符,形成一个新的字符串,并赋值给a。举例:a=mid(“abcdefg”,3,4)结果a=“cdef”b=mid(a,2,2)结果b=“de”

VB里关于mid函数的使用
dimtest test=mid("无人区45大街",4,2) 你可以循环语句,读表的字段,而且这个函数是在你知道你要取的字符的位置才可以用,如里有一连串,那就不要用这个函数呀。 你这里的A2应该是时单元格的内容吧 FIND("-",A2,15) 1“-”表示你要找的文本为“-”,查找的对象A2,15表示从第15个开找...

用vb.net 随意输入一个数字或一个字符串,用mid(,,)及循环,返回倒叙,请教...
直接用StrReverse函数即可返回倒叙,比如:StrReverse("1abc23")="32cba1"如果一定要用循环的话,就用以下方法 Dim Str1 As String, Str2 As String, I As Long 'Str1为待转换字符串 For I = Len(Str1) To 1 Step -1 Str2 = Str2 + Mid(Str1, I, 1)Next '把Str1倒叙排列并保存在...

vb程序题
1、由于s先被赋值16个的字符串,那么ten(s)=16,所以for循环16次。但是题目只问第一行和第三行,那么只要分析第一次和第三次就可以了。2、mid函数是截取函数,例如:mid(”1234“,1,2)就是从第1个字符开始,共截取2个字符,得到的结果是:“12”。注意n()是一个数组,程序定义n(9)...

相似回答
大家正在搜