- 搜标题
- 搜题干
- 搜选项
填空题
在窗体上画一个名称为Text1的文本框和名称为HScrolll的水平滚动条(Max属性为 10，Min属性为0)，然后画两个标题分别为“慢”和“快”的标签。程序运行后，移动滚动块，如果滚动块位于滚动条的正中间位置，则在文本框中显示“适中”；如果滚动块位于滚动条的正中间位置的左侧，则在文本框中显示“慢”；如果滚动块位于滚动条的正中间位置的右侧，则在文本框中显示“快”，如下图所示。请填空。
在窗体上画一个名称为Text1的文本框和名称为HScrolll的水平滚动条(Max属性为 10，Min属性为0)，然后画两个标题分别为“慢”和“快”的标签。程序运行后，移动滚动块，如果滚动块位于滚动条的正中间位置，则在文本框中显示“适中”；如果滚动块位于滚动条的正中间位置的左侧，则在文本框中显示“慢”；如果滚动块位于滚动条的正中间位置的右侧，则在文本框中显示“快”，如下图所示。请填空。
Private Sub HScolll ______()
If (HScrolll.Value = 50) Then
Textl.Text="适中"
Else
If HScrolll.Value ______ Then
Text1.Text = "慢"
Else
Text1.Text = "快"
End If
End If
End Sub
答案：
Change ＜50或＜(Max/2)或＜((Max-Min)/2
你可能感兴趣的试题
Private Sub Form_Load()
List1.AddItem "北京"
List1.AddItem "上海"
List1.AddItem "河北"
End Sub
Private Sub List ______()
Labe1. Caption = ______
End Sub
