有下面程序代码: Private Sub Command1_Click() Dim sign As Integer sign = 1 a = 1 b = 2 For k = 1 To 5 c = a + sign * b a = b b = c Print c; sign = -sign Next k End Sub 程序运行后,单击命令按钮Command1,输出结果是______________
设窗体上有1个名称为HScroll1的水平滚动条,其Max、Min属性分别设置为100、1;有2个名称分别为Option1、Option2的单选按钮,其标题分别为"30"、"50";还有下面程序代码: Private Sub Option1_Click() HScroll1 = Val(Option1.Caption) End Sub Private Sub Option2_Click() HSc