各位大虾，美眉帮帮忙，小女子在线等！

[benben20000521]

我的问题是这样的：
有这样一组数据：010000A8900016F000169DC0 可口可乐
其中“010000A8900016F000169DC0”对应的是SQL 2000数据库中表”ypinf“中的“药品EPC码”，偶想截取“010000A8900016F000169DC0”利用SQL语句在ypinf表中查询对应药品的信息，然后显示在一个Text文本中，代码如何实现？
没做过这样的程序，不知道如何实现在线显示，不懂，愁啊：（

[vansoft]

010000A8900016F000169DC0
這個長度應該是固定的。
只要用left取左邊多少位就行了。

然後就是二樓說的，
Select * form 表名 where 字段名='取出來的值'

[51365133]

Select * form 表名 where 字段名='010000A8900016F000169DC0'

[51365133]

哇哈哈哈,我就是作超市系统地,我相信你的这些信息不是在一个表中的,我建议你多看下SQL 吧,要不我们就是把语句写出来,你也不知道怎么用的.

[viena]

不懂U Words

[of123]

010000A8900016F000169DC0 可口可乐

不知你的分隔符是空格还是制表符。

Dim strTemp As String, strYpinf() As String
strTemp = "010000A8900016F000169DC0 可口可乐"

'置换分隔符，以适用各种情况

If InStr(strTemp, vbTab) Then
strTemp = Replace(strTemp, Space(1), "")
Else
'去除多余的空格
Do Until InStr(strTemp, Space(2)) < 1
strTemp = Replace(strTemp, Space(2), Space(1))
Loop
strTemp = Replace(strTemp, Space(1), vbTab)
End If

strYpinf = Split(strTemp, vbTab)

rs.Open "SELECT * FROM ypinf WHERE 药品EPC码='" & strYpinf(0) & "'", cnn
Text1 = rs.Fields("药品EPC码")
Text2 = rs.Fields("药品名称")

[easyrock]

可口可乐 也是药品？？

[rayxu]

哈哈。他应该是想实现一个打码认商品的功能，像商场一样，打入编码得到商品的名字价钱。
这个很简单，只要一条查询语句就可以了。
顶二楼回答的。