Public Property Let G_Remark(ByVal vData As String)
mvarG_Remark = vData
End Property
Public Property Get G_Remark() As String
G_Remark = mvarG_Remark
End Property
第一个是设置mvarG_Remark属性
第二个是获得mvarG_Remark属性

你要把这个东西想象成对象,例如VB的FORM窗体的Caption.你可以对这个属性设置,也可以取得这个属性的值.

别管这个,我只完整的写了 添加 这个方法!
你先给我讲讲吧

没听明白......

就是说我在窗体中实例化了这个类的一个对象aa

现在我想把窗体上4个Textbox中的数据传进去,成功就写入数据库,怎么整?

我是不是还要声明4个变量来保存这4个TextBox中的数据呢?

dim a as aa
set a = new aa
'设置参数
a.G_Remark="123123"
.........
a.UpdateGuestInfoOldRecord

就这样用的.

随风逐流
把你的MSN留下吧

dim a as aa
set a = new aa
'设置参数
a.G_ID=Trim('"& me.txtG_ID &"')
.........
a.AddGuestInfoNewRecord //(先给我说说添加操作,是这样的吗?)

首先不好意思,我上班的时候MSN都不能用.

然后,你AddGuestInfoNewRecord 定义的时候设置有参数哦.所以你用的时候也要传参.你也可以设置不传参数.

恩,就这样就可以了吧