代码如下。告枝===袜仔敏===戚睁==Private Sub Command1_Click()WindowState = vbMaximizedEnd SubPrivate Sub Command2_Click()WindowState = vbMinimizedEnd SubPrivate Sub Command3_Click()WindowState = vbNormalEnd Sub