CREATE CURSOR 数据表 (选择 L, 区号 c(10), 城市 c(10) )
INSERT INTO 数据表 VALUES (.T.,'021','上海')
INSERT INTO 数据表 VALUES (.F.,'010','北京')
INSERT INTO 数据表 VALUES (.T.,'020','广州')
GO TOP
BROWSE NAME GrdCur NOWAIT
GrdCur.column1.width = 50
GrdCur.column2.width = 100
GrdCur.column3.width = 100
GrdCur....
a=1234.567800
a=alltrim(padl(a,20," ")) &&VFP中数值型数据有效长度不会超过20位
? "整数位数:",len(JUSTSTEM(a))
? "小数位数:",len(JUSTEXT(a))