一、文件识别
看扩展名来识别VB中的常用文件:
vbp扩展名:VB工程文件,这个文件可以用来组织项目文件结构。
exe扩展名:编译生成的应用程序文件,这个文件运行程序的。
frm扩展名:窗体文件,这个文件中保存着窗体文件的所有代码。
本节任务:
点击“显示form2窗体”按钮后,弹出询问窗口,提示信息“是否真的要打开form2窗体?”
围绕这个任务,我们展开今天要学习的内容。
任务思路:
1.使用函数msgbox,选择这个函数的第2个参数,选择是或者否的类型vbyesno
2.通过if语句进行判断msgbox点击的结果是yes或者no
判断点击是(yes)和否(no)的核心代码:
MsgBox("是否真的要打开form2窗体?", vbYesNo, "消息标题") = vbYes
知识补充:
打开单击事件的两种方法(以按钮为例):
第一种:直接双击控件,就可以自动生成一个单击事件。
第二种:在代码界面的“通用”中,找到控件的名称,然后再找到事件的名称。
二、案例学习
我们先通过制作一个测试区,这个测试区来测试不同温度的反馈结果,通过这样一个案例,我们学习if语句的用法。
制作测试区:
textbox控件:这个用控件用来输入内容,输入的内容在text属性中
val函数:这个函数是用来将文本转为数值
val函数使用方法:val(文本内容),结果返回的是数值类型。
程序中比较时候的注意事项:
在进行比较的时候,一定要进行数值比较,只有数学中的数值才能比较。
新知识:
判断学习:使用if语句
使用格式:
第一种使用方法:
if 条件内容 then
符合条件下执行的代码
end if
翻译一下:如果(if)条件符合情况下,那么(then),就执行符合条件的代码
第二种使用方法:
if 条件 then
符合条件下的代码
else
不符合条件的代码
end if
翻译一下:如果(if)条件符合情况下,那么(then),就执行符合条件的代码,否则(else),就执行不符合条件的代码
三、显示form2窗体按钮效果
在“显示form2窗体”按钮点击后,弹出选择框,如果选择“是”的结果,可以在form2窗体中插入一个label标签,描述一个简单的内容,例如:
如果选择“否”,得到结果如下:
本节代码如下:
Private Sub Command1_Click() If MsgBox("是否真的要打开form2窗体?", vbYesNo, "消息标题") = vbYes Then Form2.Show Else MsgBox "你没中招" End If End Sub Private Sub Command2_Click() Print Val(Text1.Text) If Val(Text1.Text) > 30 Then MsgBox "太热了" Else MsgBox "温度适宜" End If End Sub