易截截图软件、单文件、免安装、纯绿色、仅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读取用word转换成的xml里的数据 - VB / 基础类

Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' 打开刚创建的文件。
ReDim MyString(LOF(1) - 1)
  Put #1, , MyRecord ' 读入所有字符到变量中 ......

vb - VB / 基础类

数据库里有一个字段的内容是二进制,怎么才能把这个二进制读出来
使用字节流对象可以实现

例如现在数据库里有个字段的内容是0x504B03040A0000000800407F263C3B02465390000000820000000A0000006273CECACCE22E7478 ......

vb操作excel - VB / 基础类

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

VB如何获得别的程序上的表格内容? - VB / API

我的要求是:通过抓取别的程序上的表格的句柄,然后读取这个表格的内容。
表格句柄(类名:MSFlexGridWndClass)我已抓到,接下来如何读取表格的内容就不会了?求助。

能把代码发来学习下不?
244326867@qq.com ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号