15电气一班刘思凡作业一

来源:互联网 发布:数据库下载 编辑:程序博客网 时间:2024/04/29 06:02
Private Sub Command1_Click()
Dim s As String
Dim s As LoadPictureColorConstants
s = Label1.Caption
Label1.Caption = Label2.Caption
Label2.Caption = s
a = Label1.ForeColor
Label1.ForeColor = Label2.ForeColor
Label2.ForeColor = a
End Sub
0 0
原创粉丝点击