Thanks Ninja and bledu for your suggestions!

I tried this

dr.appt_time = DirectCast(System.DBNull.Value, DateTime)

and got error:  Invalid cast exception

What am I doing wrong here?

I have the column defined as nullable.  I tried the following:

dr.appt_time = System.DBNull.Value

and get intellisense msg -- Value of type System.DBNull cannot be converted to date.

dr.appt_time = System.DBNull...

Yep, that works fine.  I can now save the time, but not without 1/1/1900 in front of it.  Thanks for your help!

Dim MyTime As DateTime

Before MyTime is populated it is #12:00:00 AM#

After the line of code:

MyTime = CDate(Now().ToShortTimeString)

it...

Yes, it is a datetime field, a dataset datarow. 

Your code above works, however, the row is not being saved to the database. 

I'm getting the following error:  SQLDateTimeOverflow.  Must be between 1/1/1753...

The following code isn't working, meaning no record is saved to the database:

dr.rec_checkin_time = Now().ToShortTimeString

This doesn't work either:

dr.rec_checkin_time = CType(Now().ToShortTimeString, DateTime)

And...