窗体上有一个命令按钮Command1和文本框Text1,在文本框Text1中输入月份的数值
窗体上有一个命令按钮Command1和文本框Text1,在文本框Text1中输入月份的数值(即1~12之间的一个整数,如果不是,则等待其重新输入),单击命令按钮Comma...
窗体上有一个命令按钮Command1和文本框Text1,在文本框Text1中输入月份的数值(即1~12之间的一个整数,如果不是,则等待其重新输入),单击命令按钮Command1后,计算机打印出该月份的季节(12,1,2为“冬季”,其余类推)。比如输入7,则打印出“夏天”,请编写Command1的click事件代码。
展开
1个回答
展开全部
Private Sub Form_Load()‘LOAD初使化FORM
Command1.Left = Me.Width / 2 - Command1.Width / 2
Command1.Top = Me.Height / 2 - Command1.Height / 2 - 400
End Sub
Private Sub Form_Resize()’FORM大小改变
Command1.Top = (Me.Height - Command1.Height) / 2
Command1.Left = (Me.Width - Command1.Width) / 2-400
End Sub
要么人久写一个过程。去调用。
public sub Command_center()
Command1.Top = (Me.Height - Command1.Height) / 2
Command1.Left = (Me.Width - Command1.Width) / 2-400
end sub
Command1.Left = Me.Width / 2 - Command1.Width / 2
Command1.Top = Me.Height / 2 - Command1.Height / 2 - 400
End Sub
Private Sub Form_Resize()’FORM大小改变
Command1.Top = (Me.Height - Command1.Height) / 2
Command1.Left = (Me.Width - Command1.Width) / 2-400
End Sub
要么人久写一个过程。去调用。
public sub Command_center()
Command1.Top = (Me.Height - Command1.Height) / 2
Command1.Left = (Me.Width - Command1.Width) / 2-400
end sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |