1、首先，点击保存按钮后应检查文本框内容。
专注于为中小企业提供网站设计、成都网站建设服务,电脑端+手机端+微信端的三站合一,更高效的管理,为中小企业城东免费做网站提供优质的服务。我们立足成都，凝聚了一批互联网行业人才，有力地推动了上千多家企业的稳健成长，帮助中小企业通过网站建设实现规模扩充和转变。
2其次，如果在文本框4中输入的值以400开头则保存反之更改为400。
3、最后，再次检查文本框5如果文本框5中的值为29或31则保存反之则更改即可。
'代码中Button控件自行在窗体中添加并改名
***********************************父窗体代码：
Public Class Form1
Public Sub From1_保存Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles From1_保存Button.Click
Select Case sender.name
Case "From1_保存Button"
MsgBox("提交的窗体是From1")
Case "Form2_提交Button"
MsgBox("提交的窗体是From2")
End Select
Form2.Close()
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button_显示子窗体.Click
Form2.ShowDialog()
End Sub
End Class
***********************************子窗体代码：
Public Class Form2
Private Sub Form2_提交Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Form2_提交Button.Click
Form1.From1_保存Button_Click(Form2_提交Button, New System.EventArgs)
End Sub
End Class
***********************************
方法满多的，起码三四种，比如用一个全局变量保存当前提交窗体名，执行操作的代码读取这个全局变量就行。最方便的应该是做过程
Public Sub DateBaseAdd(ByVal From As Form)
，然后父窗体跟子窗体都能调用这个全局过程，同时传入窗体名称
INTOUCH自带的就有，打印屏幕的命令
自己写个时间条件运行那命令就可以了
PRINTSCREEN这个命令 具体怎么用 看下帮助
希望我的回答对你有所帮助
如有其他问题，可以继续追问，您的采纳是我前进的动力！