易截截图软件、单文件、免安装、纯绿色、仅160KB

vb msflexgrid控件怎么样连sql2005数据库

谢谢
有没有高手大哥教教俺啊


引用
之前给别人写了个例子:
VB codeDim cnnAsNew ADODB.Connection
    cnn.ConnectionString="PROVIDER=MSDASQL;DRIVER={SQL Server};SERVER=192.168.1.100;DATABASE=database1;UID=sa;PWD=123"If cnn.State <> ADODB.ObjectStateEnum.adStateClosedThen cnn.Close
    cnn.OpenDim RsAs ADODB.RecordsetSet Rs=New ADODB.RecordsetWith RsSet .ActiveConnection= cnn
        .CursorLocation= adUseClient
        .CursorType= adOpenKeyset
        .LockType= adLockOptimistic
        .Open"SELECT good_code,customer,sum(price*amount)/sum(amount) AS avg_price from sales GROUP BY good_code,customer"If .RecordCount>0Then
            MSFlexGrid1.Clear
            MSFlexGrid1.Cols=3
            MSFlexGrid1.Rows= .RecordCount+1
            MSFlexGrid1.TextMatrix(0,0)="商品编号"
            MSFlexGrid1.TextMatrix(0,1)="顾客名称"
            MSFlexGrid1.TextMatrix(0,2)="平均价格"

            .MoveLast: .MoveFirstFor i=1To .RecordCount
   


相关问答：

请教sql语句。 - Oracle / 开发

我有一个表，结构是这样。
  转出 单位 转入单位 笔数 金额
date(主) outid(主) inid(主) num amt
2009 1 2 1 500 为 1 单位 在2009� ......

vb中如何实现对象属性的动态设置 - VB / 基础类

本人使用的是VB6.0版本
假设有一个对象A，A内有类型为B的对象属性。现在的问题是，需要添加若干个B对象作为A对象的属性。如，
 A.B1,A.B2,...
但具体添加多少个B对象作为A对象的属性则视具体情况不同而不同 ......

vb可以这样做不？ - VB / 非技术类

可以吗
好奇怪的题目额！！

可以告诉我们你到底想问什么 ？

2分给我的话就可以。

........................可以吗

可以!


  纠结，

29. vb可以这样做不？ ( H )√
 A. ......

VB怎样获得鼠标处的超级连接 - VB / 基础类

VB怎样获得鼠标处的超级连接呢？
  在WebBrowser控件中有这样一个事件:StatusTextChange(index As Integer, ByVal Text As String)
  它的Text参数正是鼠标处的超级连接,但问题是如果我的浏览器正� ......

vb的类中使用自定义类型数据的问题 - VB / 基础类


我在类中有一个函数
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfig是我自定义类型的数据，为什么会提示“只有在公共对象模块中� ......
© 2009 ej38.com All Rights Reserved. 关于E健网 | 联系我们 | 站点地图 | 赣ICP备09004571号