问答题库

当前位置: 计算机等级考试题库 > BASIC题库

问题描述:

[单项选择题] 执行下列程序后,变量a的值为( )。 Dim i As Integer Dim a As Integer a=0 For i=1 To 100 Step 2   a=a+1 Next i


A.1
B.10
C.50
D.100

窗体上有一个名称为CD1的通用对话框,一个名称为Command1的命令按钮,相应的事件过程如下: Private Sub Command1_Cick() CD1. Fiher = "All File | *. * | Text File | *. txt | Word | *. Doc" CD1. FilterIndex = 2 CD1. FileName = "E: Test. ppt" CD1. InitDir = "E: " CD1. ShowOpen End Sub 关于上述程序,以下叙述中正确的是( )。 在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下事件过程:Private Sub Form_Load()ShowText1.Text=""Text2.Text=""Text2.SetFocusEnd SubPrivate Sub Text2_KeyDown(KeyCode As Integer, Shift As Integer)Text1.Text=Text1.Text+Chr(KeyCode-4)End Sub 程序运行后,如果在Text2文本框中输入“efghi”,则Text1文本框中的内容为 【11】 。 在窗体上画一个通用对话框,其名称为CommonDialogl,然后画一个命令按钮,并编写如下事件过程: Private Sub Command1_Click()CommonDialogl.Flags=cdlOFNHideReadOnlycommonDialogl.Filter="All Files(*.*)|*.*| Text Files"&_ "(*.txt)|*.txt|Batch Files(*.bat)|*.bat"CommonDialogl.Filterlndex=1CommonDialogl.ShowOpenMsgBox CommonDialogl.FileName End Sub 程序运行后,单击命令按钮,将显示一个“打开”对话框,此时在“文件类型”框中显示的是 ______。 面向对象的程序设计主要的优点包括与人类习惯思维方法一致、稳定性好、可重用性好、 【2】 和可维护性好等5个方面。 以下程序代码使用二维数组A表示矩阵,实现单击命令按钮Command1时使矩阵的两条对角线上的元素值全为1,其余元素值全为0,请补充完该程序。 Private Sub Command1_click()Dim A(4,4)For I=1 To 4 For J= 1 To 4 【12】 =1 Next I 【13】 【14】 Next J For i=1 To 4 For j=1 To 4 Print A(i,j): Next j Print Next I End Sub

点评难度:

      

IP为:165.70.70.*,来自美国的网友觉得此题的难度为:一般.
IP为:213.181.208.*,来自匈牙利的网友觉得此题的难度为:有点难.
IP为:52.69.194.*,来自日本东京Amazon数据中心的网友觉得此题的难度为:有点难.
IP为:214.74.248.*,来自美国国防部网络(弗吉尼亚州)的网友觉得此题的难度为:一般.
IP为:34.236.247.*,来自美国俄勒冈州波特兰Amazon数据中心的网友觉得此题的难度为:容易.
IP为:5.10.127.*,来自荷兰的网友觉得此题的难度为:容易.
您觉得难度如何呢?请反馈给我们,谢谢!

参考答案:

C

试题分享:

相关考题

窗体上有一个名称为CD1的通用对话框,一个名称为Command1的命令按钮,相应的事件过程如下: Private Sub Command1_Cick() CD1. Fiher = "All File | *. * | Text File | *. txt | Word | *. Doc" CD1. FilterIndex = 2 CD1. FileName = "E: Test. ppt" CD1. InitDir = "E: " CD1. ShowOpen End Sub 关于上述程序,以下叙述中正确的是( )。
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下事件过程:Private Sub Form_Load()ShowText1.Text=""Text2.Text=""Text2.SetFocusEnd SubPrivate Sub Text2_KeyDown(KeyCode As Integer, Shift As Integer)Text1.Text=Text1.Text+Chr(KeyCode-4)End Sub 程序运行后,如果在Text2文本框中输入“efghi”,则Text1文本框中的内容为 【11】 。
在窗体上画一个通用对话框,其名称为CommonDialogl,然后画一个命令按钮,并编写如下事件过程: Private Sub Command1_Click()CommonDialogl.Flags=cdlOFNHideReadOnlycommonDialogl.Filter="All Files(*.*)|*.*| Text Files"&_ "(*.txt)|*.txt|Batch Files(*.bat)|*.bat"CommonDialogl.Filterlndex=1CommonDialogl.ShowOpenMsgBox CommonDialogl.FileName End Sub 程序运行后,单击命令按钮,将显示一个“打开”对话框,此时在“文件类型”框中显示的是 ______。
面向对象的程序设计主要的优点包括与人类习惯思维方法一致、稳定性好、可重用性好、 【2】 和可维护性好等5个方面。
以下程序代码使用二维数组A表示矩阵,实现单击命令按钮Command1时使矩阵的两条对角线上的元素值全为1,其余元素值全为0,请补充完该程序。 Private Sub Command1_click()Dim A(4,4)For I=1 To 4 For J= 1 To 4 【12】 =1 Next I 【13】 【14】 Next J For i=1 To 4 For j=1 To 4 Print A(i,j): Next j Print Next I End Sub