Question : Multi Line Coding in VB.Net for passing parameter

I want to break this Single line Parameter passing code in Multi line..

Multi line coding will be easier to understand and debug

1:

objBL.insReportDetails(txtFName.Text.Trim(), txtMIName.Text.Trim(), txtLName.Text.Trim(), Convert.ToInt32(txtSSN.Text), strAddress, txtCity.Text.Trim(), cmbState.SelectedValue.ToString(), Convert.ToInt32(txtZipCode.Text), txtDOB.Text, rbMale.Checked, Convert.ToInt32(txtHPhone.Text), Convert.ToInt32(txtCellPhone), Convert.ToInt32(txtWPhone.Text), strShipping, rdShipmentYes.Checked, txtEmail.Text.Trim(), txtDCity.Text.Trim(), Convert.ToInt32(txtDZipCode.Text), txtBestTimeToCall.Text.Trim(), rdMessageYes.Checked, rdPolicyYes.Checked, cmbTypeOfInsurance.SelectedValue.ToString(), txtPolicyHolderName.Text, txtRelationshipPolicyHolder.Text, Convert.ToDateTime(txtPolicyHolderDOB.Text), Convert.ToInt32(txtPolicySSN.Text), cmbPhy1.SelectedValue.ToString(), txtP1Phn.Text.Trim(), txtP1Fax.Text.Trim(), cmbPhy2.SelectedValue.ToString(), txtP2Phn.Text.Trim(), txtP2Fax.Text.Trim(), cmbPhy3.SelectedValue.ToString(), txtP3Phn.Text.Trim(), txtP3Fax.Text.Trim(), cmbCaseManagers.SelectedValue.ToString(), txtOrganization.Text.Trim(), Convert.ToInt32(txtCPhoneNumber.Text), txtReferredBy.Text.Trim(), txtRefRelationship.Text.Trim(), Convert.ToInt32(txtRelationshipPhoneNumber.Text))

Answer : Multi Line Coding in VB.Net for passing parameter

Try this:

       objBL.insReportDetails(txtFName.Text.Trim(), txtMIName.Text.Trim(), txtLName.Text.Trim(),
                              Convert.ToInt32(txtSSN.Text), strAddress, txtCity.Text.Trim(),
                              cmbState.SelectedValue.ToString(), Convert.ToInt32(txtZipCode.Text),
                              txtDOB.Text, rbMale.Checked, Convert.ToInt32(txtHPhone.Text),
                              Convert.ToInt32(txtCellPhone), Convert.ToInt32(txtWPhone.Text),
                              strShipping, rdShipmentYes.Checked, txtEmail.Text.Trim(), txtDCity.Text.Trim(),
                              Convert.ToInt32(txtDZipCode.Text), txtBestTimeToCall.Text.Trim(),
                              rdMessageYes.Checked, rdPolicyYes.Checked, cmbTypeOfInsurance.SelectedValue.ToString(),
                              txtPolicyHolderName.Text, txtRelationshipPolicyHolder.Text,
                              Convert.ToDateTime(txtPolicyHolderDOB.Text), Convert.ToInt32(txtPolicySSN.Text),
                              cmbPhy1.SelectedValue.ToString(), txtP1Phn.Text.Trim(), txtP1Fax.Text.Trim(),
                              cmbPhy2.SelectedValue.ToString(), txtP2Phn.Text.Trim(), txtP2Fax.Text.Trim(),
                              cmbPhy3.SelectedValue.ToString(), txtP3Phn.Text.Trim(), txtP3Fax.Text.Trim(),
                              cmbCaseManagers.SelectedValue.ToString(), txtOrganization.Text.Trim(),
                              Convert.ToInt32(txtCPhoneNumber.Text), txtReferredBy.Text.Trim(),
                              txtRefRelationship.Text.Trim(), Convert.ToInt32(txtRelationshipPhoneNumber.Text))


Or

       objBL.insReportDetails(txtFName.Text.Trim(), txtMIName.Text.Trim(), txtLName.Text.Trim(), _
                              Convert.ToInt32(txtSSN.Text), strAddress, txtCity.Text.Trim(), _
                              cmbState.SelectedValue.ToString(), Convert.ToInt32(txtZipCode.Text), _
                              txtDOB.Text, rbMale.Checked, Convert.ToInt32(txtHPhone.Text), _
                              Convert.ToInt32(txtCellPhone), Convert.ToInt32(txtWPhone.Text), _
                              strShipping, rdShipmentYes.Checked, txtEmail.Text.Trim(), txtDCity.Text.Trim(), _
                              Convert.ToInt32(txtDZipCode.Text), txtBestTimeToCall.Text.Trim(), _
                              rdMessageYes.Checked, rdPolicyYes.Checked, cmbTypeOfInsurance.SelectedValue.ToString(), _
                              txtPolicyHolderName.Text, txtRelationshipPolicyHolder.Text, _
                              Convert.ToDateTime(txtPolicyHolderDOB.Text), Convert.ToInt32(txtPolicySSN.Text), _
                              cmbPhy1.SelectedValue.ToString(), txtP1Phn.Text.Trim(), txtP1Fax.Text.Trim(), _
                              cmbPhy2.SelectedValue.ToString(), txtP2Phn.Text.Trim(), txtP2Fax.Text.Trim(), _
                              cmbPhy3.SelectedValue.ToString(), txtP3Phn.Text.Trim(), txtP3Fax.Text.Trim(), _
                              cmbCaseManagers.SelectedValue.ToString(), txtOrganization.Text.Trim(), _
                              Convert.ToInt32(txtCPhoneNumber.Text), txtReferredBy.Text.Trim(), _
                              txtRefRelationship.Text.Trim(), Convert.ToInt32(txtRelationshipPhoneNumber.Text))