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
vb 和你的规则一样,你可以测试
Instr
Mid
错了
这样做
VB code:
Private Sub Command1_Click()
Text1.Text = "abcd1234我们你们"
MsgBox StrConv(MidB(StrConv(Text1.Text, vbfromUnicode), 1, 10), vbUnicode)
End Sub
相关问答:
xmlDoc1.loadXML(h)总是返回false,为什么?谢谢帮忙回答一下
h是什么呢。。。。。。。。。
h是xml格式的字符串
你是想打开。XML格式的文件吧?
我是把h放在xmlDoc1里,用xmlDoc1.loadXML(h),然后取xmlDo ......
谁能帮我把下面这些代码改成VB形式的,多谢了,急用~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[],float g ......
用VB编程读取短信,得到一大堆unicode编码,请教如何转换成文本
例如:读取短信后(华为900C或TC35i),串口得到如下数据:
+CMGL: 17,"REC UNREAD","8615007557713",,"10/03/30,09:37:15+32&qu ......
小弟用VB调EXCEL作图
objExlApp.Workbooks.Add
objExlApp.Charts.Add
objExlApp.ActiveChart.ChartType = xlLine
objExlApp.ActiveChart.HasLegend = True
objExlApp. ......