Visual Basic

Mohammed Amine wrote:

in the first time you use your programme it is a normal thing that you the database you work in is empty that mean it has no rocords yet , & that also mean that you will recuperate just emptiness & this throws a debuguage
i want to know how to act with this case what is the code i should add to ma application to stop this bug ??

Billypon wrote:

I dont't want anyone close my process

Dim result As New DialogResult<br />
        result = MessageBox.Show("Are you sure?", "Confirm", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button2)<br />
        Select Case result<br />
            Case Windows.Forms.DialogResult.Yes<br />
                'Code for Yes action<br />
            Case Windows.Forms.DialogResult.No<br />
                'Code for No action<br />
        End Select

Private boolChanged As Boolean

Private Sub Form_Load()
    boolChanged = False
End Sub

Private Sub btnSubmit_Click()
    Dim result As VbMsgBoxResult
    If boolChanged = True Then
        result = MsgBox("Are you sure?", vbYesNo, "Confirm")
        Select Case result
            Case VbMsgBoxResult.vbYes
                'Code if user selects Yes
            Case VbMsgBoxResult.vbNo
                'Code if user selects No
        End Select
        Exit Sub
    End If
    'Code if no changes were made to check boxes
   End Sub

Private Sub Check1_Click()
    boolChanged = True
End Sub

Private Sub Check2_Click()
    boolChanged = True
End Sub

function CheckIfChanged()<br />
{<br />
   //Check if checkbox has changed<br />
   if (hidChanged.value <> "")<br />
   {<br />
      Result = confirm("Are you sure?");<br />
      if (Result) //The user selected "Yes"<br />
      {<br />
         form1.hidResult.value = "Y";<br />
         return true;<br />
      }else{	//The user selected "Cancel"<br />
         form1.hidResult.value = "";<br />
         return false;<br />
      }	<br />
   }<br />
}