interface.bas

来自「步进电机控制程序」· BAS 代码 · 共 15 行

Attribute VB_Name = "interface"
Option Explicit

Sub getConfigParameters()
    
    With frmSettings
        startFQ = .txtStartFQ.Text
        patrolFQ = .txtPatrolFQ.Text
        accDura = .txtAccDura.Text
        decDura = .txtDecDura.Text
        FQSubdiv = .txtFQSubdiv.Text
    End With
    
End Sub