vb.net记录时间戳1，延时1000ms，记录时间戳2，获得两时间戳时间间隔

可以使用 `DateTime.Now` 方法记录时间戳，并使用 `Thread.Sleep` 方法来延时，最后计算两时间戳的时间间隔。以下是示例代码：

Dim timestamp1 As DateTime = DateTime.Now ' 记录时间戳1
Thread.Sleep(1000) ' 延时1000ms
Dim timestamp2 As DateTime = DateTime.Now ' 记录时间戳2
Dim timespan As TimeSpan = timestamp2 - timestamp1 ' 计算时间间隔
Dim milliseconds As Integer = CInt(timespan.TotalMilliseconds) ' 将时间间隔转换为毫秒数

其中，`timestamp1` 和 `timestamp2` 都是 `DateTime` 类型的变量，表示两个时间戳。`Thread.Sleep(1000)` 表示延时1000毫秒，即1秒钟。`timespan` 是 `TimeSpan` 类型的变量，表示两个时间戳之间的时间间隔。`timespan.TotalMilliseconds` 表示时间间隔的总毫秒数，使用 `CInt` 方法将其转换为整数类型的毫秒数。