sub AskIT()
  if not you结婚 then you先结婚:AskIT
  if you没有孩子 then 先生个孩子吧:AskIT
  if you有了孩子 then 挖个坑等死吧    
end sub

解决方案 »

  1.   

    我的单位里有很多啊。
    不过我的单位也大。有200多程序员。
    hehe
    不过我觉得ztchen到这里来征婚犯了个错误。
    会到这里来的女程序员,都是没人追的。
    要不然,哪里会有空来这里。
      

  2.   

    sub seachgf()
    on error goto err
    if IsTrue(存在女程序员) then
        if your年龄>28 then
            msgbox"你没希望!请点确定,谢谢!",,"敬告"
        else if IsTrue(你很帅)  then
            msgbox"你应该检点一下你自己!请点确定,谢谢!",,"警告"
        else
           msgbox"去找个不是程序员的女人当老婆吧!请点确定,谢谢!",,"警告"         
    end if
    exit sub
    Err:
       msgbox"还是去编程吧……",,"公告"
    end sub
      

  3.   

    呵呵,漏了个'end if',加上!!
      

  4.   

    if you.married=True then you.life=End
      

  5.   

      女程序员首现是女的其次才是程序员,所以,女程序员=恐龙 IS negative
      

  6.   

    找个女程序员好啊啊啊啊?
    可以联网打星际
    生两个BABBY就可以二打二了
    家里活不要干
      

  7.   

    if you 月薪〉=5000  and 相貌英俊,温柔体贴,有上进心,有责任感 and 年龄<=25 then
      
      我可以考虑
    else
       你最好别结婚了
    end if       
       
             
       
       
      

  8.   

    to bluefish922(小月人):
            你在做梦???
      

  9.   

    if you = boy then
    请让我靠近,咱做个兄弟
    elseif you = girl and you 会编程 then
    那咱们也做个朋友.我没其他意思的.
    else
    I'm sorry
    end if
      

  10.   

    dim me as  月薪〉=5000  and 相貌英俊,温柔体贴,有上进心,有责任感 and 年龄<=25 
    dim you as 女程序员 not 恐龙
    set me=you
    on error goto 离婚
      

  11.   

    一位女程序员的倩影
    http://asp.6to23.com/51mis/mm.jpg
    大家快来看啊!!
      

  12.   

    #include <女程序员.h>
    void main(void)
    {
        int your 相貌;
    cin>>相貌;
    switch(相貌)
    case 难看:cout<<"我不要你!"<<endl; 
    break;
    case 钱少:cout<<"我不要你!"<<endl;
    break;
    case 不高:cout<<"我不要你!"<<endl;
    break;
    case 没房子:cout<<"我不要你!"<<endl;
    break;
    case 没车:cout<<"我不要你!"<<endl;
    break;
    defaule:cout<<"其他的我不管"<<endl;
    break;
    }
      

  13.   

    呵呵,看过上面的话,我想真正的女程序员应该还没登过场,但我会再等待!
    (本人既不成熟,又不稳重,没车、没房、也没有钱。现在只有亲爱的老母和不爱的老婆)'程序说明:该程序正在测试中,且对象不名,易陷入死循环
    Sub main()
        while 女程序员 is nothing
            found()
        wend
    End Subprivate sub found()
        等待
        寻找
        缘分   
    end sub