你的目的应该是计算合格匹数占总匹数的百分比吧
e.Form.Controls("TextBox45").Text = DataTables("导航_Table18").Compute("(Sum(匹数)/Sum(匹数)","[合格] = 'True '")
改一下
e.Form.Controls("TextBox45").Text = DataTables("导航_Table18").Compute("Sum(匹数)","[合格] = 'True '" ) / DataTables("导航_Table18").Compute("Sum(匹数)")