跪求艺VB的源程序注释,,,今天要急用,,谢谢!!!!!

来源:百度知道 编辑:UC知道 时间:2024/07/04 07:36:48
Dim str As String
Option Explicit
Private Sub dtgroominforefresh()
With dtgroominfo
Set .DataSource = frmmdi.adoroom
.AllowRowSizing = False
.HeadFont = 2
.MarqueeStyle = dbgHighlightRow
.AllowAddNew = False
.AllowDelete = False
.AllowUpdate = False
.Columns(0).Caption = "房间号"
.Columns(0).Width = 600
.Columns(0).AllowSizing = False
.Columns(1).Caption = "客房等级"
.Columns(1).Width = 800
.Columns(1).AllowSizing = False
.Columns(2).Caption = "客房类型"
.Columns(2).Width = 800
.Columns(2).AllowSizing = False
.Columns(3).Caption = "客房价格"
.Columns(3).Width = 800
.Columns(3).AllowSizing = False
.Columns(4).Caption = "客房住人状态"
.Columns(4).Width = 1200

我大概看了下这个说的是客房的状态问题:主要command1的可能是入住房间的先要看房间是不是被入住了,入住之后就要改状态等!我也编过,用了不少种方法连接数据库。有玩头!哈哈

你要把程序界面截图也发来,别人才看得懂你的程序