刈谷勇さん、るきおさん　大変有難う御座いました。
どう質問していいのか、結果だけで判断して纏まりのない質問になり申し訳御座いませんでした！
下記のように変更する事で解決いたしました。
基本的な解決かどうか疑問ですが、刈谷勇さん、るきおさん にはお世話になりました。　

テキストファイルを読んで配列変数に格納してテーブルへインサートする方法を止めて、
"SQLDMO.BulkCopy" を使って、.ImportData(BCP)でインポートする方法に変えたら、
タブだけの項目のが、If Me.DataGridView1.CurrentCell.Value = "" Then Exit Select
で判定出来ました。

<ｲﾝﾎﾟｰﾄの方法>
Dim SVR As Object                         'ｻｰﾊﾞｰｵﾌﾞｼﾞｪｸﾄ用
Dim ODB As Object                       　'ﾃｰﾌﾞﾙｵﾌﾞｼﾞｪｸﾄ用
Dim BCP As Object                         'ﾊﾞﾙｸｺﾋﾟｰｵﾌﾞｼﾞｪｸﾄ用
SVR = CreateObject("SQLDMO.SQLServer")
ODB = CreateObject("SQLDMO.Database")
BCP = CreateObject("SQLDMO.BulkCopy")
With SVR                                    
     .EnableBcp = True
    .LoginSecure = True              'SQLServerにWindows認証で接続                   
    .Connect(SerVer, "sa", "")
End With
ODB = SVR.Databases(TestDB)          'データベース接続
BCP = New SQLDMO.BulkCopy
With BCP
      .DataFilePath = PC_Fold & "Test.txt"
       .DataFileType = 2              'タブ区切り
       .SuspendIndexing = True
      .RowDelimiter = vbCrLf         '改行
End With
ODB.Tables("Test_tbl").ImportData(BCP)       'インポート