第04章 数据与表达式.ppt

对应值 符号常量 缺省的活动按钮 3.说明哪一个是缺省按钮 Buttons的和=按钮设置值+图标设置值+缺省按钮值 0 VbDefaultButton1 256 VbDefaultButton2 512 VbDefaultButton3 Buttons参数值=65 ( 1+64+0) 或 vbOKCancel+ vbInformation+VbDefaultButton1 Buttons参数的设置 设计一个如下所示的提示框： A = MsgBox(非法数据！ + Chr(13) +Chr(10)+ 是否继续？, vbYesNo + vbCritical, 提示信息) 练习使用信息框 符号常量 返回值 对应按钮 4.Msgbox的函数返回值 用于确定用户选择对话框的哪一个按钮，以作出不同的响应。 vbOK 1--------------------确认 vbCancel 2--------------------取消 vbNo 7 -------------------否(N) vbAbort 3 -------------------终止(A) vbRetry 4--------------------重试(R) vbIgnore 5--------------------忽略(I) vbYes 6 -------------------是(Y) 信息框的返回值： 练习 MsgBox函数的使用方法 1. 使用赋值语句获得返回的按钮值 N=MsgBox(“提示信息”,48,“标题”) 2. 使用Print方法 Print MsgBox(“提示信息”,48,“标题”) 3. 作为方法使用 MsgBox “提示信息”,48,“标题” 信息框的返回值： 1.下列语句运行时系统给出错误提示的是???????? ?。　Ａ.Print -32000+769 　　　　Ｂ.Print “IE2”+8　Ｃ.Print “AB” 128　 Ｄ.Print 3=2=4 2.下面所列四组数据中，全部是正确的VB常数是????????? 。 A.32768, 1.34D2, ABCDE, O1767 B.3276, 123.56, 1.2E-2, #True# C.HABCE, 02-03-2002, False, D-3???????? D.ABCDE, #02-02-2002#, E-2 Ｂ.Print “IE2”+8 A.32768, 1.34D2, ABCDE, O1767 练 习 3.运行下面程序，单击命令按钮Command1,则立即窗口上显示的结果是???????? 。 Private Sub Command1_Click() Dim A As Integer,B As Boolean,C As Integer,D As Integer A=20/3? :? B=True? :? C=B? :? D=A+C Print A, D,? A=A + C End Sub 7??6? False?????B. 6.6? 5.6? False????C. 7??6?A=6??????D. 7???8???A=8 4.写出逻辑表达式：选拔优秀生的条件：三门功课英语(C1)、数学(C2)、计算机(C3),总分至少265分，或C2、C3分别大于90分且C1不低于80分。 A. 7??6? False 练 习 C1+C2+C3 =265 OR C1＝80 and C290 and C390 5.在窗体模块的通用声明处有如下语句，会产生错误的语句是 (1) Const A As Integer=25 (2) Public St As String*8 (3) Dim a b as Integer (4) Dim Const X As Integer=10 A.(1)(2)?????? B.(1)(3)???? C.(1)(2)(3) ???D.(2)(3)(4) 6.下列表达式中，值为True的是___26___。 Ucase(ABCD=abcd) 14/2\310 Mod 4 C. Mid(ABCD,