首页 > 大学本科

题目内容（请给出正确答案）

[单选题]

有程序代码如下：text1.text="visual basic" 则：text1、text和"visual basic"分别代表（）

A.对象，值，属性

B.对象，方法，属性

C.对象，属性，值

D.属性，对象，值

答案

D、属性，对象，值

如果结果不匹配，请联系老师获取答案

您可能会需要：

重置密码查看订单联系客服

安装优题宝APP，拍照搜题省时又省心！

更多“有程序代码如下：text1.text="visual bas…”相关的问题

第1题

执行如下程序代码a=0;c=0;do{--c;a=a-1;}while（a>0）;执行后，C的值是（）

A.0

B.1

C.-1

D.死循环

点击查看答案

第2题

Label2的标签，然后编写如下程序代码：Private x As IntegerPrivate Sub Command1_Click()a = 6:

Label2的标签，然后编写如下程序代码：Private x As IntegerPrivate Sub Command1_Click（)a = 6:

Label2的标签，然后编写如下程序代码：

Private x As Integer

Private Sub Command1_Click()

a = 6: b = 4

Call sub1(a, b)

Label1.Caption = a

Label2.Caption = b

End Sub

Private Sub sub1(ByVal x As Integer, ByVal y As Integer)

a = x * x

b = y * y

End Sub

程序运行后单击命令按钮，则两个标签中显示的内容分别是_______。

A.36和4

B.6和4

C.36和8

D.6和8

点击查看答案

第3题

把一个磁盘文件的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存人另一个磁盘文件，

请填空完成程序。在窗体上建立一个文本框，在属性窗口中把该文本框的Muhiline属性设置为True，然后编写如下的事件过程： Private Sub Form_Click() Open"d：\test\smtext1．txt"For lnput As1 Text1.Fontsize=14 Text1.FontName=“幼圆” Do While Not EOF(1) 【】 whole＄=whole $ aspect $+Chr$(13)+Chr $(10) Loop Text1.Text=【】。 Close Open"d：\test\smtexttxt"For Output As1 Print 1【】 Close End Sub

点击查看答案

第4题

假定有如下程序代码，程序运行后，把鼠标光标移到窗体内，每单击一次，变换一种鼠标光标的形状，依次

显示鼠标光标的15个属性。请在划线处将程序补充完整。 Private Sub Form_Click() Static x As Integer Cls Print "Mousepointer Property is now"; x Form1.【】=x x=x+1 If x=15 Then x=0 End Sub

点击查看答案

第5题

描述算法可以有多种方法，以下不是算法描述的方法（）。

A.流程图

B. 程序代码

C. 自然语言

D. 树形图

点击查看答案

第6题

下列方法中，属于信息系统测试方法的有（)。

A.测试数据法

B.观察法

C.嵌入审计模块法

D.程序代码检查法

E.图形描述法

点击查看答案

第7题

计算机病毒的主要特性有()。

计算机病毒的主要特性有（)。

A.破坏计算机功能或者数据

B.影响计算机正常使用且能够自我复制

C.它是一组计算机指令或者程序代码

D.传染性、安全性、易读性

点击查看答案

第8题

编程实现一个“猜数游戏”。要求：由计算机随机生成一个100以内的正整数，用户有5次猜数机会，如果

猜中提示“恭喜你，猜对了！”；否则，提示“偏大”或“偏小”，然后继续猜数。如果5次都未猜中，计算机公布答案，并提示“5次都没有猜中，游戏结束!”。

补全以下程序代码：

点击查看答案

第9题

在窗体上画两个文本框，名字分别为Text1和Text2，然后编写下列程序。程序运行后，如果在文本框 Text2

中输入lmn，那么在文本框Text1中显示的内容将是【】。 Private Sub Form_Load() Show Text1.Text=" " Text2.Text=" " Text2.SetFocus End Sub Private Sub Text2_KeyPress(KeyAseii As Integer) Text1.Text=Text1.Text+Chr(KeyAscii-5) End Sub

点击查看答案

第10题

以下程序的功能是：把当前目录下的顺序文件smtextl.txt的内容读入内存，并在文本框Texd中显示出来。

请填空。 Pfivme Sub Commandl_Click() Dim inData As String Textl.Text ="" Open"．\smtextl.txt"【】As1 Do While【】 Input1，in Data Text1.Text=Text1.Text&inData Loop Close1 End Sub

点击查看答案

第11题

（）中没有服务器端运行的程序代码，只有HTML标记。

点击查看答案