JJFlexRadio/CMDLine.vb at main · KevinSShaffer/JJFlexRadio · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Imports Escapes
Imports JJTrace

''' <summary>
''' for sending a command to the radio manually
''' </summary>
Friend Class CMDLine
    Friend Buffer As String

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OKButton.Click
        Buffer = Escapes.Escapes.Encode(TextBox1.Text)
        Tracing.TraceLine("cmdline:" & Escapes.Escapes.Decode(Buffer), TraceLevel.Info)
        DialogResult = DialogResult.OK
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CnclButton.Click
        DialogResult = DialogResult.Cancel
    End Sub

    Private Sub CMDLine_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        TextBox1.Text = ""
    End Sub
End Class