餐馆代码

石家庄铁道大学VB程序设计______饭店点菜系统  16            ‘当和小于零，则标签离窗体左边距离等于窗体宽度                    End If  End Sub    留言板的实现       Private Sub Command9_Click()       If Text5.Text = "" Or Text6.Text = " " Then              MsgBox "留言人和留言内容不能为空", 64 ，"注意 "               ‘当留言内容为空时，弹出提示，请顾客留言               Else          SG = Now    ‘正常留言时，留言时间设为当时          SJ = Text5.Text & " " & SG & vbCrLf & Text6.Text & vbCrLf & "---------"  ‘将文本框内容与时间记入留言板       &