[二级VB试题天天练]VB考试试题2
分类: 计算机
时间: 2023-08-16 07:16:18
作者: 全国等级考试资料网
1.下面是一个用户自定义程序的调用的例子:
Option Explicit
Private Sub Command1_Click()
Dim strS1 As String
Dim strS2 As String
strS1 = "ABCDEFG"
MySub strS1, strS2
Print strS2
End Sub
Private Sub MySub(ByVal str1 As String, str2 As String)
Dim strT As String
Dim i As Integer
For i = Len(str1) To 1 Step -1
strT = strT + Mid(str1, i, 1)
Next
str2 = strT
End Sub
问:程序运行后,“print”语句的输出结果是什么?
Option Explicit
Private Sub Command1_Click()
Dim strS1 As String
Dim strS2 As String
strS1 = "ABCDEFG"
MySub strS1, strS2
Print strS2
End Sub
Private Sub MySub(ByVal str1 As String, str2 As String)
Dim strT As String
Dim i As Integer
For i = Len(str1) To 1 Step -1
strT = strT + Mid(str1, i, 1)
Next
str2 = strT
End Sub
问:程序运行后,“print”语句的输出结果是什么?