[原创][讨论] 程序运行错误，请指教
Dim conn As New SqlConnection
conn.ConnectionString = "workstation id=GLX_117;packet size=4096;integrated security=SSPI;data source=glx_117;persist security info=False;initial catalog=ViBook"
conn.Open()
If CheckBox1.Checked = True Then
Dim cmd As New SqlCommand("truncate 读者信息表 ", conn)
cmd.ExecuteNonQuery()
Else
If CheckBox2.Checked = True Then
Dim cmd As New SqlCommand("truncate 图书信息表 ", conn)
cmd.ExecuteNonQuery()
Else
If CheckBox3.Checked = True Then
Dim cmd As New SqlCommand("truncate 工作人员表 ", conn)
cmd.ExecuteNonQuery()
End If
End I
