testmoduel.bas

一个VB编写的

Attribute VB_Name = "TestModuel"
Option Explicit

'*******************************
'* 僩儖僋偍傛傃掞峈抣憠嬰掅
'*******************************

Public Test_Flag As Integer     '摦嶌棳傟僼儔僌

Public TrqPPeek As Single       '僩儖僋抣亄僺乕僋
Public TrqMPeek As Single       '僩儖僋抣亅僺乕僋
Public Resistance As Single         '掞峈抣
Public TWk As Integer           '帪娫懸偪