扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
datagrid不行，因为datagrid绑定数据库，因此不能添加一个附加行。即使在SQL命令中通过union方式进行统计后显示，但又会导致datagrid不能新增。解决办法有2个：1、用MSFlexGrid；2、自己写一个用户控件，大概意思就是里面有2个datagrid，一个大的，专门显示记录，一个小的，不要标题行，专门显示合计数；在里面增加写代码使它们水平同步滚动。
创新互联公司自2013年起，是专业互联网技术服务公司，拥有项目成都网站建设、成都做网站网站策划，项目实施与项目整合能力。我们以让每一个梦想脱颖而出为使命，1280元洪雅做网站,已为上家服务,为洪雅各地企业和个人服务,联系电话:028-86922220
VB中表格控件有很多，如MSFlexGrid，DataGrid，MSHFlexGrid等等
使用的多的是微软的FlexGrid控件。
通过菜单"Project" - "Components" - 勾上"Microsoft FlexGrid Control 6.0"进行选择。这个是包含在VS6 SP6安装包内的。
Dim str As String = "", temp, n As Integer
Dim str1 As String = "12,45,2,9,41,31,66,83,2,1,-9,-91,-21"
Dim a() As String = Split(str1, ",")
For i = 1 To UBound(a) Step 1
a(i) = Val(a(i))
Next
temp = 0
n = 0
For i = 1 To UBound(a)
If a(i) temp Then
temp = a(i)
End If
If a(i) 0 Then
n = n + 1
End If
Next
str = str "正数的个数为 " n
str = str "最大元素的下标为 "
For i = 1 To UBound(a)
If a(i) = temp Then
str = str i " "
End If
Next
TextBox6.Text = str
先把textbox的mutiline属性设为true，再在每个数后面加上一个vbCrlf就可以。
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
微信二维码
移动版官网