易截截图软件、单文件、免安装、纯绿色、仅160KB

vb读取文本框字符 - VB / 基础类

我只知道字符串长度(英文为1,中文为2)和位置(在另一个字符串左边)。怎样取它们准确取出来?
mid(text1,位置,长度)

如果是字符串的最左边,可以用 left(字符串,长度),否则用1楼的

这两个长度是不相等的

mid(字符串,位置,长度)

引用
这两个长度是不相等的


怎么还俩个?没有明白

比如字符是abcd1234我们你们
我知道长度是10,对应abcd1234我,而不是abcd1234我们。

VB code:
if 英文 then
mid(text1, 位置, 长度)
elseif 中文 then
mid(text1, 位置, 长度 * 2)
end if


引用
比如字符是abcd1234我们你们
我知道长度是10,对应abcd1234我,而不是abcd1234我们。


vb 和你的规则一样,你可以测试

Instr
Mid

引用
引用 6 楼 hyjavahy 的回复:
比如字符是abcd1234我们你们
我知道长度是10,对应abcd1234我,而不是abcd1234我们。


vb 和你的规则一样,你可以测试


错了

这样做
VB code:
Private Sub Command1_Click()
Text1.Text = "abcd1234我们你们"
MsgBox StrConv(MidB(StrConv(Text1.Text, vbfromUnicode), 1, 10), vbUnicode)

End Sub


引用


相关问答:

vb超简单form.show的问题 - VB / 非技术类

为什么我用form.show和form.hide多次连接了两个窗口只能互换链接两次啊?
代码看看
照道理form.show 没次数限定的吧

我也快疯了。
楼主知道怎么发贴么?

引用
我也快疯了。
楼主知道怎么发贴么?
楼主也 ......

vb读取xml - VB / 基础类

现在有个xml文件是<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
 xm ......

vb操作excel - VB / 基础类

问题:
现在Access数据库中有两张表TableA和TableB
TableA中有记录如下:
字段1(Name) 字段2(Num)
  A 3
  A 4
  B 6
  ... ......

vb生成EXE - VB / 基础类

form1中有text1-8, 和command1 
text8中为程序代码(生成窗体为form2(已做好))
单击command1后将text2中的代码生成EXE到d:\ 并且text1-7分别对应
产品名 公司名 合法版权 合法商标 文件描述 注释 标题 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号