|
Что
будет напечатано на форме после
выполнения программы, записанной на объектно-ориентированном
языке программирования Visual
Basic? |
Dim
strA,
strB, strC
As String, I
As Byte
Sub
Command1_Click()
strA = "топор"
Do
I = I + 1
strB = Mid(strA,
I, 1)
strC = strB +
strC
Loop While
I
< Len(strA)
Form1.Print
strC
End Sub |