简单VB问题

Private Sub Command1_click()

show

text1.text=" "

text2.text=" "

text1.setfocus

end sub

Private Sub Text1_change()

text2.text=mid(text1.text,8)

end sub

在Text1中输入beijingchina，则Text2中显示什么？其中text2.text=mid(text1.text,8)是什么意思？

显示：

hina
即从第八个字符开始，一下到最后

MID函数：

Mid 函数 返回 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的示例代码，请参阅示例主题中的第二个示例。
2.举例
string类型变量str="123456"
mid(str,2,1)的意思是在str字符串中从第2个字符开始取得一个字符，值为2
注意：与java语法不同是从1开始，而不是从0开始。

显示的结果是hina

MID方法有三个参数，其中前两个是必须输入的参数，而最后一个是隐含参数（可选）。

一般的用法

dim a as string

a="China"

Msgbox Mid(a,1,1)

则消息框提示的是"C"

MId(字符串,起始位置,长度)

MID将从字符串中截取起始位置开始的长度为第三个长度参数的子字符串，并返回。

假如忽略第三个参数，则mid("China",3)则返回"na"，也就是说如果忽略第三个参数则返回从起始位置开始之后的所有字符

Text2文本应该没有变化的吧！ 下面程序是取Text1文本的第八个字

在binstr第x+1的位置取1个字符 比如 binstr = "a1b2c3d4" x = 3 Mid$(binstr,x+1,1) 就等于 "2" Mid$(binstr,x+1,1)="1" 输出的布尔值 Mid$(binstr,x+1,1) 输出的是"1" 那它的值就是True

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息