不知火舞的被虐|伊人天伊人天天综合网|博洛尼亚天气|任你懆这里只有精品4|久久美日韩精品久久|掌中之物漫画免费阅读观看|0丨d老妇

VB6.0中datagrid控件問題? 21

瀏覽:1577 回答:2
在VB.NET中為DataGridView控件,將3個(gè)列數(shù)組的值分別添加到DataGridView對(duì)應(yīng)的3列中代碼如下: Dim j As Integer         For i = 0 To row_number             DataGridView1.Rows.Add(aa(i), bb(i), cc(i))         Next 但是VB6.0中沒有DataGridView控件,只有 DataGrid控件,該如何實(shí)現(xiàn)相同的功能,即將3個(gè)列數(shù)組的值分別對(duì)應(yīng)輸入到DataGrid的3列中去?忘大佬指點(diǎn),不勝感激!!!
邀請(qǐng)回答 我來回答

全部回答

(1)
默認(rèn) 最新
段譽(yù)
VB6里,類似的控件叫 datagrid控件,需要通過菜單 [工程] -- [部件],勾選 Microdoft DataGrid Control 6.0 (SP6),完成添加到控件工具箱。 VB利用DataGrid控件顯示數(shù)據(jù)庫(kù)中數(shù)據(jù)信息,DataGrid在數(shù)據(jù)庫(kù)數(shù)據(jù)顯示的時(shí)候非常重要,它在用戶操作舒適度及數(shù)據(jù)排列方面有獨(dú)到之處,對(duì)于Vb數(shù)據(jù)庫(kù)編程的用戶來說,掌握DataGrid的使用是至關(guān)重要的事情。 參考實(shí)例如下: Public cnn As adodb.Connection Public rst As adodb.Recordset Public Sub setdb() Set cnn = New adodb.Connection cnn.Provider = "Microsoft.Jet.OLEDB.4.O" cnn.ConnectionString = "Data Source=" & App.Path & "\personal.mdb;" cnn.CursorLocation = adUseClient cnn.Open End Sub Private Sub Form_Load() On Error Resume Next Dim Strsql As String setdb Set DataGrid1.DataSource = Nothing Strsql = "select * from 備忘錄 order by 編號(hào)" Set rst = cnn.Execute(Strsql) If Err Then MsgBox "讀取數(shù)據(jù)失敗" Exit Sub End If If rst.EOF Then Set DataGrid1.DataSource = Nothing Else Set DataGrid1.DataSource = rst End If End Sub
2019年4月17日
評(píng)論 1 點(diǎn)贊

沒解決?試試專家一對(duì)一服務(wù)

換一批
    App下載
    技術(shù)鄰APP
    工程師必備
    • 項(xiàng)目客服
    • 培訓(xùn)客服
    • 平臺(tái)客服

    TOP