module1.bas

来自「计算方法的VB程序」· BAS 代码 · 共 14 行

Attribute VB_Name = "Module1"
Public Const Pre = 0.00001
Public Const MAX = 100
Public A(MAX, MAX) As Double
Public L(MAX, MAX) As Double
Public U(MAX, MAX) As Double
Public T As Integer
Public tm As Double
Public w1 As Integer
Sub Main()
Form1.Show
Form2.Hide
End Sub