现在有个界面,界面很简单,一个Combobox,一个Table。Table绑定了一张表,该表中有一列字段是统计年份,取值有2011,2012,2013。Combobox现在也能够自动列出该表统计年份的值。Table也能根据选择的年份显示当年的运行数据。
现在还有一个问题,我在那个窗口界面下放了几个lable和textbox,用于显示表格的某些统计信息,希望在selectedindexchanged事件触发的时候,显示的表格的数据就会自动计算好然后填充到我的textbox中,但是不知道怎么弄呢?
此主题相关图片如下:qq截图20130702152311.png
表中计划运行时间是固定值:24*365,实际运行时间就是某年“运行时间(H)”列的sum汇总值,其他的反正可以算出来,就告诉我这两个怎么去实现就行了。
界面中的textbox我都设为只读了,另外修改了一下背景颜色,应该不会影响吧?
另外贴上我的selectedindexchanged的代码:
Dim cmb As WinForm.ComboBox = e.Form.Controls("ComboBox1")
Dim txt1 As String = e.Form.Controls("TextBox1").Value
Dim txt2 As Double = e.Form.Controls("TextBox2").Value
Dim txt3 As String = e.Form.Controls("TextBox3").Value
Dim txt4 As String = e.Form.Controls("TextBox4").Value
Dim txt5 As String = e.Form.Controls("TextBox5").Value
Dim txt6 As String = e.Form.Controls("TextBox6").Value
Dim txt7 As String = e.Form.Controls("TextBox7").Value
Dim txt8 As String = e.Form.Controls("TextBox8").Value
Dim txt9 As String = e.Form.Controls("TextBox9").Value
Dim txt10 As String = e.Form.Controls("TextBox10").Value
Dim str As String = cmb.Value
Dim tbl As Table = Tables("设备运行表")
Dim p As Integer = tbl.Cols("运行时间").Index
If str IsNot Nothing Then
tbl.Filter = "统计年份 = " & "\'" & str & "\'"
txt2 = tbl.Aggregate(AggregateEnum.Sum,0,p,11,p)
Else
tbl.Filter = ""
End If