VB6 で映画館ライブラリを構築しました。 ただし、最後に見た映画がどれだったかは忘れてください。 その情報を保持し、次の映画を視聴するときに自動的に変更されるテキスト ボックスを作成したいと考えています。 ムービーのすべてのデータは DBGrid1 に保持されます。 これは、映画の名前、説明、再生時間、ハードドライブの場所です。 最後に視聴した映画を示す新しいテキスト ボックスを追加したいと考えています。 Windows 10 で VB6.0 を使用することは、数週間にわたってこれを解決しようと試みてきました。 プログラムを終了して翌日かそこらに戻ってきて、テキストボックスに最後に見た映画を表示できるようにするには、DBGridとは別の方法で保存する必要があると思います。
私が試したこと：
私が持っている本にはこれについては触れられていないので、何が起こるかを知るために未知の行為を試しているだけです
解決策 1
VB6? 真剣に？ 2023 年の新しい VB6 プロジェクト? 20 年以上前に .NET バージョンに取って代わられたことをご存知ですか?
とにかく …情報をどこかに保存する必要があり、おそらく DataGrid は何らかの形式のデータベースによってバックアップされています (ただし、コードがわからないため、判断できません)。 私がそれを行う方法は、タイムスタンプを保持する新しい列を DB テーブルに追加し、映画が再生されるたびにそれを更新することです。
最後に見た映画 (または、順番に最後の 10 件) を見たい場合は、DB にクエリを実行して、最新のエントリ (または、たとえば最後の 10 件) を返すだけです。
SQL データベースでは次のように簡単です。
SELECT TOP 1 * FROM MyMoviesTable ORDER BY LastViewedAt DESC
ただし、コードがどのように機能するかわからないため、アプリで動作する実際のコードを提供することはできません。
コメント