一些计算机高级语言的试题 ，谁能帮忙看看

a8507024

这些语言没有学过
不好意思帮不了你啊。。

thelord

全是 VB 的基础题，拿本教程查，再用 VB 编译器跑一下，应该差不多了
目测：12 A 13 B 14 A

dbidbi

这个试题。。。

dbidbi 发表于 2013-4-23 08:53
这个试题。。。

怎么了？？

可能图片有点看不清楚 影响大神帮帮忙的心情了   我弄了个word 希望能得到帮助  非常感谢

ubuntu2011 发表于 2013-4-22 15:21
我等图片转过来再看

word  应该能看清吧

ubuntu2011 发表于 2013-4-22 15:21
我等图片转过来再看

好吧 刚才  WORD 太大了

snyzaa

一．        选择题
1 下面的控件不具备Caption属性的（B）
A标签框  B 文本框 C命令按钮D单选按钮
2 VB规定的窗口文体文件的扩展名是（C）
A  vbg   B  vbw   C frm  D vbp
3.设a为整形变量，不能正确表达数学关系1＜a＜15的VB表达式（A）
A 10＜a＜15  B a=11 Or a=13 Or a=14 C a＞10And a＜15 D Not(a＜a=10)And Not (a＞15＝)
4 若要求在文本框中输入密码时只显示＃号 则应在此文本框的属性窗口中设置（C）
  A Text属性值为＃  B Captiom属性值为＃ C Passwordchar属性值为＃ D Password属性值为Ture
5.以下合法的变量名是（D）
A  Len  B  Test@qw  C  6cose_1  D count2s
6 在窗体上所放置的控件是 C
  A  类     B属性    C 对象      D 事件过程
7 设有语句age=InputBox (“请输入数值”, “年龄输入框”， “25”)程序运行后，如果从键盘上输入数值20并按回车键，则以下叙述中不正确的是  A
A变量ａｇｅ的值是数值２０　   B 对话框的标题栏中显示的是“年龄输入框 “
C “25”为对话框的默认值      D  对话框的提示文字为“请输入数值 ”
8 以下哪一个语句可以跳出Do Until。。。。Loop 循环 C
A End  B  Exit Loop   C  Exit DO   D  Exit For
9 在窗体上画一个名称为Command 1的命令按钮，然后编写如下程序：
   Private Sub Command 1_ Click ()
      Dim A As Integer
      Static B As Integer
      B=B+3
      A=3+A
Print A,B
End Sub
程序运行时，三次单击命令按钮Command 1 后，在窗体上最后一次显示的内容是(A)
A 3   9   B 3   6   C 9   9    D  3  3  
10 用下面语句 定义的数组元素个数是（D） Dim a (3 To 14) As Integer
A  6  B 7  C  8   D  12
11 下面（D）不是VB的数据类型
A  Single  B  Object  C  Currency  D  Bool
12 在VB中设计程序时 能自动检查出来的错误是（A）
A语法错误  B 语法和逻辑错误 C 运行错误 D 逻辑错误
13 如下有一段程序  窗体上打印出来的结果是（B）
   Private Sub Command_1 Click ()
   X=1
   Do
   x=x+3
   Print  x ;
   Loop Until  x＞＝8
End Sub
A 1  3   B  4  7  10   C  8   D  1  8   10
14 下列事件过程运行时，信息框中出现的结果是
Private Sub Command 1_Click(A)
MsgBox Sub (“123+123“)
End Sub
A 123+123   B 123   C 246  D  显示出错误信息
15 设a=5 b=4 c =3  d=2  下列表达式3＞2*b Or a=c And  b＜＞c or c＞d 的值是 B
A 1  B Ture  C  False  D 2
二  填空题
1 设a=2,b=3,c=4,d=5,则表达式Not a＜=c  Or 4*c=b^2 And b＜＞a+c 的值为（True）
2  为了建立一个新的窗体，应选择（工程）菜单下的“添加窗体”命令
3 如果要设置文本框输入字符时只显示特定字符*，应设置（PasswordChar）属性
4 有如下程序
Private Sub Command1_Click
Dim a As Integer
Dim b As Integer
Dim x As Integer
a=Val (InputBox(“输入“)
b=Val (InputBox(“输入“)
x=a+b
If a ＞b Then x=a-b
Text1 .Text=x
End Sub
运行后，从InputBox 对话框中连续输入3和4 ，文本框中显示的是（7）如果连续输入的是4和3 ，文本框中显示的则是（1）
5 下列程序运行后，整形变量你的值为（25）
Private Sub Commond1_Click()
n=0
For i=1 To 100
If i Mod 4=0  Then n = n+1
Next
Print n
End Sub
6 为了在运行时把d：\pic 文件夹下的图形文件a.jpg 装入图片框Picturel，所使用的语句为（Picture1.Picture = LoadPicture("d：\pic\a.jpg")）
7 在窗体上画一个名称为Commond1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click
Dim c As String
Dim n As Integer
C= “ABCD”
For n =1 To 4
Print Left (c,n)
Next
End Sub程序运行后，单击命令按钮，在窗体上显示的内容是
A
AB
ABC
ABCD

三 编写程序，单击窗体改变窗体背景颜色为蓝色
Private Sub Form_Click()
   If Me.BackColor <> vbBlue Then Me.BackColor = vbBlue
End Sub

四
Private Sub Command1_Click()
    Dim i As Integer, n As Integer
    For i = 1 To 9
        For n = 1 To i
            Print n; " ";
        Next n
        Print
    Next i
End Sub

snyzaa 发表于 2013-4-23 20:15
一．        选择题
1 下面的控件不具备Caption属性的（B）
A标签框  B 文本框 C命令按钮D单选按钮

不知道该说什么好了   总之非常感谢