If ProfileString("rcpt.ini","Rcpt_type","print_detail","1") = 1 Then
    For li_item_pos = 1 To 14
        ls_itemdetail = ProfileString("rcpt.ini","bill_items",String(li_item_pos),"")
        If ls_itemdetail = "" Then Exit
        ldec_itemcosts = Dec(of_substr(ls_itemdetail,'',7))
        ldec_itemamount = Dec(of_substr(ls_itemdetail,'',4))
        If ldec_itemamount > 0 Then
            ldec_price = ldec_itemcosts/ldec_itemamount
        Else
            ldec_price = 0
        End If
        ls_itemname = of_substr(ls_itemdetail, ' ', 2)
        ls_itemspec = of_substr(ls_itemdetail, ' ', 3)
        
打印后返回值却是：A 0 0
                  B 0 0
                  C 0 0.....

正确的应该是：血清总蛋白测定 / 1.00 项 检验病理科 5.00 5.00                    
              血清白蛋白测定 / 1.00 项 检验病理科 10.00 10.00                   
              血清总胆红素测定 / 1.00 项 检验病理科 5.00 5.00                    
              血清直接胆红素测定 / 1.00 项 检验病理科 5.00 5.00          
        
        
        RCPT.INI内容如下：
[Rcpt_type]
rcpt_type=2
;收据格式,标准格式和自定义格式两种
;1:标准格式 收据尺寸 152*94mm
;2:自定义收据格式:门诊收据240*140mm

free_rcpt=yes
;免费病人是否打印收据
;若为yes,则打印,否则不打印
print_list=yes
;是否打印费用清单,yes 是,no 否
free_printlist=
user_defined_rcpt=3
print_detail=1
print_reck=1
port_printer=
baudrate=
cutpaper=no
posprint=no
;免费病人是否打印费用清单
;若为yes,则打印,否则不打印

[rcpt_detail]
class_list=A,B,C,D,E,F,G,H,I,J
A=17.90 17.90
B=30.00 30.00
C=
D=
E=
F=20.00 20.00
G=
H=
I=315.00 315.00
J=


[bill_items]
1=C 血清总蛋白测定 / 1.00 项 检验病理科 5.00 5.00                    
2=C 血清白蛋白测定 / 1.00 项 检验病理科 10.00 10.00                   
3=C 血清总胆红素测定 / 1.00 项 检验病理科 5.00 5.00                    
4=C 血清直接胆红素测定 / 1.00 项 检验病理科 5.00 5.00               
5=C 血清丙氨酸氨基转移酶测定 / 1.00 项 检验病理科 5.00 5.00            
6=E 电子结肠镜检查 / 1.00 次 呼吸消化神经内科 300.00 300.00            
7=D 肛门指检 / 1.00 次 呼吸消化神经内科 15.00 15.00          
8=A 盐酸利多卡因胶浆 0.2g江苏济川 1.00 支 呼吸消化神经内科 9.00 9.00         
9=A 甘露醇注射液 250ml安徽华源 1.00 支 呼吸消化神经内科 3.70 3.70        
10=A 0.9%氯化钠注射液500ml 500ml科伦药业 2.00 瓶 呼吸消化神经内科 5.20 5.20      
11=E 清洁灌肠 / 1.00 次 呼吸消化神经内科 20.00 20.00      
12=     
13=     
14=     
15=    
16=    
17=   
18=  
19=  
20=  
21=  
22=  
23=  
24=  
25=  
26=  
27=  
28=  
29=  
30=  
31=  
32=  
33=  
34=  
35=  
36=  
37=  
38=  
39=  
40=  
你的判断语句不该加引号，这个试试