UC知道程序有问题，试了很久没有解决，请高手指教！
来源：百度知道 编辑：UC知道 时间：2024/09/20 03:00:27
以下程序有问题请高手指点
程序共有9个TEXTBOX,3个LABEL,9个TEXTBOX分3个TEXTBOX控件数组（ATEXT(0 TO 2),CTEXT(0 TO 2),BTEXT(0 TO 2)，
3个LABEL为一个数组(KLABEL(i0 TO 2)，数据库名XX.MDB 表为YY,表YY中有A,C,200,500,700,1000,2000七列，A列有（100，200，300，400），C列有（50,70,80,110)
BTEXT(i).text中输入值小于2000值，BTEXT(i).text中值小于200时取列200，BTEXT(i).text中值大于200同时小于500时
B(I)取列500，以此类推，ATEXT(I).TEXT值也一样，输入值假如为150时，A(I)取A列200，输入值假如为300时，A(I)取A列300，
C(I)也是如此确定,当A(I),B(I),C(I)都找到就通过数据库找到我要的数据。这个数据赋值给KLABEL(I).
查找分三排，只要每排的ATEXTBOX,BTEXTBOX,CTEXTBOX输完值就查询表YY，再通过KLABEL立即显示查询结果，不能通过其它比如COMMAND。
以上主要是数据库，过程，控件数组等知识的综合运用，请高手看看问题出在哪里，多谢！！！
-----------------------------------------------------------------------------------------------
Dim cn As New ADODB.Connection
Dim i As Single
Dim RS As New ADODB.Recordset
Dim B(1 To 9) As String, C(1 To 5) As String, A(1 To 16) As String
Private Sub Form_Load()
C(1) = "50": C(2) = "70": C(3) = "80": C(4) = "110"
A(1)
程序共有9个TEXTBOX,3个LABEL,9个TEXTBOX分3个TEXTBOX控件数组（ATEXT(0 TO 2),CTEXT(0 TO 2),BTEXT(0 TO 2)，
3个LABEL为一个数组(KLABEL(i0 TO 2)，数据库名XX.MDB 表为YY,表YY中有A,C,200,500,700,1000,2000七列，A列有（100，200，300，400），C列有（50,70,80,110)
BTEXT(i).text中输入值小于2000值，BTEXT(i).text中值小于200时取列200，BTEXT(i).text中值大于200同时小于500时
B(I)取列500，以此类推，ATEXT(I).TEXT值也一样，输入值假如为150时，A(I)取A列200，输入值假如为300时，A(I)取A列300，
C(I)也是如此确定,当A(I),B(I),C(I)都找到就通过数据库找到我要的数据。这个数据赋值给KLABEL(I).
查找分三排，只要每排的ATEXTBOX,BTEXTBOX,CTEXTBOX输完值就查询表YY，再通过KLABEL立即显示查询结果，不能通过其它比如COMMAND。
以上主要是数据库，过程，控件数组等知识的综合运用，请高手看看问题出在哪里，多谢！！！
-----------------------------------------------------------------------------------------------
Dim cn As New ADODB.Connection
Dim i As Single
Dim RS As New ADODB.Recordset
Dim B(1 To 9) As String, C(1 To 5) As String, A(1 To 16) As String
Private Sub Form_Load()
C(1) = "50": C(2) = "70": C(3) = "80": C(4) = "110"
A(1)
摸索了很久，已经解决
你的算法不能那样写。。。
太乱了。。。
一排 ATEXT(0).Text CTEXT(0) .Text BTEXT(0) .Text klabel(0)
第二排 ATEXT(1).Text CTEXT(1) .Text BTEXT(1) .Text klabel(1)
第三排 ATEXT(2).Text CTEXT2) .Text BTEXT(2) .Text klabel(2)
上面的代码程序，我也觉得乱，但不知如何写的简练，所以请赐教
太乱了,问题太多,建议你重装下程序就没问题了,或者一键还原.
拔电源
没事，到外面去找个计算机高手来帮你弄弄吧！