如何实现刷新
XgyhC.Execute "insert user_Infor (user_ID,user_Name,user_PWD,user_DES) values ('" & txtUserName.Text & "','" & txtPassword.Text & "','" & txtPasswordy.Text & "','" & ComboJs.Text & "')"
If MsgBox("添加成功!", , "提示信息") = vbOK Then
Mshflexgrid.refresh
End If
结果不起作用,如何作呢?