vb如何在form中显示表格

从excel读取了二维数组,如何在form中用表格的形式显示出来。
2024-12-29 17:05:56
推荐回答(3个)
回答1:

用 FlexGrid 网格控件好了。

我给你个例子;

方法,在VB6里,使用菜单,[工程] -- [部件],勾选  Microsoft FlexGrid Control 6.0 (SP6)

该控件图标出现在工具箱里,添加1个到你的窗体上,再添加一个按钮;

界面如下:


编写代码如下:

Option Explicit

Private Sub Command1_Click()

Dim d(5, 5) As Integer

Dim i As Integer

Dim j As Integer

'用随机函数生成二维数组数据

For i = 1 To 5

   For j = 1 To 5

      d(i, j) = Int(Rnd * 99) + 1

   Next j

Next i

'设置网格控件的行列

MSFlexGrid1.Cols = 6

MSFlexGrid1.Rows = 6

'在网格控件里显示二维数组数据

For i = 1 To 5

   MSFlexGrid1.Col = i

   For j = 1 To 5

      MSFlexGrid1.Row = j

      MSFlexGrid1.Text = d(i, j)

   Next j

Next i

End Sub


运行程序,单击按钮。

回答2:

VB中表格控件有很多,如MSFlexGrid,DataGrid,MSHFlexGrid等等

使用的多的是微软的FlexGrid控件。
通过菜单"Project" -> "Components" -> 勾上"Microsoft FlexGrid Control 6.0"进行选择。这个是包含在VS6 SP6安装包内的。

回答3:

窗体放数据控件,把数组写到控件里。