那位高手帮我看下这个程序,这是一个仓储管理系统的查询 有3个条件 运行时错误提示至少一个参数未指定值
判断第二个的时候出现的OptionExplicitDimzdAsStringDimzd1AsStringDimzd2AsStringDimrkAsStringDimsdA...
判断第二个的时候出现的
Option Explicit
Dim zd As String
Dim zd1 As String
Dim zd2 As String
Dim rk As String
Dim sd As String
Dim cmd As ADODB.Recordset
Private Sub Command1_Click()
Adodc1.RecordSource = "select * from 入库单 where 类型 = '" + zd + "'"
If DBCombo2.Text = "" Then
Adodc1.Refresh
Else
If DBCombo3.Text <> "" Then
Adodc1.RecordSource = "select * from 入库单 where 名称 = '" + zd2 + "'"
Adodc1.Refresh
End If
Adodc1.RecordSource = "select * from 入库单 where 型号 = '" + zd1 + "'"
Adodc1.Refresh
End If
End If
End Sub
Private Sub DBCombo1_Click(Area As Integer)
zd = DBCombo1.Text
DBCombo2.ListField = zd
End Sub
Private Sub DBCombo2_Click(Area As Integer)
zd1 = DBCombo2.Text
DBCombo3.ListField = zd1
zd2 = DBCombo3
End Sub 展开
Option Explicit
Dim zd As String
Dim zd1 As String
Dim zd2 As String
Dim rk As String
Dim sd As String
Dim cmd As ADODB.Recordset
Private Sub Command1_Click()
Adodc1.RecordSource = "select * from 入库单 where 类型 = '" + zd + "'"
If DBCombo2.Text = "" Then
Adodc1.Refresh
Else
If DBCombo3.Text <> "" Then
Adodc1.RecordSource = "select * from 入库单 where 名称 = '" + zd2 + "'"
Adodc1.Refresh
End If
Adodc1.RecordSource = "select * from 入库单 where 型号 = '" + zd1 + "'"
Adodc1.Refresh
End If
End If
End Sub
Private Sub DBCombo1_Click(Area As Integer)
zd = DBCombo1.Text
DBCombo2.ListField = zd
End Sub
Private Sub DBCombo2_Click(Area As Integer)
zd1 = DBCombo2.Text
DBCombo3.ListField = zd1
zd2 = DBCombo3
End Sub 展开
1个回答
展开全部
,对于发出的存货以先入库存货的单价计算发出存货成本的方法.采用这种方法的具体做法是:先按存货的期初余额的单价计算发出的存货的成本,领发完毕后,再按第一批入库的存货的单价计算,依此从前向后类推,计算发出存货和结存货的成本.
先进先出法是存货的计价方法之一。它是根据先购入的商品先领用或发出的假定计价的。用先进先出法计算的期末存货额,比较接近市价。
先进先出法是以先购入的存货先发出这样一种存货实物流转假设为前提,对发出存货进行计价的一种方法。采用这种方法,先购入的存货成本在后购入的存货成本之前转出,据此确定发出存货和期末存货的成本。
实例
例一
假设库存为零,1日购入A产品100个单价2元;3日购入A产品50个单价3元;
5日销售发出A产品50个,则发出单价为2元,成本为100元。
先进先出法假设先入库的材料先耗用,期末库存材料就是最近入库的材料,因此发出材料按先入库的材料的单位成本计算。
例二
对销售而言,先获得的存货先销售出去,使留下存货的日期离现在越近,存货价值越接近现在的重置价值。在物价上涨时,此法会导致较低的销货成本,较多的盈余。
例如存货情形如下;
1、1月1日进货10个每个5元,小计50元。
2、4月1日进货10个每个6元,小计60元。
3、8月1日进货10个每个7元,小计70元。
4、12月1日进货10个每个8元,小计80元。
假设在12月31日存货数量为15个,则期末存货价值为12月1日10个每个8元小计80元,8月1日5个每个7元小计35元,总计存货价值为115元。
对电脑数据结构而言,称为排序的数据进出方式,从一端进,从另一端出,就好像排队一样。
先进先出法和后进先出法的区别
1、先进先出:发出存货计价时,坚持先购进先发出的原则进行计价。
2、后进先出:发出存货计价时,坚持后购进先发出的原则进行计价。
上述两种方法均指发出存货的计价方法,而与存货本身实际发出先后顺序无关。比如:3月1日购买A产品3个,单价:8元/个;3月5日购买A产品9个,单价:7元/个;3月初A产品余2个,单价:10元/个。3月发出A产品8个。这发出的8个A产品计价分别为:(1)、先进先出:2*10+3*8+3*7=65元;(2)、后进先出:8*7=56元。
先进先出法的运用
先进先出法是指根据先购进的存货先发出的成本流转假设对存货的发出和结存进行计价的方法。以先进先出法计价的库存的商品存货则是最后购进的商品存货。市场经济环境下,各种商品的价格总是有所波动的,在物价上涨过快的前提下,由于物价快速上涨,先购进的存货其成本相对较低,而后购进的存货成本就偏高。这样发出存货的价值就低于市场价值,产品销售成本偏低,而期末存货成本偏高。但因商品的售价是按近期市价计算,因而收入较多,销售收入和销售成本不符合配比原则,以此计算出来的利润就偏高,形成虚增利润,实质为“存货利润”。
因为虚增了利润,就会加重企业所得税负担,以及向投资人分红增加,从而导致企业现金流出量增加。但是从筹资角度来看,较多的利润、较高的存货价值、较高的流动比率意味着企业财务状况良好,这对博取社会公众对企业的信任,增强投资人的投资信心,而且利润的大小往往是评价一个企业负责人政绩的重要标尺。不少企业按利润水平的高低来评价企业管理人员的业绩,并根据评价结果来奖励管理人员。此时,管理人员往往乐于采用先进先出法,因为,这样做会高估任职期间的利润水平,从而多得眼前利益。
运用先进先出法的注意事项
先进先出法,期末材料按照最接近的单位成本计算,比较接近目前的市场价格,因此资产负债表可以较为真实地反映财务状况;但是由于本期发出材料成本是按照较早购入材料的成本进行计算的,所以计入产品成本的直接材料费用因此可能被低估,等到这些产品销售出去就会使利润表的反映不够真实。
先进先出法的适用性
根据谨慎性原则的要求,先进先出法适用于市场价格普遍处于下降趋势的商品。因为采用先进先出法,期末存货余额按最后的进价计算,使期末存货的价格接近于当时的价格,真实的反映了企业期末资产状况;期末存货的帐面价格反映的是最后购进的较低的价格,对于市场价格处于下降趋势的产品,符合谨慎原则的要求,能抵御物价下降的影响,减少企业经营的风险,消除了潜亏隐患,从而避免了由于存货资金不实而虚增企业帐面资产。这时如果采用后进先出法,在库存物资保持一定余额的条件下,帐面的存货计价永远是最初购进的高价,这就造成了存货成本的流转与实物流转的不一致。
先进先出法的优缺点
其优点是使企业不能随意挑选存货计价以调整当期利润,缺点是工作量比较繁琐,特别对于存货进出量频繁的企业更是如此。而且当物价上涨时,会高估企业当期利润和库存存货价值;反之,会低估企业存货价值和当期利润。
在通货膨胀情况下,先进先出法会虚增利润,增加企业的税收负担,不利于企业资本保全。而且,先进先出法对发出的材料要逐笔进行计价并登记明细账的发出与结存,核算手续比较烦琐。
先进先出法是存货的计价方法之一。它是根据先购入的商品先领用或发出的假定计价的。用先进先出法计算的期末存货额,比较接近市价。
先进先出法是以先购入的存货先发出这样一种存货实物流转假设为前提,对发出存货进行计价的一种方法。采用这种方法,先购入的存货成本在后购入的存货成本之前转出,据此确定发出存货和期末存货的成本。
实例
例一
假设库存为零,1日购入A产品100个单价2元;3日购入A产品50个单价3元;
5日销售发出A产品50个,则发出单价为2元,成本为100元。
先进先出法假设先入库的材料先耗用,期末库存材料就是最近入库的材料,因此发出材料按先入库的材料的单位成本计算。
例二
对销售而言,先获得的存货先销售出去,使留下存货的日期离现在越近,存货价值越接近现在的重置价值。在物价上涨时,此法会导致较低的销货成本,较多的盈余。
例如存货情形如下;
1、1月1日进货10个每个5元,小计50元。
2、4月1日进货10个每个6元,小计60元。
3、8月1日进货10个每个7元,小计70元。
4、12月1日进货10个每个8元,小计80元。
假设在12月31日存货数量为15个,则期末存货价值为12月1日10个每个8元小计80元,8月1日5个每个7元小计35元,总计存货价值为115元。
对电脑数据结构而言,称为排序的数据进出方式,从一端进,从另一端出,就好像排队一样。
先进先出法和后进先出法的区别
1、先进先出:发出存货计价时,坚持先购进先发出的原则进行计价。
2、后进先出:发出存货计价时,坚持后购进先发出的原则进行计价。
上述两种方法均指发出存货的计价方法,而与存货本身实际发出先后顺序无关。比如:3月1日购买A产品3个,单价:8元/个;3月5日购买A产品9个,单价:7元/个;3月初A产品余2个,单价:10元/个。3月发出A产品8个。这发出的8个A产品计价分别为:(1)、先进先出:2*10+3*8+3*7=65元;(2)、后进先出:8*7=56元。
先进先出法的运用
先进先出法是指根据先购进的存货先发出的成本流转假设对存货的发出和结存进行计价的方法。以先进先出法计价的库存的商品存货则是最后购进的商品存货。市场经济环境下,各种商品的价格总是有所波动的,在物价上涨过快的前提下,由于物价快速上涨,先购进的存货其成本相对较低,而后购进的存货成本就偏高。这样发出存货的价值就低于市场价值,产品销售成本偏低,而期末存货成本偏高。但因商品的售价是按近期市价计算,因而收入较多,销售收入和销售成本不符合配比原则,以此计算出来的利润就偏高,形成虚增利润,实质为“存货利润”。
因为虚增了利润,就会加重企业所得税负担,以及向投资人分红增加,从而导致企业现金流出量增加。但是从筹资角度来看,较多的利润、较高的存货价值、较高的流动比率意味着企业财务状况良好,这对博取社会公众对企业的信任,增强投资人的投资信心,而且利润的大小往往是评价一个企业负责人政绩的重要标尺。不少企业按利润水平的高低来评价企业管理人员的业绩,并根据评价结果来奖励管理人员。此时,管理人员往往乐于采用先进先出法,因为,这样做会高估任职期间的利润水平,从而多得眼前利益。
运用先进先出法的注意事项
先进先出法,期末材料按照最接近的单位成本计算,比较接近目前的市场价格,因此资产负债表可以较为真实地反映财务状况;但是由于本期发出材料成本是按照较早购入材料的成本进行计算的,所以计入产品成本的直接材料费用因此可能被低估,等到这些产品销售出去就会使利润表的反映不够真实。
先进先出法的适用性
根据谨慎性原则的要求,先进先出法适用于市场价格普遍处于下降趋势的商品。因为采用先进先出法,期末存货余额按最后的进价计算,使期末存货的价格接近于当时的价格,真实的反映了企业期末资产状况;期末存货的帐面价格反映的是最后购进的较低的价格,对于市场价格处于下降趋势的产品,符合谨慎原则的要求,能抵御物价下降的影响,减少企业经营的风险,消除了潜亏隐患,从而避免了由于存货资金不实而虚增企业帐面资产。这时如果采用后进先出法,在库存物资保持一定余额的条件下,帐面的存货计价永远是最初购进的高价,这就造成了存货成本的流转与实物流转的不一致。
先进先出法的优缺点
其优点是使企业不能随意挑选存货计价以调整当期利润,缺点是工作量比较繁琐,特别对于存货进出量频繁的企业更是如此。而且当物价上涨时,会高估企业当期利润和库存存货价值;反之,会低估企业存货价值和当期利润。
在通货膨胀情况下,先进先出法会虚增利润,增加企业的税收负担,不利于企业资本保全。而且,先进先出法对发出的材料要逐笔进行计价并登记明细账的发出与结存,核算手续比较烦琐。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询