vb msflexgrid1 循环查找
发布网友
发布时间:2023-09-01 02:47
我来回答
共1个回答
热心网友
时间:2023-12-07 18:11
循环查询自己写把,没什么难度。
msflexgrid1 添加内容如下:
Private Sub Command1_Click()
MSFlexGrid1.AddItem Rnd * 100 & vbTab & Rnd * 100 & vbTab & Rnd * 100
End Sub
Private Sub Form_Load()
MSFlexGrid1.FixedCols = 0
MSFlexGrid1.FixedRows = 1
MSFlexGrid1.Cols = 3
MSFlexGrid1.Rows = 1
MSFlexGrid1.FormatString = " a " & vbTab & " b " & vbTab & " c "
End Sub追问代码出错,请至以下网址看我的追问。
http://zhidao.baidu.com/question/1495518284004874859.html
热心网友
时间:2023-12-07 18:11
循环查询自己写把,没什么难度。
msflexgrid1 添加内容如下:
Private Sub Command1_Click()
MSFlexGrid1.AddItem Rnd * 100 & vbTab & Rnd * 100 & vbTab & Rnd * 100
End Sub
Private Sub Form_Load()
MSFlexGrid1.FixedCols = 0
MSFlexGrid1.FixedRows = 1
MSFlexGrid1.Cols = 3
MSFlexGrid1.Rows = 1
MSFlexGrid1.FormatString = " a " & vbTab & " b " & vbTab & " c "
End Sub追问代码出错,请至以下网址看我的追问。
http://zhidao.baidu.com/question/1495518284004874859.html
热心网友
时间:2023-12-07 18:12
循环查询自己写把,没什么难度。
msflexgrid1 添加内容如下:
Private Sub Command1_Click()
MSFlexGrid1.AddItem Rnd * 100 & vbTab & Rnd * 100 & vbTab & Rnd * 100
End Sub
Private Sub Form_Load()
MSFlexGrid1.FixedCols = 0
MSFlexGrid1.FixedRows = 1
MSFlexGrid1.Cols = 3
MSFlexGrid1.Rows = 1
MSFlexGrid1.FormatString = " a " & vbTab & " b " & vbTab & " c "
End Sub追问代码出错,请至以下网址看我的追问。
http://zhidao.baidu.com/question/1495518284004874859.html
热心网友
时间:2023-12-07 18:12
循环查询自己写把,没什么难度。
msflexgrid1 添加内容如下:
Private Sub Command1_Click()
MSFlexGrid1.AddItem Rnd * 100 & vbTab & Rnd * 100 & vbTab & Rnd * 100
End Sub
Private Sub Form_Load()
MSFlexGrid1.FixedCols = 0
MSFlexGrid1.FixedRows = 1
MSFlexGrid1.Cols = 3
MSFlexGrid1.Rows = 1
MSFlexGrid1.FormatString = " a " & vbTab & " b " & vbTab & " c "
End Sub追问代码出错,请至以下网址看我的追问。
http://zhidao.baidu.com/question/1495518284004874859.html