有关VBS的一些问题

[复制链接]
查看11 | 回复3 | 2012-10-3 12:35:47 | 显示全部楼层 |阅读模式
Dim a'这个变量用来储存选择的内容a = Msgbox ("你对生活失去信心了吗?" & vbCrLf & "想明白生命的意义吗?想真正的......活着吗?", vbYesNo, "请选择,你会找到生命的意义")If a = vbYes Then'如果点击的是“是”Msgbox "请稍等,即将带你进入主神的世界......"Else
'如果点击的是“否”
Msgbox "你点击的是“否”"End If 其中:Dim 表示声明新变量Msgbox 函数用来弹出一个对话框If 语句表判断,如果Else 是在If条件不成立时执行End If是If语句结束标志vbYes 表示“是...
回复

使用道具 举报

千问 | 2012-10-3 12:35:47 | 显示全部楼层
If MsgBox("你对生活失去信心了吗?"&chr(10)&"想明白生命的意义吗?想真正的......活着吗?", vbyesno, "请选择,你会找到生命的意义") = vbyes ThenMsgBox "请稍等,即将带你进入主神的世界......" ElseMsgBox "你选的是NO"End If‘上面给你参考。...
回复

使用道具 举报

千问 | 2012-10-3 12:35:47 | 显示全部楼层
DIM AA="你对生活失去信心了吗?"&chr(10)&"想明白生命的意义吗?想真正的......活着吗?",vbyesno,"请选择,你会找到生命的意义")IF A=vbyes then msgbox "请稍等,即将带你进入主神的世界......" else end if...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行