消防电气施工工艺流程:求编程高手帮帮忙

来源：百度文库 编辑：查人人中国名人网 时间：2024/05/05 15:51:27
If Text3.Text <> Text2.Text Then
MsgBox "ÄãÁ½´ÎµÄÃÜÂëÊäÈë²»Ò»Ö¶øµ¼ÖÂϵͳ´íÎó£¡", vbOKOnly + vbInformation, "ÒøÐÐϵͳÌáʾ"
Text2.Text = ""
Text3.Text = ""
Text2.SetFocus
End If
Call connectDB
adoRS.Open "Óû§±í", adoCon

If Not adoRS Then
adoRS.AddNew
adoRS("ÕʺÅ") = Text1.Text
adoRS("ÃÜÂë") = Text2.Text
adoRS("Óà¶î") = Text4.Text
adoRS("ÐÕÃû") = Text5.Text
adoRS.Update
adoRS.MoveNext
MsgBox "ÄúÒѾ­³É¹¦µÄ¿ª»§ÁË£¡ÇëÄãÎñ±Ø¼ÇסÄãµÄ¿¨ºÅºÍÃÜÂëллºÏ×÷£¡", vbOKOnly + vbExclamation, "ÒøÐÐϵͳÌáʾ"
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""

就是判断条件，执行过程，简单死了

求编程高手帮帮忙 请编程高手帮帮忙 Jaca编程高手帮帮忙！ 编程高手帮帮忙啊！ 编程高手帮帮忙!!!!!!!!! 急求编程高手!!!!!! 求DOS编程高手 跪求高手(编程) 跪求高手(编程) 求高手VB编程~~~~