2016年10月技术选考转换函数与vb调试专题.pdfVIP

技术选考习题 命题：杜宗飞 VB 转换函数与程序调试 行政班： 教学班： 姓名： 学号： 一、VB 中的转换函数 Val:将数字字符串转换为数值，Val(13)值为13 Str 将数值转为为字符串Str(13)值为13 ①字符串和数值：123 和 123 ，带双引号的123是字符串，在计算机中存储时，存储 的是每个字符的对应的内码；而123 是数值，表示大小，在计算机中直接存储其数值。 ②VB 数据类型 Integer、Long、Single、Double 都是数值类型，String 为字符类型。 ③在VB 程序中 对象的Caption、Text 的属性值都属于字符串类型，列表框List 上添加内 容的也是字符串型。 ④赋值语句的两种形式：变量名=表达式 或 对象名.属性名=表达式。根据赋值等号两边数 据类型，来确定右边是否要转换。数值型 = Val(字符串型)， 字符串型 = Str(数值型) 右边的数据类型和左边的类型不一致，则需要将右边的转换成和左边一致在，再赋值。 输入、输出的都 是字符类型 ⑤在下面划线填上Val、Str、留空 （若不需要转换不用填） Private Sub Command1_Click() Private Sub Command1_Click() Dim a As Integer Dim a As String Dim b As Integer Dim b As Integer a = (Text1.Text) a = (Text1.Text) b = (a * 2) b = (a) Text2.Text = (b) b = (b ^ 2) End Sub Text2.Text = (b) End Sub Private Sub Command1_Click() Private Sub Command1_Click() Dim a As Integer Dim a As String Dim b As String Dim b As Integer a = (Text1.Text) a = (Text1.Text) b = (a) b = ( Len(a) ) b = ( b +10) List1.AddItem 长度为 + (b) Label1.Cation = (b) Label1.Caption = (a) End Sub End Sub 二、赋值语句和关系表达式 ①关系表达式：判断左右两边数据的大小关系。赋值语句：将右边的结果传输给左边。 ②关系表达式中的“判断相等”容易和赋值语句混淆。记住：IF 和Do While 后面的等号是 关系表达式，例如IF a=5 Then„ 和 IF 5= a Then„ 是等价的，因为这里的等号表示判断， 而不是赋值。 ③下列语句肯定不能作为赋值语句的是（ ） A. x = y B. x+y = x C. Text1.Text = 结果+Str(a) D. a = True 程序调试错误总结： 这两种错误，检查代码代码中IF 和EndIF、For 和Next 、Do 和Loop 有没有配对。