0

とうもろこしと豆と大根の3つの製品があります。私はそれぞれに異なる仕様を持っています、そしていくつかは同じです...水分、色、タンパク質、脂肪....私はいくつかのバインドされていないテキストボックスといくつかのラベルを連続した形で持っています。2つのテキストボックスに入力した日付で並べ替えたり、すべてを表示したりできる2つのボタンもあります。フォームヘッダーにラベルとテキストボックスがあり、詳細セクションにテキストボックスがあります。フォームヘッダーセクションのテキストボックスは、並んでいる各フィールドの平均を取得しています。

フォームを開いてBeansを選択すると、すべてが完全に表示されます。すべてを並べ替えたり表示したりできますが、問題ありません。Cornに切り替えて同じことを行うことはできますが、Beansに戻そうとすると、[平均]テキストボックスに#Errorが表示されます。フォームを開いて最初にCornに移動し、次にBeansに移動してCornに戻ると、Cornは両方の時間で機能しますが、Beansは機能しません。Beanは、フォームで最初に開かれたものである場合にのみ機能し、別の製品を選択するまで機能し続けます。とうもろこしと大根は何があっても機能しますが、Beansに戻すと、再び#Errorが発生します。

2つのコードブロックの間に実質的な違いはありません。他に何が平均テキストボックス(Text12-Text15)の#Errorを引き起こしている可能性がありますか?

これがコードの一部です...このコードはそれぞれのボタンのOnClickイベントにあります

とうもろこしの場合

Me.Label2.Caption = "Moisture"
Me.Label3.Caption = "Starch"
Me.Label4.Caption = "Protein"
Me.Label5.Caption = "Fat"
Me.Text2.ControlSource = " Moisture "
Me.Text3.ControlSource = " Starch "
Me.Text4.ControlSource = " Protein "
Me.Text5.ControlSource = " Fat "
Me.Text12.ControlSource = "=Avg([Moisture])"
Me.Text13.ControlSource = "=Avg([Starch])"
Me.Text14.ControlSource = "=Avg([Protein])"
Me.Text15.ControlSource = "=Avg([Fat])"
Me.RecordSource = "SELECT SampleID.DateCreated, SampleID.SampleLocationID, PertenData.Moisture, PertenData.Starch, PertenData.Protein, PertenData.Fat FROM SampleID INNER JOIN PertenData ON SampleID.SampleID = PertenData.PertenSampleID WHERE ((SampleID.SampleLocationID)=21) ORDER BY SampleID.DateCreated DESC"

豆の場合

Me.Label2.Caption = "Moisture"
Me.Label3.Caption = "Starch"
Me.Label4.Caption = "Protein"
Me.Label5.Caption = "Color"
Me.Text2.ControlSource = " Moisture "
Me.Text3.ControlSource = " Starch "
Me.Text4.ControlSource = " Protein "
Me.Text5.ControlSource = " Color"
Me.Text12.ControlSource = "=Avg([Moisture])"
Me.Text13.ControlSource = "=Avg([Starch])"
Me.Text14.ControlSource = "=Avg([Protein])"
Me.Text15.ControlSource = "=Avg([Color])"
Me.RecordSource = "SELECT SampleID.DateCreated, SampleID.SampleLocationID, PertenData.Moisture, PertenData.Starch, PertenData.Protein, PertenData.Color FROM SampleID INNER JOIN PertenData ON SampleID.SampleID = PertenData.PertenSampleID WHERE ((SampleID.SampleLocationID)=35) ORDER BY SampleID.DateCreated DESC"
4

2 に答える 2

0

コメントに基づいて...
すべてのコードを1つのサブに移動し、そのサブを文字列パラメーター(コーン、ビーンズ、またはラディッシュ)で呼び出します。これにより、現在のラディッシュボタンコードのバグを絞り込むことができます。後で簡単にメンテナンスできるようにします。

于 2012-11-21T15:25:36.637 に答える
0

この問題は、バインドされたテキストボックスに直接関連していました。私のサンプルごとに、表示する必要のあるデータカテゴリの数が異なりましたが、テキストボックスのvisibleプロパティをfalseに設定しても、表示されるテキストボックスで問題が発生していました。テキストボックスを「unbound」に戻すために使用しました

Me.text5.ControlSource = Empty

テキストボックスをバインドされていない状態に戻した後、新しいコントロールソースに再バインドします。これにより、問題は恒久的に停止しました。私は今5つの製品を持っており、それらの5つの組み合わせは完璧に機能します。皆様のご協力に感謝いたします。

于 2012-11-21T18:19:22.003 に答える