Visual Basic

Private Sub Form_Load()
    MsgBox "Hi !"
    Unload Me
End Sub

Public Structure InputData
   Dim arg1 As type_name
   Dim arg2 As type_name
   Dim arg3 As type_name

End Structure

Public Function GetInput() as InputData
   Dim userResponse as InputData

   'Get your input here
   .
   .
   .
   'assign each pice of input to your structure members
   userResponse.arg1 = inputValue1
   userResponse.arg2 = inputValue2
   userResponse.arg3 = inputValue3

   'return your data from the function
   Return userResponse

Dim returnData as InputData
returnData = GetInput()

Public Sub WriteDataToDB(inData As InputData)
   'open the DB
   'write each value to the DB
   'you access each argument by the following
   inData.arg1
   inData.arg2
   inData.arg3
   .
   .
   .
End Sub

You may want to think about using a parameterized query to pass the values into your SQL statement. Using the SQL Server data provider, it would look something like this:

<br />
Dim sql As String = "INSERT INTO Test (lname) VALUES (@LastName);"<br />
Dim cn As New SqlConnection(cnString)<br />
Dim cmd As New SqlCommand(sql, cn)<br />
cmd.Parameters.Add("@LastName", SqlDbType.VarChar).Value = Me.TextBox2.Text<br />
cn.Open()<br />
cmd.ExecuteNonQuery()<br />
cn.Close()<br />

Doing it this way will save you the trouble of replacing characters in each input field and will help protect against some forms of SQL Injection attacks. However, it won't get you out of validating input for other constraints such as length, etc.

Hope that helps!