vb listview字段中的数字计算，求代码
例如：金重字段中：2-3（2-3克），如何提取出2和3，这2个数字进行计算。（2+3）/2*数量字段内的数据...
例如：金重字段中：2 - 3（2-3克），如何提取出2和3，这2个数字进行计算。（2+3）/2 * 数量字段内的数据
展开
1个回答
展开全部
dim a as string
a=list1.text
dim n as long
n=len(n)
dim i as long
dim c as long
for i=1to n
if mid(a,i,1)="-"then
c=val(left(a,i-1))+val(right(a,n-i))
endif
next
a=list1.text
dim n as long
n=len(n)
dim i as long
dim c as long
for i=1to n
if mid(a,i,1)="-"then
c=val(left(a,i-1))+val(right(a,n-i))
endif
next
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
