题目

用26个互不重复的ASCI字符作为密码本，根据英文字母在字母表中位置，替换为密码本该位置的字符。现编写将英文字母加密的VB程序，在文本框Text1中输入明文，单击“加密”按钮Command1，在文本框Text2、Text3中输出产生的密码本和密文。程序运行界面如下图所示。 实现上述功能的VB代码如下，但加框处代码有错，请改正。 Private Sub Command1_Click() Dim i As Integer, mw As String, jm As String mw= Text1.Text: Text2.Text = my(26) For i =1 To Len(mw) c= Mid(mw, i, 1) If c>=A And c<=Z兰溪棹歌|||| 阅读下面这首古诗，回答问题 　 　 兰溪棹歌 唐·戴叔伦 凉月如眉挂柳湾，越中山色镜中看。 兰溪三日桃花雨，半夜鲤鱼来上滩。 [注]棹（zhào）歌：船歌。(1) “越中山色镜中看”中的“镜中看”三字极富韵味，它启发读者去想像兰溪山水的美妙景致，请作描述。 (2) “半夜鲤鱼来上滩”一句极为精彩传神，营造出优美活灵的意境，是全诗的点睛之笔。请作简要赏析。