用vb做的。还没有做完。不过整个结构已经很清晰了。有兴趣的继续做。

				VERSION 5.00
				Begin VB.Form Form4 
				   Caption         =   "退房"
				   ClientHeight    =   2985
				   ClientLeft      =   60
				   ClientTop       =   450
				   ClientWidth     =   3465
				   LinkTopic       =   "Form4"
				   ScaleHeight     =   2985
				   ScaleWidth      =   3465
				   StartUpPosition =   3  '窗口缺省
				   Begin VB.Frame Frame1 
				      Caption         =   "退房登记"
				      Height          =   2775
				      Left            =   120
				      TabIndex        =   0
				      Top             =   120
				      Width           =   3255
				      Begin VB.CommandButton Command3 
				         Caption         =   "取消退房"
				         Height          =   375
				         Left            =   1800
				         TabIndex        =   12
				         Top             =   2280
				         Width           =   1335
				      End
				      Begin VB.CommandButton Command2 
				         Caption         =   "确实退房"
				         Height          =   375
				         Left            =   120
				         TabIndex        =   11
				         Top             =   2280
				         Width           =   1335
				      End
				      Begin VB.TextBox Text4 
				         Height          =   270
				         Left            =   600
				         TabIndex        =   9
				         Top             =   1800
				         Width           =   1215
				      End
				      Begin VB.TextBox Text3 
				         Height          =   270
				         Left            =   600
				         TabIndex        =   7
				         Top             =   1440
				         Width           =   1215
				      End
				      Begin VB.TextBox Text2 
				         Height          =   270
				         Left            =   600
				         TabIndex        =   5
				         Top             =   1080
				         Width           =   1215
				      End
				      Begin VB.CommandButton Command1 
				         Caption         =   "确定"
				         Height          =   255
				         Left            =   2040
				         TabIndex        =   3
				         Top             =   360
				         Width           =   855
				      End
				      Begin VB.TextBox Text1 
				         Height          =   270
				         Left            =   600
				         TabIndex        =   2
				         Top             =   360
				         Width           =   1215
				      End
				      Begin VB.Label Label5 
				         Caption         =   "如果显示的信息正确的话请按下面的""确实退房""来退您的房子!"
				         Height          =   975
				         Left            =   1920
				         TabIndex        =   10
				         Top             =   1080
				         Width           =   1215
				      End
				      Begin VB.Label Label4 
				         Caption         =   "房号"
				         Height          =   255
				         Left            =   120
				         TabIndex        =   8
				         Top             =   1800
				         Width           =   495
				      End
				      Begin VB.Label Label3 
				         Caption         =   "姓名"
				         Height          =   255
				         Left            =   120
				         TabIndex        =   6
				         Top             =   1440
				         Width           =   495
				      End
				      Begin VB.Label Label2 
				         Caption         =   "学号"
				         Height          =   255
				         Left            =   120
				         TabIndex        =   4
				         Top             =   1080
				         Width           =   495
				      End
				      Begin VB.Label Label1 
				         Caption         =   "学号"
				         Height          =   255
				         Left            =   120
				         TabIndex        =   1
				         Top             =   360
				         Width           =   495
				      End
				   End
				End
				Attribute VB_Name = "Form4"
				Attribute VB_GlobalNameSpace = False
				Attribute VB_Creatable = False
				Attribute VB_PredeclaredId = True
				Attribute VB_Exposed = False