在一个FORM中,如果按下了打印就会跳出一个窗口
然后选择是库存打印还是工作情况查看打印!
我现在跳出的窗口已设置好,
代码如下:
Private Sub cmdtotalview_Click()
Unload Me
End SubPrivate Sub cmdworkview_Click()
Unload Me
End SubPrivate Sub Form_Load()
Me.Left = (Screen.Width - Me.Width) / 2
Me.Top = (Screen.Height - Me.Height) / 2
End Sub
就是我如何判断我按下的是哪个按钮?!也就是说我要实行的是哪种打印??
在FORM中跳出窗口的代码如下:
Public Sub mnufileprint_Click()
Formchoose.Show 1
这一句怎么写:(Call totalviewprint or call workviewprint)?
End Sub
然后选择是库存打印还是工作情况查看打印!
我现在跳出的窗口已设置好,
代码如下:
Private Sub cmdtotalview_Click()
Unload Me
End SubPrivate Sub cmdworkview_Click()
Unload Me
End SubPrivate Sub Form_Load()
Me.Left = (Screen.Width - Me.Width) / 2
Me.Top = (Screen.Height - Me.Height) / 2
End Sub
就是我如何判断我按下的是哪个按钮?!也就是说我要实行的是哪种打印??
在FORM中跳出窗口的代码如下:
Public Sub mnufileprint_Click()
Formchoose.Show 1
这一句怎么写:(Call totalviewprint or call workviewprint)?
End Sub
public SelectCom as integer
SelectCom=0Private Sub cmdtotalview_Click()
SelectCom=1
Unload Me
End SubPrivate Sub cmdworkview_Click()
SelectCom=2
Unload Me
End SubPublic Sub mnufileprint_Click()
Formchoose.Show 1
select case SelectCom
case 0
case 1
totalviewprint
case 2
workviewprint
case else
end select
SelectCom=0
End Sub