cIndicatorx = "1234567" Using conn As New MySqlConnection(myConnectionString) Using comm As New MySqlCommand("SELECT COUNT(Sequenza) FROM SeqFam1_20_60 WHERE Sequenza LIKE @SeqToFind", conn) comm.Parameters.AddWithValue("SeqToFind", cIndicatorx & "%") conn.Open() Dim count As Integer = comm.ExecuteScalar() conn.Close() Return (count > 0) End Using End Using
GCHandle handle = GCHandle.Alloc(person_1, GCHandleType.Pinned); IntPtr address = handle.AddrOfPinnedObject();
handle.Free();