查询SQL ,VB6.0.

界面上两个输入框，供输入查询范围。如下图是界面：第一个TxtPh1.Text，第二个TxtPh2.Text
其中数据库有个字段ph,也就是我按照它的范围查询的那个字段了。
它有如下一些数据080189
080190
080240
080301
080380
080401
080470
080501
080560
080601
080670
080701
080790
080801
0808100
0808101
080901
080981
081001
081204
081205
081206
081207
081208
081209
081210
100487
100490
100501
100601
100786
100801
100802
100803
100804
100805
100806
100807
100808
100809
100832
100833
100834
100835
100836
100837
100838
100839
100840
100841
101073
101085
101086
101087
101101
101102
101103
101104
101105
101106
101107
101108
101109
101110
101111
101112
101113
101199
1011100
1011101
1011102
1011105
1011106
101201
101214
101293
101294
101295
101296
101297
101298
101299
1012100
1012101
1012102
当我在输入框只输入前四位的时候能查出相应的数据，譬如1011，1012会查询出101101
101102
101103
101104
101105
101106
101107
101108
101109
101110
101111
101112
101113
101199
1011100
1011101
1011102
1011105
1011106
但是当我输入一个101201,10121114会查询到相应的(101201
101214
101293
101294
101295
101296
101297
101298
101299
1012100
1012101
1012102)
但是呢，这是在同一个相同的前四位，当我1011100,1012114会查询到（
1011100
1011101
1011102
1011105
1011106
101201
101214
101293
101294
101295
101296
101297
101298
101299
1012100
1012101
1012102
）
输入四位我解决了，但是因为我输入大于四位使用的select ph from ywjbxx,ywxxxx  where cast(replace(ph,'-','0') as int) >=" & Trim(Replace(TxtPh1.Text, "-", "0")) & "and cast(replace(ph,'-','0') as int)<=" & Trim(Replace(TxtPh2.Text, "-", "0")) & " and ph like '" & Left(Me.TxtPh1.Text, 4) & "%' 
使用了模糊查询，导致我只能在前四位必须相同的查询出来，第二个TEXTboX填写什么也是浪费，因为我这句不使用用模糊查询,在输入101201~1012114时候就会把08****的也查询出来，不知如何？