教科版信息技术高一必修 3.2 我是程序猿--信息的编程加工（课件+导学案）（共16张ppt) (共2份打包)

信息的编程加工 大家一起找规律 在软件明文文本框中分别输入数字、英文和中文（每次只能输入一个字符或文字），然后点击加密按钮对字符进行加密，并将加密前后的字符分别记录在下表，并分析变化规律。 完成学案任务一 加 密 方 法 密文就是明文的（ ）数值（ ）之后对应的字符。 UniCode编码 增加3 大家一起想一想 小组讨论：按照加密方法，分析把明文转换为密文，显示在密文文本框，需要经过哪几个环节？（学案任务二.1） 提示： VB指令 AscW--作用是把字符转换为相应的 UniCode编 码数值。 ChrW--作用是把UniCode编码数值 转换为相应的字符。 第一步，将输入的明文字符（编程时 text1.text 表示明文文本框中的字符）转化为相应的UniCode编码数值 Ascw（text1.text） 第二步，将编码数值加三，得到密文UniCode编码数值 Ascw（text1.text）+3 第三步，将密文的UniCode编码数值转化为相应的字符 Chrw（Ascw（text1.text）+3） 第四步，将字符显示在密文文本框中(编程时 Text2.text 表示密文文本框中的字符) Text2.text = Chrw（Ascw（text1.text）+3） 解决问题的方法和步骤—算法 大家一起想一想 已知加密算法为明文字符UniCode编码数值加三，解密算法是什么？ 试编写解密程序。 （提示：参考加密程序） 第一步，将输入的明文字符（text1.text表示明文文本框中的字符）转化为相应的UniCode编码数值 Ascw（text1.text） 第二步，将编码数值加三，得到密文UniCode编码数值 Ascw（text1.text）+3 第三步，将密文的UniCode编码数值转化为相应的字符 Chrw（Ascw（text1.text）+3） 第四步，将字符显示在密文文本框中(Text2.text表示密文文本框中的字符) Text2.text = Chrw（Ascw（text1.text）+3） 加 密 算 法 大家一起打补丁 程序中有一个bug（漏洞），什么时候一按加密按钮就会弹出下面的错误提示？ 自 主 学 习 VB代码： <> 为不等于号 "" 为空（没有输入字符） VB语句： Text1.Text = "" 表示明文文本框内容为空 Text1.Text <> "" 表示明文文本框内容不为空 自 主 学 习--条件分支结构 指令代码： if  条件 then 语句1 Else   语句2 End if 如果满足条件，执行then之后的语句1部分，然后结束。 否则，执行else之后的语句2部分，然后结束。 条件分支结构流程图 开 始 条 件 程序一 程序二 结 束 是 否 解决bug，哪个可行？ 方案一： If Text1.Text = "" then Else Text2.Text = ChrW(AscW(Text1.Text) + 3) End if 方案二： If Text1.Text = "" then Text2.Text = ChrW(AscW(Text1.Text) + 3) Else End if 大家一起想一想 If Text1.Text = "" then Else Text2.Text = ChrW(AscW(Text1.Text) + 3) End if 如果把条件改为Text1.Text <> “” ， 该如何修改程序代码？ 完成软件升级版 请仿照加密程序，编写解密程序，并将两段程序代码分别复制到VB代码窗口相应位置，使没有输入字符时，运行加密、解密命令，程序均不出现问题。 提示： 加密程序代码应粘贴在 “Priva