Private Sub DataGrid1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs)
Dim t As DataTable
    Dim rc As Integer
    Dim r As DataRow
        rc = DataGrid1.CurrentRowIndex
        getemp (rc)
    End Sub

a messagebox appear that show user-defined type not defined
i had try another code but it still same error.. i'm using vb6

>a messagebox appear that show user-defined type not defined

Please be more specific about your problem. Post error message (trace).

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.