| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1108 人关注过本帖
标题:mid函数一些问题 很重要
只看楼主 加入收藏
天才小明
Rank: 1
等 级:新手上路
帖 子:16
专家分:0
注 册:2008-4-14
收藏
 问题点数:0 回复次数:1 
mid函数一些问题 很重要
If Mid(RichTextBox1.Text, 1, 4) <> syuju(0) Then
比如这段是从文本第一行第一个位置开始到第一行第四个位子  
问题是我要改写成从文本第二行第一个位子怎么写?我刚学- -
我在网上找过mid函数用法 没找到
搜索更多相关主题的帖子: 函数 mid 
2009-10-08 19:17
lisida888
Rank: 4
来 自:湖北武汉
等 级:业余侠客
威 望:1
帖 子:176
专家分:267
注 册:2008-9-19
收藏
得分:0 
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的示例代码,请参阅示例主题中的第二个示例。
 
 
--------------------------------------------------------------------------------
 
 
 
VB:
 
 
 
Private Sub Command1_Click()  
A = "ABCDEFGHIJKLMN"
B = 5
C = 6
D = Mid(A, B, C)   'D="EFGHIJ"(如A或B或C换成立即数,汇编相同)
MsgBox (D)
End Sub
 
 
 
 
ASM:
 
 
 
00401B07 . push eax                ;Integer(eax)=C  
00401B08 . |push ecx                ;Integer(eax)=B  
00401B09 . |call dword ptr ds:[<&MSVBVM60.__vbaI4Var>]  
00401B0F . push eax                ;eax=B
00401B10 . lea edx,dword ptr ss:[ebp-24]
00401B13 . lea eax,dword ptr ss:[ebp-64]
00401B16 . push edx                ;String(edx)->A
00401B17 . push eax                ;Empty(eax)=>D
00401B18 . call dword ptr ds:[<&MSVBVM60.rtcMidCharVar>]  
 
                                                          ;String(eax)->D
 
 
--------------------------------------------------------------------------------
 
 
VB:
 
Private Sub Command1_Click()
A = "ABCDEFGHIJKLMN"
B = 5
D = Mid(A, B) 'D="EFGHIJKLMN"(如A或B换成立即数,汇编相同)
MsgBox (D)
End Sub
 
 

   全世界都颓废了,我拿什么对它说“不”!
2009-10-13 20:00
快速回复:mid函数一些问题 很重要
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.014324 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved