在做一个messageBox等,出来了“是”,“否”等的按键控制;光标默认是“是”这个按键;问一下怎样才能把光标默认值改到其它按键???

解决方案 »

  1.   

    MsgBox "OK", vbYesNo Or vbDefaultButton1
    MsgBox "OK", vbYesNo Or vbDefaultButton2
      

  2.   

    if msgox("请选择",vbyesno+vbinformation+vbdefaultbutton2)=vbyes then
        '选择“是”的操作代码
    else
        '选择“否”的操作代码
    end if
      

  3.   

    在分支判断的时候,把是变成否就可以了if msgbox()=vbyes then 然后写否定的语句,就ok了
      

  4.   

    MsgBox(prompt[, buttons] [, title] [, helpfile, context])
    buttons 参数有下列设置值:常数 值 描述 
    vbOKOnly 0 只显示 OK 按钮。 
    VbOKCancel 1 显示 OK 及 Cancel 按钮。 
    VbAbortRetryIgnore 2 显示 Abort、Retry 及 Ignore 按钮。 
    VbYesNoCancel 3 显示 Yes、No 及 Cancel 按钮。 
    VbYesNo 4 显示 Yes 及 No 按钮。 
    VbRetryCancel 5 显示 Retry 及 Cancel 按钮。 
    VbCritical 16 显示 Critical Message 图标。 
    VbQuestion 32 显示 Warning Query 图标。 
    VbExclamation 48 显示 Warning Message 图标。 
    VbInformation 64 显示 Information Message 图标。 
    vbDefaultButton1 0 第一个按钮是缺省值。 
    vbDefaultButton2 256 第二个按钮是缺省值。 
    vbDefaultButton3 512 第三个按钮是缺省值。 
    vbDefaultButton4 768 第四个按钮是缺省值。 vbApplicationModal 0 应用程序强制返回;应用程序一直被挂起,直到用户对消息框作出响应才继续工作。 
    vbSystemModal 4096 系统强制返回;全部应用程序都被挂起,直到用户对消息框作出响应才继续工作。 
    vbMsgBoxHelpButton 16384 将Help按钮添加到消息框 
    VbMsgBoxSetForeground 65536 指定消息框窗口作为前景窗口 
    vbMsgBoxRight 524288 文本为右对齐 
    vbMsgBoxRtlReading 1048576 指定文本应为在希伯来和阿拉伯语系统中的从右到左显示 你只需要安装msdn就能查到了