投稿日 | : 2004/01/30(Fri) 13:21 |
投稿者 | : へいぽー |
Eメール | : |
URL | : |
タイトル | : Re^3: レコードの表示 |
コマンドボタンではないですが、
下の方法が一番簡単かな。
フォーム上に Text1, Data1 を配置して、
Text1.DataSource を "Data1" にして、
下のコードを貼り付けて実行してみて下さい。
# データベース名などは適当に変更してから。
Private Sub Form_Load()
Data1.Connect = "Access 2000;"
Data1.DatabaseName = "C:\SampleData.mdb"
Data1.RecordSource = "TABLE1"
Text1.DataField = "FIELD1"
End Sub