VB FOR 循环语句 Dim i,j,c As IntegerDim a,b As Stringc = 0Adodc1.RecordSource = " select * from inf where 下单时间 between #" & DTP1.Value & "# and #" & DTP2.Value & "# "Adodc1.RefreshFor j = 0 To Combo1.ListCount - 1b = Combo1.List(j)For i =
来源:学生作业帮助网 编辑:作业帮 时间:2024/08/02 09:54:14
![VB FOR 循环语句 Dim i,j,c As IntegerDim a,b As Stringc = 0Adodc1.RecordSource =](/uploads/image/z/3372455-47-5.jpg?t=VB+FOR+%E5%BE%AA%E7%8E%AF%E8%AF%AD%E5%8F%A5+Dim+i%2Cj%2Cc+As+IntegerDim+a%2Cb+As+Stringc+%3D+0Adodc1.RecordSource+%3D+%22+select+%2A+from+inf+where+%E4%B8%8B%E5%8D%95%E6%97%B6%E9%97%B4+between+%23%22+%26+DTP1.Value+%26+%22%23+and+%23%22+%26+DTP2.Value+%26+%22%23+%22Adodc1.RefreshFor+j+%3D+0+To+Combo1.ListCount+-+1b+%3D+Combo1.List%28j%29For+i+%3D)