null变量变量变量:程序运行过程中值变化的量叫变量
变量命名:由字母开头,后面跟字母、数字、下划线,如:
Zf1 zf2 a1 a_2 但 vb中已经有意义的字符如IF END + =不能使用.
变量的作用:保存临时的数据,数据类型可以是整数(integer)、小数(single)、字符(string)等,如
A=3 b=3.5 c=“汉”
由于变量在程序执行完后会初始化,所以如要保存变量的值,要在程序外定义变量如下:
DIM s as integer ‘定义变量 s 为integer(整数 型 )
Private Sub Command1_Click()
s = s + 1
command1.caption=s
End Sub
累加器累加器在数学公式中,x=x+3是无解的,但在计算机中有其意义,这是由计算机运算过程决定的。
累加器格式:x = x + 7
应用:
X=3
X=x+7 先计算”=“右边的式子结果为10,计算后的结果再存入变量X中,x的值由原来的3替换为10.
Print x MsgBox 函数MsgBox 函数在对话框中显示消息,等待用户单击按钮,并返回一个值指示用户单击的按钮。
MsgBox(prompt[, buttons][, title]
例子:
a = MsgBox("你的得分是:" & s, vbOK, "成绩查询")
变量A用来保存你按的是“确定”、还是“取消”的值
&:连接符,将两个字符连接在一起,如
“中国” & “福建” 则为“中国福建”
注意:&的两边要留空格
nullMsgBox 函数有以下返回值:
nullVisual Basic编程*窗体
设计
领导形象设计圆作业设计ao工艺污水处理厂设计附属工程施工组织设计清扫机器人结构设计
器窗体布局窗口工程管理器窗口工具箱菜单条属性窗口
标准
excel标准偏差excel标准偏差函数exl标准差函数国标检验抽样标准表免费下载红头文件格式标准下载
工具条null1.主窗口
应用程序窗口,由标题栏、菜单栏和工具栏组成
2.窗体(Form)窗口
设计VB程序的 界面
3.代码(Code)窗口
编辑窗体、标准模块中的代码
4.属性(Properties)窗口
所有窗体或控件的属性设置
5.工程资源管理器(Project Expror)窗口
保存一个应用程序所有的文件
6. 工具箱(toolbox)窗口
显示各种控件的制作工具,供用户在窗体上设计nullVisual Basic编程*VB 工具箱
VB的部分对象PictureBox 控件TextBox 控件CommandButton 控件OptionButton 控件ListBox 控件VScrollBar 控件DriveListBox 控件FileListBox 控件Line 控件Data 控件Image 控件Shape 控件DirListBox 控件Timer 控件HScrollBar 控件ComboBox 控件CheckBox 控件Frame 控件Label 控件2.4基本控件和窗体2.4基本控件和窗体一.常用属性
1.Name名称属性
创建的对象名称,有默认的名.在程序中,控件名是作为对象的标识而引用,不会显示在窗体上。
2.Caption标题属性
该属性决定了控件上显示的内容。
3.Height、width、top和left属性scalewidthscaleheightheightnull定时器控件(Timer)[用途]:通过设置时间间隔,当经过设定的时间后,
自动触发该控件的Timer事件,执行其中的代码程序。
[属性]:
Interval:以毫秒为单位的时间间隔。取值为0-65535。 0
表
关于同志近三年现实表现材料材料类招标技术评分表图表与交易pdf视力表打印pdf用图表说话 pdf
示不起作用。
Enable:为True时,打开计时器,开始计时,根据Interval值,触发Timer事件;为False时,关闭计时器。
[事件]:
Timer:计时器唯一支持的事件,当设定时间间隔到达后,触发。
注意:窗体上的计时器,在运行时是不可见。 Timernull数字的累加、累减数字的累加:s=s+1
数字的累减:s=s-1
见下面例子:
null. Visable属性
作用:控制对象的可见与不可见。
如 image1.visable=true 则image1可看见
如 image1.visable=false 则image1不可看见
请大家添加一个COMMAND1对象,然后把以下程序放入command1_click()事件中,观察效果:
Private Sub Command1_Click()
Command1.Visible = False
End Sub
Enabled属性
作用:控制对象可否响应事件,即能否使用。
如 command1.enabled=false 则command1无法点击
请大家添加一个COMMAND1对象,然后把以下程序放入command1_click()事件中,观察效果:
Private Sub Command1_Click()
Command1.enabled = False
End Sub
nullIf 假设条件1 Then 假设条件1成立时执行的语句块1 (elseif 假设条件2 Then 假设条件2成立时执行的语句块2) (elseIf 假设条件3 Then 假设条件3成立时执行的语句块3) ······ (else 所有条件都不成立时要执行的语句块) end If Private Sub Command1_Click()
信息=5.3
If 信息>=5 Then
等级="博士生"
elseif 信息>=4 then
等级="大学生"
elseif 信息>=3 then
等级="高中生"
else
等级="补考"
end if
print 等级
end subPrivate Sub Command1_Click()
信息=5.3
If 信息>=3 Then
等级=“合格”
else
等级=“补考”
end if
print 等级
end sub
Private Sub Command1_Click()
信息=5.3
If 信息>=3 Then
等级=“合格”
end if
print 等级
end sub
If 语句的变化过程例子:从复杂到简单nullIf···Then···ElseIf···End If 是 VB 中的块结构条件语句。
作用:主要用来针对不同的情况,让应用程序做出不同的反应。 语句功能如下: If 假设条件1 Then 假设条件1成立时执行的语句块1 (ElseIF 假设条件2 Then 假设条件2成立时执行的语句块2) (ElseIf 假设条件3 Then 假设条件3成立时执行的语句块3) ······ (Else 所有条件都不成立时要执行的语句块) End If 上面的语句块含义为:如果“条件1”成立,则执行“语句块1”;否则如果“条件2”成立,则执行“语句块2”······;如果所有情况都不成立,则执行 Else 之后的语句块并最后跳出判断过程。 中间可有好多elseif,是对条件的再次排除,有几点必须加以强调: (1)、在上面的语句块中,ElseIf 之间没有空格,如果有空格即 Else If ,块结构则不成立。Else If 这种形式只能在单行结构条件语句中成立,而不能在块结构条件中成立。 (2)、执行语句块的程序代码不能紧跟 Then ,必须放到下一行中,这是块状结构的规定。 (3)、在块结构判断语句中,ElseIf 子句的数量没有限制,可以根据需要加入任意多个 ElseIf 子句。 (4)、ElseIf 与 Else 都是可选的。 (5)、只要有END IF,则THEN后没有语句,语句在下一行,同样ELSE后没有语句,语句在下一行。 If 信息>=5 Then
等级=“博士生”
elseif 信息>=4 then
等级=“大学生”
elseif 信息>=3 then
等级=“高中生”
else
等级=“补考”
End if If 信息>=3 Then
等级=“合格”
else
等级=“补考”
End if If 信息>=3 Then
等级=“合格”
End if nullVB的第二种结构语句:选择判断语句
1、作用:根据条件控制程序运行的流程,实现不同情况执行不同操作。
2、语句 格式1:If <表达式> Then <语句>
格式2:If <表达式> Then
<语句1>
<语句2>
end if
例子1: 如果有穿鞋套就可以进来
表示为: if 有穿鞋套 then 进来
例子2: 如果 有穿鞋套 并且有带书 就可以进来
表示为: if 有穿鞋套 and 带书 then 进来
例子3: 如果 总分达到500分 就 合格
表示为: if zf>=500 then print “合格” nullVB的第二种结构语句:选择判断语句
1、作用:根据条件控制程序运行的流程,实现不同情况执行不同操作。
2、语句 格式3:If <条件满足> Then <条件满足的语句> else <不满足的语句>
格式4:If <条件满足> Then
<条件满足的语句1>
<条件满足的语句2>
else
<条件满足的语句1>
<条件满足的语句2>
end if
例1:如果 明天不下雨 就去植物园玩 ,否则就在家看书
表示为: if 明天不下雨 then去植物园玩 else 在家看书
例2:如果 超载 就罚5000元 ,否则就交过路费50元
表示为: if 超载 then monkey=5000 else monkey=50
zaizhong=2000
zhonglian=text1
if zaizhong>=zhonglian then
monkey=5000
else
monkey=50
end if
null.选择结构
1. If…Then语句(单分支结构)
If <表达式> Then
语句块
End If
或 If <表达式> Then <语句>
例:已知两个数x和y,比较它们的大小,
使得x大于y.
If x
Then
<语句块1>
Else
<语句块2>
End If
If <表达式> Then <语句1> Else <语句2>
计算分段函数
单分支结构实现: y=cos(x)-x^3+3*x
If x<>0 Then y=sin(x)+sqrt(x*x+1)
双分支结构实现: If x<>0 Then
y=sin(x)+sqrt(x*x+1)
Else
y=cos(x)-x^3+3*x
End Ifnull3.条件判断中关系运算符
将两个操作数进行大小比较,结果为逻辑量。
字符串比较,则按字符的ASCII码值从左到右一一比较,直到出现不同的字符为止.。
例: " ABCDE " > " ABRA " 结果为 False "男字" > "女字" 按汉字的拼音字母比较 null4. 条件判断中逻辑运算符
将操作数进行逻辑运算,结果是逻辑值
条件表达式1 And 条件表达式2 条件表达式均为T 结果为T
条件表达式1 Or 条件表达式2 条件表达式有一个T 结果为T
null
例:用人单位招聘秘书:年龄小于40岁,女性,学历专科或本科
年龄<40 性别=“女” (学历=“专科” 学历=“本科”)
And And Or
考虑:若分别写成:
年龄<40 And 性别=“女” And (学历=“专科” And 学历=“本科”)
年龄<40 Or 性别=“女” Or (学历=“专科” Or 学历=“本科”)
例:表示算术表达式:
正确的VB表达式: 3〈=x And x <=7
错误的VB表达式: 3<=x<=7 或 3<=x Or x<=7
比a小,比b大 用 Or
Xb比a大,比b小 用 And
X>a and x<7