.NET (Core and Framework)

Public Sub CommPortSetup()
 
        If mySerialPort.IsOpen Then
            mySerialPort.Close()
 
        End If
 
        Try
            With mySerialPort
                .PortName = "COM1"
                .BaudRate = 115200
                .DataBits = 8
                .Parity = Parity.None
                .StopBits = StopBits.One
                .Handshake = Handshake.None
                .DtrEnable = True
                .RtsEnable = True
                .NewLine = vbCrLf
            End With
            mySerialPort.Open()
            MessageBox.Show("Connected to COMMPORT1")
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
 
        mySerialPort.WriteLine("AT+CMGF=1" & vbCrLf)
        System.Threading.Thread.Sleep(200)
        mySerialPort.WriteLine("AT+CMGS=+6390720831187" & vbCrLf)
        System.Threading.Thread.Sleep(200)
        mySerialPort.WriteLine("SUCCESS!" & vbCrLf )
        System.Threading.Thread.Sleep(200)
 

 

 

    End Sub
 
End Module

If savRequestData.PropRequestWage IsNot Nothing Then
                               wagesegment = New List(Of ReqWage)
                               For Each temp In savRequestData.PropRequestWage
                                   Dim wage As New ReqWage
                                   wage.DailyWage = IIf(Not String.IsNullOrEmpty(temp.DailyWage), IIf(Decimal.TryParse(temp.DailyWage, tempDecimal), tempDecimal, CType(Nothing, System.Nullable(Of Decimal))), CType(Nothing, System.Nullable(Of Decimal)))
                                   wage.RequestId = request_Id
                                   wage.WorkDate = temp.WorkDate
                                   wage.WorkHours = IIf(Not String.IsNullOrEmpty(temp.WorkHours), IIf(Decimal.TryParse(temp.WorkHours, tempDecimal), tempDecimal, CType(Nothing, System.Nullable(Of Decimal))), CType(Nothing, System.Nullable(Of Decimal)))
                                   wagesegment.Add(wage)
                                   requestedamount += IIf(temp.DailyWage IsNot Nothing, temp.DailyWage, 0)
                               Next
                            End If

static public int boxCount = 0;
static public TextBox[] tbox = new TextBox[16];
private void Form1_Load(object sender, EventArgs e)
{
 tbox[0] = textBox1;
 tbox[1] = textBox2;
 tbox[2] = textBox3;
 boxCount = 3;
}

private void loadBoxes()
{
 for (int x = 0; x < boxCount; x++)
 {
  if (tbox[x].Text == "")
   tbox[x].Text = "0";
 }
}