📄 mainform.frm
字号:
VERSION 5.00
Object = "{6B7E6392-850A-101B-AFC0-4210102A8DA7}#1.3#0"; "COMCTL32.OCX"
Object = "{148188FB-A6D9-48BC-AE37-65786376CD8E}#1.0#0"; "VAXSIP~1.OCX"
Begin VB.Form MainForm
BorderStyle = 1 'Fixed Single
Caption = "VaxSIPUserAgent Visual Basic Sample code [www.vaxvoip.com]"
ClientHeight = 7920
ClientLeft = 45
ClientTop = 330
ClientWidth = 11865
BeginProperty Font
Name = "Verdana"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
LinkTopic = "Form1"
MaxButton = 0 'False
ScaleHeight = 7920
ScaleWidth = 11865
StartUpPosition = 3 'Windows Default
Begin VB.CheckBox CheckStartConf
Caption = "Start Conference"
Height = 375
Left = 2520
TabIndex = 84
Top = 2160
Width = 1815
End
Begin VB.Frame Frame11
Caption = " Multiple Lines "
Height = 2055
Left = 120
TabIndex = 82
Top = 2160
Width = 2295
Begin VB.ListBox ListLines
Height = 1620
Left = 120
TabIndex = 83
Top = 240
Width = 2055
End
End
Begin ComctlLib.ProgressBar SpkProgress
Height = 255
Left = 8640
TabIndex = 74
Top = 6480
Width = 2895
_ExtentX = 5106
_ExtentY = 450
_Version = 327682
Appearance = 1
End
Begin VB.Frame Frame12
Caption = " Sound Device(s) "
Height = 1815
Left = 8400
TabIndex = 73
Top = 120
Width = 3375
Begin VB.ComboBox ComboAudioIn
Height = 315
Left = 480
Style = 2 'Dropdown List
TabIndex = 86
Top = 1200
Width = 2295
End
Begin VB.ComboBox ComboAudioOut
Height = 315
Left = 480
Style = 2 'Dropdown List
TabIndex = 85
Top = 480
Width = 2295
End
Begin VB.Label Label6
Caption = "Audio In"
Height = 255
Left = 2040
TabIndex = 88
Top = 960
Width = 735
End
Begin VB.Label Label5
Caption = "Audio Out"
Height = 255
Left = 1800
TabIndex = 87
Top = 240
Width = 975
End
End
Begin VB.Frame Frame10
Height = 1335
Left = 2520
TabIndex = 66
Top = 2520
Width = 2535
Begin VB.CommandButton BtnTransferCall
Caption = "Transfer Line"
Height = 375
Left = 960
TabIndex = 68
Top = 840
Width = 1455
End
Begin VB.TextBox EditTransferPhoneNo
Height = 315
Left = 120
TabIndex = 67
Top = 480
Width = 2295
End
Begin VB.Label Label14
Caption = "Phone No:"
Height = 255
Left = 120
TabIndex = 69
Top = 240
Width = 975
End
End
Begin VB.Frame Frame9
Caption = "Play wave (.wav)"
Height = 1695
Left = 5160
TabIndex = 53
Top = 6120
Width = 3135
Begin VB.CommandButton BtnPlayStop
Caption = "*"
Height = 375
Left = 1920
TabIndex = 62
Top = 1080
Width = 495
End
Begin VB.CommandButton BtnPlayPause
Caption = "||"
Height = 375
Left = 2520
TabIndex = 61
Top = 1080
Width = 495
End
Begin VB.CommandButton BtnPlayForward
Caption = ">>"
Height = 375
Left = 720
TabIndex = 60
Top = 1080
Width = 495
End
Begin VB.CommandButton BtnPlayRewind
Caption = "<<"
Height = 375
Left = 120
TabIndex = 59
Top = 1080
Width = 495
End
Begin VB.CommandButton BtnStartPlay
Caption = ">"
Height = 375
Left = 1320
TabIndex = 58
Top = 1080
Width = 495
End
Begin VB.TextBox EditPlayFileName
Height = 315
Left = 120
TabIndex = 56
Top = 600
Width = 1815
End
Begin VB.CommandButton BtnSetPlayFile
Caption = "Set"
Height = 375
Left = 2160
TabIndex = 55
Top = 600
Width = 855
End
Begin VB.CheckBox CheckPlayListen
Caption = "Listen"
Height = 255
Left = 2160
TabIndex = 54
Top = 240
Width = 855
End
Begin VB.Label Label9
Caption = "File (.wav)"
Height = 255
Left = 120
TabIndex = 57
Top = 240
Width = 975
End
End
Begin VB.Frame Frame7
Caption = "Help"
Height = 1935
Left = 5160
TabIndex = 41
Top = 120
Width = 3135
Begin VB.CommandButton BtnHelpMore
Caption = "More"
Height = 345
Left = 2040
TabIndex = 64
Top = 1320
Width = 975
End
Begin VB.Label Label21
Caption = "- Click Online button."
Height = 255
Left = 120
TabIndex = 80
Top = 1440
Width = 1815
End
Begin VB.Label Label20
Caption = "provided."
Height = 255
Left = 240
TabIndex = 79
Top = 1080
Width = 855
End
Begin VB.Label Label19
Caption = "Display-Name blank if not"
Height = 255
Left = 240
TabIndex = 78
Top = 840
Width = 2655
End
Begin VB.Label Label12
Caption = "- Leave Outbound-Proxy and/or"
Height = 255
Left = 120
TabIndex = 77
Top = 600
Width = 2895
End
Begin VB.Label Label11
Caption = "- Enter SIP account settings."
Height = 255
Left = 120
TabIndex = 63
Top = 240
Width = 2535
End
End
Begin VB.Frame Frame6
Caption = " Supported Voice Codecs "
Height = 855
Left = 5160
TabIndex = 40
Top = 3600
Width = 3135
Begin VB.CheckBox CheckG711U
Caption = "G711 U-LAW"
Height = 255
Left = 1440
TabIndex = 49
Top = 480
Value = 1 'Checked
Width = 1455
End
Begin VB.CheckBox CheckG711A
Caption = "G711 A-LAW"
Height = 255
Left = 1440
TabIndex = 48
Top = 240
Value = 1 'Checked
Width = 1455
End
Begin VB.CheckBox CheckiLBC
Caption = "iLBC"
Height = 255
Left = 120
TabIndex = 47
Top = 480
Value = 1 'Checked
Width = 855
End
Begin VB.CheckBox CheckGSM610
Caption = "GSM 6.10"
Height = 255
Left = 120
TabIndex = 46
Top = 240
Value = 1 'Checked
Width = 1215
End
End
Begin VB.Frame Frame5
Caption = " Other Settings "
Height = 1335
Left = 5160
TabIndex = 39
Top = 2160
Width = 3135
Begin VB.Timer TimerTick
Enabled = 0 'False
Interval = 1000
Left = 2520
Top = 720
End
Begin VB.CheckBox CheckAGC
Caption = "AGC (Auto Gain Control)"
Height = 255
Left = 120
TabIndex = 65
Top = 480
Width = 2535
End
Begin VB.CheckBox CheckDisturb
Caption = "Don't disturb"
Height = 255
Left = 120
TabIndex = 52
Top = 960
Width = 1455
End
Begin VB.CheckBox CheckMicBoost
Caption = "Mic Boost"
Height = 255
Left = 120
TabIndex = 51
Top = 720
Width = 2415
End
Begin VB.CheckBox CheckEchoCancel
Caption = "Echo/Noise Cancellation"
Height = 255
Left = 120
TabIndex = 50
Top = 240
Value = 1 'Checked
Width = 2415
End
End
Begin VB.Frame Frame4
Caption = "Conversation Recording"
Height = 1455
Left = 5160
TabIndex = 33
Top = 4560
Width = 3135
Begin VB.CheckBox CheckStartRecording
Caption = "Start Record"
Height = 255
Left = 120
TabIndex = 37
Top = 360
Width = 1455
End
Begin VB.CommandButton BtnResetRecordingBuffer
Caption = "Reset"
Height = 495
Left = 2280
TabIndex = 36
Top = 240
Width = 735
End
Begin VB.TextBox EditSaveFileName
Height = 315
Left = 120
TabIndex = 35
Top = 960
Width = 2055
End
Begin VB.CommandButton BtnSaveToWaveFile
Caption = "Save"
Height = 495
Left = 2280
TabIndex = 34
Top = 840
Width = 735
End
Begin VB.Label Label17
Caption = "File (.wav)"
Height = 255
Left = 120
TabIndex = 38
Top = 720
Width = 975
End
End
Begin VB.Frame Frame8
Caption = " Volume"
Height = 2055
Left = 8400
TabIndex = 27
Top = 5760
Width = 3375
Begin VB.Timer TimerProgressBar
Interval = 20
Left = 1440
Top = 960
End
Begin VB.CheckBox CheckSpkMute
Caption = "Mute"
Height = 255
Left = 2400
TabIndex = 29
Top = 240
Width = 735
End
Begin VB.CheckBox CheckMuteMic
Caption = "Mute"
Height = 255
Left = 2400
TabIndex = 28
Top = 1200
Width = 735
End
Begin ComctlLib.Slider SliderSpkVol
Height = 255
Left = 120
TabIndex = 30
Top = 480
Width = 3015
_ExtentX = 5318
_ExtentY = 450
_Version = 327682
TickStyle = 3
TickFrequency = 10
End
Begin ComctlLib.ProgressBar MicProgress
Height = 255
Left = 240
TabIndex = 90
Top = 1680
Width = 2895
_ExtentX = 5106
_ExtentY = 450
_Version = 327682
Appearance = 1
End
Begin ComctlLib.Slider SliderMicVol
Height = 255
Left = 120
TabIndex = 91
Top = 1440
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -