说明: 手机界面的电话号码查询,Private Sub Command1_Click() If Text1 "" Then Adodc1.RecordSource = "select * from call where 科室或姓名代码 like '%" & Text1 & "%' " Adodc1.Refresh End If End Sub Private Sub DataGrid1_Click() End Sub Private Sub Form_Load() a = "Provider=Mic
<ghp1972> 上传 | 大小:342kb