Visual Basic 6 で Janus GridEx グリッド コントロールを使用しており、接続を使用する前にプロパティ (DatabaseName) の 1 つをプログラムで変更しようとしています。プロパティ ウィンドウで設定したものは間違っている可能性があり、使用する前に動的に設定したいと考えています。Form_Initialize() または Form_Load() で設定しようとしましたが、どちらも使用前にプロパティ ウィンドウで on をオーバーライドしません。
何か案は?
カスタム レコードセットを 1 つ作成し、ADORecordset プロパティのグリッドに設定します。
gData.HoldFields
Set gData.ADORecordset = rstData
データベースと同じスキーマを持つレコードセットを 1 つ作成した場合は、次のことができます。
セーブデータ
IDataRepository.Save(gData.ADORecordset)
スケルトンを保存
function Save (rs as adodb.recordset)
Dim cn As ADODB.Connection
Set cn = new ADODB.Connection
cn.CursorLocation = adUseClient
cn.Open Cnstr
Set rs.ActiveConnection = cn
If rs.LockType = adLockBatchOptimistic Then
rs.UpdateBatch
Else
rs.Update
End If
Set rs.ActiveConnection = Nothing
cn.Close
Set cn = Nothing
end function
マスク付きのプロパティの場合、たとえば次のことができます
gData.Columns("Status").ValueList.Clear
gData.Columns("Status").ValueList.Add "A", "Accepted"
gData.Columns("Status").ValueList.Add "R", "Rejected"
間隔値は保持され、ユーザーはより人間が読める形式で表示できます