主题：取一个字符串的前两位怎么些代码

我要把产品的 款式 型号代码 合并在一起当ID 怎么写代码 想用款式的所有加上型号代码的前两位

如 EEEE  02087

ID:EEE02

SubString

返回从指定位置开始指定长度的子字符串。

语法：

SubString(StartIndex)
SubString(StartIndex, Length)

参数：

StartIndex:	子字符串的开始位置。
Length:	可选参数，子字符串的长度。

如果忽略长度，则返回自指定位置开始的所有字符串。

例如：

Dim s1 As String ="中华人民共和国"
Dim s2 As String
Dim s3 As String
s2 = s1.SubString(2)
s3 = s1.SubString(2,3)
Output.Show("s2 = " & s2)
Output.Show("s3 = " & s3)

输出结果为：

s2 = 人民共和国
s3 = 人民共

dr("款式") & dr("型号").SubString(2)

http://www.datasoft.com.cn/dispbbs.asp?boardid=2&Id=12640