1、窗体Formfrmfrmfind命令按钮Command buttoncmdcmdok标签Labellbllblinput文本框TextBoxtmrtmrClock若命令按钮(Command)的Enabled属性设置为True时按钮有效,设置为False时按钮无效3对象的属性、方法和事件1属性 属性Name设置对象的名称Caption决定控件中显示的内容(文字)Text决定窗体中文本框中显示的内容(初始为空白)Height决定控件高度Width决定控件宽度TOP决定控件的靠顶部位置Left决定控件的靠左边位置Font设置控件中字体格式BackColor设置控件背景色ForeColor设置控件的前
2、景色BorderStyle设置控件的边框风格Alignment即标签文字对齐属性:(0)Left Justify时文本左对齐;(1)Right Justify时文本右对齐;设置为(2)Center时文本居中。AutoSize设置为False时输入控件Caption中文字超过控件宽度时超出部分被裁剪掉,设置为True时,控件可水平扩充,以适应控件Caption属性。Visible决定控件是否可见Enabled决定控件运行时是否有效对象.属性属性值对象中属性可以在设计界面时通过属性窗中设置,也可以在运行时通过程序代码设置,方法如下例:给文本框“Txt123”的“Text”属性赋值为字符串“20”,
3、代码如下Txt123.text =”20”变量对象.属性如果要获取对象的状态或特性,这时就要读取对象的属性值,方法如下读取文本框“txt123”的“Text”属性的代码如下a = txt123.text2方法对象.方法参数名表form.print ”欢迎使用”该语句使用print方法在form1窗体中显示字符串“欢迎使用”3事件及事件驱动事件是对象对外部操作的响应,如在程序执行时,单击命令按钮会产生一个Click事件。如需要命令按钮响应Click事件,就把完成Click事件功能的代码写到Click事件的事件过程中,与事件一一对应。事件过程的形式如下:Private Sub 对象_事件名( )(
4、事件过程代码)End Sub一个简单的VB程序求圆的周长和面积Private Sub Command1_Click()Dim r As Single 定义r为单精度型Dim c As Single 定义c为单精度型Dim s As Single 定义s为单精度型r = Val(Text1.Text) 输入半径rc = 2 * 3.14159 * r 计算周长s = 3.14159 * r * r 计算面积Text2.Text = c 输出周长Text3.Text = s 输出面积Private Sub Command2_Click()End 退出End Sub相关题解:1、下列关于程序设计说法
5、正确的是( B )。A、程序设计语言的发展经历了机器语言、汇编语言到高级语言的过程,比较流行的高级语言是PASCAL, FORTRAN, EXCEL, C+等B、程序设计就是寻求解决问题的方法,并将其实现步骤编写成计算机可以执行的程序的过程C、程序设计语言和计算机语言是同一个概念的两个方面D、程序设计就是指示计算机如何去解决间题或完成一组可执行指令的过程2、下列说法错误的是( D ).A、程序设计就是寻求解决问题的方法,并将其实现步骤编写成计算机可以执行的程序的过程B、程序设计语言的发展经历了机器语言、汇编语言、高级语言的过程C、计算机程序就是指计算机如何去解决间题或完成一组可执行指令的过程D
6、、程序设计语言和计算机语言是同一概念的两个方面下列不属于程序设计语言中高级语言的是(C)。A、BASIC B、C语言 C、汇编语言 D、PASCAL程序设计语言的发展历程中,不包括( )。A、自然语言 B、机器语言 C、汇编语言 D、高级语言一、常量:批在程序进行过程中不变的量在VB中一般分数值常量与字符常量两种数值常量:就是数学中说的常数,分整型常量和实型常量两种整型常量:即整数,指不带小数点的数值如1、0、-10、+35等都是合法的整数实型常量:即实数,指带小数点的数值。实型常量又分为定点数和浮点数两种。定点数:3.14159和-6.8,1.99浮点数:2E6、1E5、88E1.23451
7、03 可表示为1.2345E3,字母E表示底数10浮点数就是数学上的科学计数法。字符串常量:被一对双引号括起来的若干个合法的字符称为字符串常量。例如:”China”、”Visual Basic”、”18”、”3.1415”等,双引号中字符,不包括双引号本身。符号常量:如果多次用到同一个常量,则可用一个有意义的名字表示这个常量。二、变量:在程序执行过程中,其值可以改变的量称为变量变量命名注意要点:1、必须以字母开头,不能以数字或其他字符开头。2、只能由字母、汉字、数字学或下划线组成,不能含有小数点、空格等字符。3、最长不超过255个字符4、不能以VB保留字作变量名,如语句定义符、函数名等。5、V
8、B不区分变量名中字母大小写。如HELLO和Hello是同一个变量。数据及运算(1)常用数据类型:(整型)Integer、(长整型)Long、(单精度型)Single、(双精度型)Double、(字符串型)String、(布尔型)Boolean、(日期型)Date其中(整型)Integer、(长整型)Long、(单精度型)Single、(双精度型)Double属于数值型表示范围:(整型)Integer (-32768 32767,存储为 16 位 , 2 个字节)(长整型)Long(-21亿 21亿,可以表示人口数量)(布尔型)Boolean(True 真、是 或 False假、非)(字符串型)
9、String(定长字符串:065535个字符,不定长字符串:020亿个字符) 字符串型数据是指用 “ ”括起来的一串字符。如“欢迎进入VB世界!”、“ Visual Basic” 、“1234 ”都是字符串类型。(日期型)Date(100/1/19999/12/31) 日期型数据专门用来处理日期和时间。VB采用一对“#”把日期和时间的值括起来,如#2003/08/20#表示2003年8月20日。(2)常量和变量的命名、声明及赋值符号常量的声明:Const 常量名 As 常量类型 = 常量值如:Const pi As Single = 3.14159 常量名为pi变量的声明:Dim As 如:D
10、im a As Integer 定义一个整型变量,变量名为a变量的赋值VB中使用Let语句给变量赋值,其形式如下:Let 变量 = 表达式其中,方括号表示这部分内容是可选的,通常可以省略该关键字。例题Private Sub Form_Click() Dim a As Integer, b As Integer, c As Integer Dim str As String Let a = 54 Let b = 114 c = a + b str = Hello World Print a=; a, b= b, c= c Print strVB语言中,下列数据类型说明符中表示整型的是(B)。A、
11、Boolean B、Integer C、Date D、String数据的输出程序中运算得到的结果,除可以使用文本框和标签显示外,对于大批量的数据更适合用Pint方法输出,格式如下对象 . Pint 表达式列表例题: Dim x As Single, y As Single Form1.Print -61; -34 Form1.Print 9 * 2; 12 Form1.Print This isa book x = 3: y = 4x= x, y= y注意:Print 方法在VB 语言中,下列合法的变量名是(B)。A、34ab B、ab34 C、*abc D、cc下列选项中属于字符串常量的是(
12、 )。A、ab B、a+b C、1235 D、1235在VB 语言中,下列合法的变量名是( )。A、aa B、a*b C、7ab D、dim运算符1、 算术运算:+ 加 - 减 *乘 指数 例:22 = 4/ (浮点)除 例:5 / 2 = 2.5 整除 例: 5 2 = 2Mod 求余数 例:5 Mod 2 = 1相关题解1、分析下列程序: Private Sub Form_Click() s=113 + 11 Mod 3 Print s End Sub当单击窗体时s的值是( A ).A、5 B、6 C、4 D、3关系运算=赋值、小于号不等于大于号=大于等于号 2 结果为 True(真或是)
13、1、下面表达式的值是false的有( C ).A、969 n97 B、Int(4.99) len(basic) C、str(2000) 2逻辑运算Not(取反)And(与) Or(或)运算结果为布尔型(Boolean)True 或 False逻辑运算符的优先级为:No And Or1、下列逻辑表达式的值为“假”的是(A)。A、2 + 4 8 B、3 + 12 = 15 C、5 0 And 4 3 D、10 / 5 7 B、8 / 4 3 And 3 2 D、4 + 11 203、已知A,B,C,D 是简单变量,且都已有互不相同的值,执行语句A=C: D=B 后,下列 关系表达式逻辑值为“真”的
14、是(A)。A、C=A B、A=B C、D=C D、B=C日期运算符与日期表达式日期表达式是用日期运算符“+”或“-”将算式表达式、日期型常量、日期型变量、日期函数等连接起来的式子,如表达式“#2003/09/01# +30”的运算结果是“2003-10-1”;表达式“#2003/10/20# - #2003/10/10#”的运算结果为整数101、设a=2, b=3,在VB中,表达式ab Or b3值是:( B )A、False B、True C、-1 D、1字符运算字符串连接符为“+”和“&”“123” + “45” = “12345”“123” & “45” = “12345”123 + “
15、45” = 168“123” + 45 = 168VB的字符串运算符是“&”,该运算符主要用于连接两个或更多的字符串。abcd &efg 连接后的运算结果为:abcdefg。那么,1+23的运算结果为:(C)。A、33 B、6 C、1+23 D、True运算符的执行顺序在VB中,当一个表达式中同时出现多种运算符时,运算次序由运算符的优先级决定,优先级高的运算符先运算,优先级相同的从左向右进行运算。不同性质的运算符优先级如下。算术运算符 字符串运算符 关系运算符 逻辑运算符在VB语言中,表示“a大于0且b小于12”的正确表达式是(D)。A、b 0 B、b 12 And a 12 Or a 0 A
16、nd b 常用函数数学函数Abs(x) 求x 的绝对值,例:abs(-3.6) = 3.6Sqr(x) 求 x 的平方根,例:sqr(100) = 10Int(x)求x的最大整数 例:int(3.6) = 3 int(-3.6) = -4Rnd(x)产生0,1)之间的随机数(不包括1)Sin(x)Cos(x)Tan(x)Atn(x)Exp(x)Log(x)使用三角函数时,参数应是弧度,如数学中sin300应写为:sin(30*3.14159/180)字符串函数Len(字符串) 求字符串的长度 ,例:Len(“hello”) = 5Left(字符串,截取长度) 截取字符串左边部分,例:Left(
17、“hello”,2) = “he”Mid(字符串,起始位置,截取长度) ,例:Mid(“hello”,2,2) = “el”Right (字符串,长度)截取字符串右边部分。例: Right (“hello”,2) = “lo” String(数值,字符)生成指定长度与指定字符的字符串,例:String(3,”9”) = ”999” 函数mid (C,N1,N2)的作用是从字符串C中N1位开始取出长度为N2 的子串。那么, Mid (aBcDeFg, 3, 3)的值为(D)。A、aBc B、cde C、eFg D、cDe常用转换函数Val(字符串) 将字符串转换为数值Str(数值) 将数值转换为
18、字符串Chr(字符代码)Asc(字符)Tab定位函数的使用Private Sub Form_Click() Dim a As Integer Dim b As Integer a = 4: b = 9 Print Tab(1);数 Tab(9);平方 Tab(18);立方 Tab(27);平方根 a; a * a; a * a * a; Sqr(a) b; b * b; b * b * b; Sqr(b)用户交互函数VB提供InputBox( )和MsgBox( )函数用于人机交互InputBox( )其语法格式为:InputBox( 提示,标题,默认值,X坐标,Y坐标)MsgBox( ) 其
19、语法格式为:MsgBox(提示信息,按钮,标题 )1、Visual Basic中,下列( A )函数是求绝对值的。A、ABS(X) B、SQR(X) C、INT(X) D、GN(X)2、表达式Abs(-3.6)*sqr(100)的值是( C )。A、-36 B、360 C、36 D、-3603、下列( A )数据类型不是数值型。A、Date B、Single C、Double D、Integer4、下列函数中,返回值是字符串的是 ( A ).A、Mid B、Instr C、Val D、Len5、下列( A )函数返回系统的当前时间。A、time() B、date() C、day() D、yea
20、r()6、代数表达式表达式后错误的是( D )A、g*t*t/2 B、1/2*g*t2 C、g*t2/2 D、gt2/27、数学式子在VB中的正确写法是:( )A、 (2*a+b)/4*a B 、(2*a+b)/(4ab) C 、(2a+b)(4ab) D 、(2*a+b)/(4*a*b)8、判断x是否在区间a, b上,在VB中以哪个逻辑表达式是正确的?( C )A 、ax and x=b B、 ax=b C、a=b综合分析1、向n变量存入1个2位整数,要使此2位数十位和个位上的值分别存入x, y变量。正确的算法是( D )。选项:x、x=Left(n, 1) y=n-x*10 Print x
21、:Print yB、x=Left(n, 1) y=Right(n, 1) Print x:C、x=n/10 y=n-x*10 Print x:D、x=Int(n/10) y=n-x*10 Print x:2、向x变量中输入任意一个小写字母,再将x变量中的小写字母转成大写字母。正确的算法是( A ).A、输人字母到x a=Asc(x)-32 x=chr(x) Print xB、输人字母到x a=Asc(x)+32 x=chr(x) Print xC、输人字母到x a=Val(x)一32 x=Chr(x) Print xD、输人字母到x a=Val(x)+32 x=Chr(x) Print x程序
22、设计的顺序结构顺序结构:代码按照由上到下的顺序一行一行地执行。程序执行过程中没有分支、没有重复,这种结构称为顺序结构。交换两个变量中的数据。Private Sub cmdSwap_Click() Dim m As Single x = Val(txtsx.Text) y = Val(txtsy.Text) m = x: x = y: y = m 交换数据 txtdx.Text = Str(x) txtdy.Text = Str(y)Private Sub cmdEnd_Click() End1、以下是一段VB程序:a = 1b = a + 1c = a + b它的基本结构属于( A )A、顺序
23、结构 B、选择结构 C、循环结构 D、树型结构2、下列VB程序运行后,变量x的值为( A ).x=2Print x+lPrint x+2A、2 B、3 C、5 D、8程序设计的分支结构行If语句行If是指在一行中写完的If语句。其一般格式为:格式一:If条件Then语句执行这种形式的If语句时,首先对条件进行判断。若条件成立,则执行Then后面的语句;若条件不成立,则执行If语句后继程序行的语句格式二:If条件 Then 语句 1 Else 语句 2输入三个不相同的数,求出其中最小数。 Dim a As Single, b As Single, c As Single Dim Min As Single a = InputBox(输入a, 输入框) b = InputBox(输入b c = InputBox(输入c If a b Then Min = a Else Min = b If c = 60 ThenLabel1.Caption = End IfIf a 0时,y=4x+1)。Dim x As SingleDim y As Sin
copyright@ 2008-2022 冰豆网网站版权所有
经营许可证编号:鄂ICP备2022015515号-1