你可以按表的字段寬度來設(shè)置datagrid的寬度,這個應(yīng)該比較好些。
創(chuàng)新互聯(lián)建站是一家網(wǎng)站設(shè)計公司,集創(chuàng)意、互聯(lián)網(wǎng)應(yīng)用、軟件技術(shù)為一體的創(chuàng)意網(wǎng)站建設(shè)服務(wù)商,主營產(chǎn)品:響應(yīng)式網(wǎng)站開發(fā)、成都品牌網(wǎng)站建設(shè)、成都全網(wǎng)營銷。我們專注企業(yè)品牌在網(wǎng)站中的整體樹立,網(wǎng)絡(luò)互動的體驗,以及在手機等移動端的優(yōu)質(zhì)呈現(xiàn)。成都網(wǎng)站設(shè)計、網(wǎng)站制作、移動互聯(lián)產(chǎn)品、網(wǎng)絡(luò)運營、VI設(shè)計、云產(chǎn)品.運維為核心業(yè)務(wù)。為用戶提供一站式解決方案,我們深知市場的競爭激烈,認(rèn)真對待每位客戶,為客戶提供賞析悅目的作品,網(wǎng)站的價值服務(wù)。
設(shè)置列寬的代碼,如:
datagrid1.columns("fieldname").width
=
youvalue
這時動態(tài)調(diào)整列寬的代碼,可以根據(jù)表格中的文字寬度自動調(diào)整,數(shù)據(jù)顯示表 就是你說的
mshflexgrid控件,至于行高,用屬性RowHeight即可,代碼形式是一樣的
Private Sub 數(shù)據(jù)顯示表_Click()
數(shù)據(jù)顯示表.ColWidth(數(shù)據(jù)顯示表.Col) = TextWidth(數(shù)據(jù)顯示表.Text) + 120
End Sub
建一個文件,把格式都搞好,然后導(dǎo)出時用 workbooks.add(path)
再填寫數(shù)據(jù),這樣格式現(xiàn)成的了,
還有一個方法,錄個宏,格式刷,擋刷的代碼試試.
DataGridView控件,放一個DataGridView1和Button1到窗體,下面是按鈕下代碼\x0d\x0a Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click\x0d\x0a Me.DataGridView1.AllowUserToAddRows = False\x0d\x0a DataGridView1.RowTemplate.Height = 200\x0d\x0a DataGridView1.AutoSizeRowsMode = DataGridViewAutoSizeRowsMode.None\x0d\x0a For i = 1 To 3\x0d\x0a Me.DataGridView1.Columns.Add("列" i.ToString, "列" i.ToString)\x0d\x0a Me.DataGridView1.Rows.Add()\x0d\x0a Next\x0d\x0a Me.DataGridView1.Columns(0).Width = 100\x0d\x0a Me.DataGridView1.Columns(1).Width = 500\x0d\x0a Me.DataGridView1.Columns(0).Width = 300\x0d\x0a End Sub\x0d\x0a'自己設(shè)置相關(guān)需要的屬性即可