填空题

执行如下程序段后，int sum的值为______。 Private SubCommand1_Click() sum=0 For i=1 To 18 Step 2 For j=2 To 6 If (i Modj)＜＞0 Then sum=sum+j Next Next Print sum End Sub

【参考答案】

161
<上一题 目录 下一题>
热门 试题

填空题
在窗体上画两个文本框和一个命令按钮，然后在代码窗口中编写如下事件过程：Private Sub Command1_Click() Text1.Text= VB Programming Text2.Text=Text1.TextText1.Text= ABCD End Sub程序运行后，单击命令按钮，Text1文本框中显示的内容为______。
填空题
在窗体上有一个名称为Label1的标签和一个名称List1的列表框。程序运行后，在列表框中添加若干列表项。当双击列表框中的某个项目时，在标签Labe1中显示所选中的项目，如图2.2所示。请在空白处填入适当的内容，将程序补充完整。Private Sub Form_Load() List1.AddItem 北京 List1.AddItem 上海 List1.AddItem 河北 End SubPrivate Sub List1_Dblclick() Labe1.Caption=______End Sub
相关试题