![[填空题] 运行下列程序，单击Command1，在窗体上显示的第一行内容是（）,第二行的内容是（），第三行的内容是（）("A"的ASCII码是65,"z"是90,第1张](/aiimages/%5B%E5%A1%AB%E7%A9%BA%E9%A2%98%5D+%E8%BF%90%E8%A1%8C%E4%B8%8B%E5%88%97%E7%A8%8B%E5%BA%8F%EF%BC%8C%E5%8D%95%E5%87%BBCommand1%EF%BC%8C%E5%9C%A8%E7%AA%97%E4%BD%93%E4%B8%8A%E6%98%BE%E7%A4%BA%E7%9A%84%E7%AC%AC%E4%B8%80%E8%A1%8C%E5%86%85%E5%AE%B9%E6%98%AF%EF%BC%88%EF%BC%89%2C%E7%AC%AC%E4%BA%8C%E8%A1%8C%E7%9A%84%E5%86%85%E5%AE%B9%E6%98%AF%EF%BC%88%EF%BC%89%EF%BC%8C%E7%AC%AC%E4%B8%89%E8%A1%8C%E7%9A%84%E5%86%85%E5%AE%B9%E6%98%AF%EF%BC%88%EF%BC%89%28%26amp%3Bquot%3BA%26amp%3Bquot%3B%E7%9A%84ASCII%E7%A0%81%E6%98%AF65%2C%26amp%3Bquot%3Bz%26amp%3Bquot%3B%E6%98%AF90.png "[填空题] 运行下列程序，单击Command1，在窗体上显示的第一行内容是（）,第二行的内容是（），第三行的内容是（）("A"的ASCII码是65,"z"是90,第1张")
[填空题] 运行下列程序，单击Command1，在窗体上显示的第一行内容是（）,第二行的内容是（），第三行的内容是（）("A"的ASCII码是65,"z"是90)Option ExplicitPrivate Sub Commandl_Click()Dim i As Integer,st As String，n As Integer,p As String*1P="B"For i=3 To 1 Step -1 n=Asc(p)-i If n<65 Then n=n+26 st=Chr(n) st=st & F(i) Print stNext i EndSubPrivate Function F(n As Integer) Dim i As Integer Static S As Integer For i=1 To ns=s+i Nexti F=SEnd Function
正确答案：Y6；Z9；A10
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）