实在不会做，会的请帮帮忙啊，，，急啊！

Question

 

题目是这样的：创建一个工程，
单击“窗体背景色修改”按钮，可使背景色改变为红色，再单击变为绿色，然后又转为红色循环变化
单击“退出”按钮时，可退出应用程序

Answer 1

到底哪一点不会？

 

通过一个变量，判断当前背景色，然后再改变颜色

 

Answer 2

 

Private Sub Command1_Click()
If Form1.BackColor = &H8000000F Then
Command1.Caption = "还原"
Form1.BackColor = &HFF&
Else
Form1.BackColor = &H8000000F
Command1.Caption = "变色"
End If
End Sub

Private Sub Command2_Click()
Unload Me
End Sub

Answer 3

 

我们刚刚开始学VB，什么语句什么的都不会用，现在要完成一道题是这样的：创建一个工程，窗口界面如图：单击“窗体背景色修改”按钮，可使窗口背景色改变为红色，再单击变为绿色，再单击变为蓝色，然后又转为红色循环变化。单击退出按钮时可退出应用程序。

Answer 4

谢谢你吖，可是我昨天写题目的时候漏了一句话，还要再单击变绿色的，所以还是没有完成、、、

Answer 5

asiadata 写:

Private Sub Command1_Click() If Form1.BackColor = &H8000000F Then Command1.Caption = "还原" Form1.BackColor = &HFF& elseIf Form1.BackColor = ???? Then'其他背景色 Else Form1.BackColor = &H8000000F Command1.Caption = "变色" End If End Sub Private Sub Command2_Click() Unload Me End Sub

 

他已经帮你写出来了，关于IF语句具体的你多看下书，重要的还是自己理解

Answer 6

谢谢大家的帮忙，我根据他给我写的那部分，看了几遍书做出来了。