Set pm = Conn.execute(" SELECT username, credits FROM pre_common_member order BY credits DESC ")
text1.text = pm("credits")
結果text1里只能顯示最大的分數。
我想讓資料能夠都顯示出來。起碼取前五個。
格式如下：
第一名username：多少積分
第二名username：多少積分
第三名username：多少積分
第四名username：多少積分
第五名username：多少積分
uj5u.com熱心網友回復：
Dim i As Long
Dim s As String
Set pm = Conn.execute(" SELECT username, credits FROM pre_common_member order BY credits DESC ")
For i = 1 To 5
s = s & "第" & Mid$("一二三四五", i, 1) & "名" & pm("username") & "：" & pm("credits") & vbCrLf
Next
text1.Text = s
uj5u.com熱心網友回復：
想把五個人的資訊放在同一個text控制元件輸出?這樣會很難看.
想弄得整整齊齊也不是不行, 但是得花點心思在字串長度的拼接上面, 何不直接用表格控制元件或串列控制元件呢?
uj5u.com熱心網友回復：
感謝二樓，解決了 ！！！uj5u.com熱心網友回復：
不紅意思 好像還是不行。。。因為輸出的用戶名 都是 同樣的，積分也是一樣的。。uj5u.com熱心網友回復：
Next 前面加句 pm.MoveNextuj5u.com熱心網友回復：
謝謝 真贊，！！！！除了給分 還怎么給你好處！！ 。。。！！！買點零食給你好不好
qq 379666389
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/105147.html
標籤：VB基礎類
上一篇：Vb做局域網螢屏監控，求大神幫忙