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
相关问答:
为什么我用form.show和form.hide多次连接了两个窗口只能互换链接两次啊?
代码看看
照道理form.show 没次数限定的吧
我也快疯了。
楼主知道怎么发贴么?
引用
我也快疯了。
楼主知道怎么发贴么?
楼主也 ......
现在有个xml文件是<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xm ......
问题:
现在Access数据库中有两张表TableA和TableB
TableA中有记录如下:
字段1(Name) 字段2(Num)
A 3
A 4
B 6
... ......
form1中有text1-8, 和command1
text8中为程序代码(生成窗体为form2(已做好))
单击command1后将text2中的代码生成EXE到d:\ 并且text1-7分别对应
产品名 公司名 合法版权 合法商标 文件描述 注释 标题
......