[VB.NET]100分继续求助,急,在线等!!!!!!!!!!!!!!!

VB.NET源码-156个实用实例哦…… <script type="text/javascript"> </script> <script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>
100分继续求助,急,在线等!!!!!!!!!!!!!!!
要对数据库的内容进行排序,为什么老是提示我属性使用无效呢????????
Private Sub Command6_Click()
Dim SQLString As String

Dim S As String, S1 As String
Dim i As Integer
For i = 0 To 3
If Check1(i) = 1 Then
Select Case i
Case 0
S1 = "score.人工智能 "
Case 1
S1 = "score.模拟电子线路 "
Case 2
S1 = "score.总分 "
Case 3
S1 = "score.总分绩点 "
End Select
If S <> " " Then
S = S & ", " & S1
Else
S = S1
End If
End If
Next i
SQLString = "SELECT * FROM score " & S
Adodc1.Recordset = SQLString
Adodc1.Refresh

End Sub

按数据库中某列进行排序显示,这列数据必须是INT型么,我看例子中定义的是文本类型也可以按这列进行排序显示啊?为什么我的就不行呢
__________________________________________________________________________
SQLString = "SELECT * FROM score " & S

改为

SQLString = "SELECT * FROM score ORDER BY " & S
__________________________________________________________________________
"SELECT * FROM score order by " & S
__________________________________________________________________________
刚才写错了,就是 加上这个也不好用,还是提示属性使用无效,难道对ACCESS中数据的类型还有要求么?TEXT类型的可以排序吧?为什么还不好用么呢?啊,哭,帮帮我,兄弟们呀
__________________________________________________________________________
错误箭头指向那一行?报告的具体错误是什么?
__________________________________________________________________________
错误箭头指向第一行,提示属性使用无暇
__________________________________________________________________________
Private Sub Command6_Click()

这一行?不会吧?

Dim SQLString As String

这一行?也不会啊。
__________________________________________________________________________
SQLString = "SELECT * FROM score ORDER BY " & S

是不是这一行?
__________________________________________________________________________
Adodc1.Recordset = SQLString

可能是这一行?
__________________________________________________________________________
一运行,就提示属性使用无效,然后中断,一个黄色的箭头指向Private Sub Command6_Click()
__________________________________________________________________________
如果是用vb.net,能不用Adodc1就不用它了.用oleDb吧
别老舍不得原来vb熟悉的东西了.
__________________________________________________________________________
请改为

Adodc1.Recordset.RecordSource = SQLString

试试,同意ls。
__________________________________________________________________________
是你说的这错了,谢谢你了,兄弟,不是我非得用这个,我一直在用JAVA写东西,我一个非常好的同学要我帮着做毕业设计,我也没接触过VB,根本不会,在这硬着头皮做,见笑了。给分!
__________________________________________________________________________
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值