老师您好!
我设计了一个窗口打印模块:名叫工艺流程卡,窗口中绑定了订单表(ddpsb)和明细表(ddqdb),两个表用zzh建立了关联,想在此窗口中显示或打印明细表时需要用户选择,从第几行到第几行。我写的代码只能显示明细表所有符合zzh的行,显示用户输入的从第几行到第几行的代码,就不会写了。(比如,我选中了订单表中的某一zzh,在明细表中了15条记录,这15条记录在窗口中不一次显示或打印,想让用户自行输入从第几行到第几行的显示或打印。我加了两个文本框:textbox8和textbox9用于用户随时输入。)我的不完整代码如下(我的设计界面用截图附件上传):Dim zzh As String=Tables("ddqdb").current("zzh")
Dim mc As String=Tables("ddqdb").current("产品类型")
Dim dt1 as winform.textbox
Dt1=e.form.ccontrols(“textbox8”)
Dim dt2 as winform.textbox
Dt2=e.form.ccontrols(“textbox9”)
Tables("加工工艺流程卡_Table1").DataTable.LoadFilter ="[zzh] ='" & zzh & "'And [产品类型]='" & mc & "'"
Dim cnt As Integer=Tables("加工工艺流程卡_Table1").Rows.count '统计符合条件的行数
Dim x As Integer=dt2-dt1+1 '计算需要显示/打印的行数