【文件属性】:
文件名称:浮动水平线算法绘制网格表面.rar
文件大小:25KB
文件格式:RAR
更新时间:2013-11-18 09:14:30
绘制网格
VB
'InNum-ÊäÈëÊý,nDec-СÊýλÊý,nWidth-¿í¶È,IC-×óÓÒ¶ÔÆë±êÖ¾,OutStr-Êä³ö×Ö·û´®
Public Function Formats(InNum As Variant, cFormat As String) As String
Dim I As Integer
I = Len(cFormat)
Formats = Format(InNum, cFormat)
If (Len(Formats) < I) Then Formats = Space(I - Len(Formats)) + Formats
End Function
【文件预览】:
浮动水平线算法绘制网格表面程序(vb)
----Surface.exe(32KB)
----Surface.vbw(86B)
----MSSCCPRJ.SCC(194B)
----fSurface.frm(7KB)
----Surface.vbp(637B)
----Surfaces.bas(14KB)
----MAPSURFACE.GRD(36KB)