Stap 3: Form Load
Deel uitmaken van de lader zijn het toevoegen van waarde aan de seriële poort en baudrate.
myPort = IO. Ports.SerialPort.GetPortNames()
ComboBox2.Items.Add(9600)
ComboBox2.Items.Add(19200)
ComboBox2.Items.Add(38400)
ComboBox2.Items.Add(57600)
ComboBox2.Items.Add(115200)
Voor i = 0 tot UBound(myPort)
ComboBox1.Items.Add(myPort(i))
Volgende
ComboBox1.Text = ComboBox1.Items.Item(0)
ComboBox2.Text = ComboBox2.Items.Item(0)
Button12.Enabled = False