关于SQL查询语句

Question

如上，我想将表格中“代码”列中前三位为“000”的所有行全部找出来，用SQL怎么写啊

Answer 1

select * from table where [代码] like '000%'

Answer 2

Private Sub Cmd1_Click()
    Dim i As Integer
    Dim s As String
   
    recset.Close        '关闭记录集
  s = "select * from 股票 where [代码] like '000%'"    Set recset = db.OpenRecordset(s)   '打开记录集
    
    Form1.MSHFlexGrid1.FormatString = "^序号|< 代   码 |< 名     称|<价 格|>货  币  资  金|>长  期  负  债|> 总   股   本 |>流 通 股 本|>净现金价值(总)|>净现金价值(流)|>倍  数|>备      注"
    
   Form1.MSHFlexGrid1.rows = 1
    
    For i = 1 To Form1.MSHFlexGrid1.rows - 1
           Form1.MSHFlexGrid1.TextMatrix(i, 0) = i
    Next
     
    i = 0
    With recset
        Do While Not .EOF
           i = i + 1
            Form1.MSHFlexGrid1.TextMatrix(i, 1) = !代码
            Form1.MSHFlexGrid1.TextMatrix(i, 2) = !名称
            Form1.MSHFlexGrid1.TextMatrix(i, 3) = !价格
            Form1.MSHFlexGrid1.TextMatrix(i, 4) = !货币资金
            Form1.MSHFlexGrid1.TextMatrix(i, 5) = !长期负债
           Form1.MSHFlexGrid1.TextMatrix(i, 6) = !总股本
            Form1.MSHFlexGrid1.TextMatrix(i, 7) = !流通股本
            Form1.MSHFlexGrid1.TextMatrix(i, 8) = !净现金价值总
            Form1.MSHFlexGrid1.TextMatrix(i, 9) = !净现金价值流
            Form1.MSHFlexGrid1.TextMatrix(i, 10) = !倍数
            Form1.MSHFlexGrid1.TextMatrix(i, 11) = !备注
           .MoveNext
        Loop
    End With
    
    Unload MeEnd Sub
那上面的代码为什么用不起来呢，哪边有问题啊？

Answer 3

MSHFlexGrid1填充数据有多种方式,你早贴出你的代码别人知道这么填充的才能对症下药
是吧?

Answer 4

DAO用：
select * from 股票 where [代码] like '000*'

Answer 5

Set MSHFlexGrid1.DataSource=recset

Answer 6

MSHFlexGrid1.rows =recset.RecordCount

Answer 7

s = "select * from 股票 where left([代码],3)='000'"

Answer 8

Mshflexgrid的行数不够，所以提示下标越界，建议你还是用msflexgrid替代mshflexgrid吧，直接set msflexgrid.datasource=recset 就可以了，
Form1.MSHFlexGrid1.FormatString
…………
Unload Me
这一段代码全部都可以删掉。

Answer 9

呵呵，我就是从msflexgrid换成mshflexgrid的，又要换过来啊

Answer 10

听说mshflexgrid功能强大，所以就用了，以后再换麻烦

Answer 11

换的话一点都不麻烦
mshflexgrid就是外观好看一些
但对于初学者来说使用起来很麻烦
另外mshflexgrid不能编辑

Answer 12

mshflexgrid和msflexgrid基本是一样的，只不过mshflexgrid可以与ADO的Recordset对象绑定而msflexgrid可以与DAO的RecordSet对象绑定，所以用ADO的基本都选用mshflexgrid用DAO的基本都选用msflexgrid，既然你用的是DAO那就应该选择msflexgrid而不是mshflexgrid

Answer 13

mshflexgrid可以与ADO的Recordset对象绑定=VB6使用的东西
msflexgrid可以与DAO的RecordSet对象绑定=VB5使用的东西.

Answer 14

mshflexgrid,msflexgrid
以上控件還不會用，
學習中；