高中信息技术选修1课件-4.4 过程和函数1-浙教版

自定义函数复习 进制转换中的应用 复 习 引言 程序通常由一个或多个函数组成，函数是程序的基本模块。每个函数完成一定的功能。 标准函数 （库函数） 用户自定义 函数 如：Abs() Int() 新知识 （点击）（1） 新技能 （点击）（2） 通过今天的项目 （点击）（3） （点击）（4） （下一页）课后任务 Function 函数名(参数 as 类型) As 类型名 <语句块> 函数名=表达式 End Function 这样表达式的结果才能做为函数的返回值 自定义函数包括： 自定义函数声明模块和自定义函数调用 函数名（参数） 函数调用的一般形式： Private Sub Command1_Click() Dim x As Integer Do While x <> 0 r = __________ x = x \ 2 t = __________ Loop End sub x = Val(Text1.Text) Text2.Text = t 【知识回顾】 13 1101 x mod 2 Str(r)+t Private Sub Command2_Click() Dim a As Integer a = Val(Text1.Text) Text2.Text = ______________ End Sub Function cc(x As Integer) As String End Function Do While x <> 0 r = x Mod 2 x = x \ 2 ___________________________ Loop 13 1101 cc(a) cc=str(r)+cc 函数 过程2 过程3 过程1 【小组大比拼】 1.一个程序实现下列功能:在文本框Text1中输入一个数,在文本框text2中输入需要转换数的进制（小于等于16）,点击转换按钮,在标签 Label3输出转换后的十进制数，程序运行界面如下： Private Sub Command1_Click() Dim s As String, k As Integer s = Text1.Text k = Val(Text2.Text) Label3.