填空题算法的复杂度主要包括{{U}} 【1】 {{/U}}复杂度和空间杂度。
填空题在窗体上画一个文本框,其名称为Text1,在属性窗口中把该文本框的MultiLine属性设置为True,然后编写如下的事件过程: Private Sub Form_Click() Open "d:/Temptext1.txt" For Input As #1 Do While Not______。 Line Input #1,aspectS whole$=whole$+aspect$+Chr$(13)+Chr$(10) Loop Text1.Text=whole$ ______。 Open "d:/Temptext2.txt" For Output As #1 Print #1,______。 Close #1 End Sub 运行程序,单击窗体,将把磁盘文件Temptext1.txt的内容读到内存并在文本框中显示出来,然后把该文本框中的内容存入磁盘文件Temptext2.txt。请填空。
填空题在Visual Basic中可以建立______菜单和______菜单。
填空题本程序实现文本加密。先给定序列:a1,a2,…,an,它们的取值范围是1~n,而且互不相同。加密算法是:把原文本中第k个字符放到加密后文本的第ak个位置处。若原文本长度大于n,则只对前面n个字符加密,后面的字符不变;若原文本长度小于n,则在后面补字符“*”使文本长度为n后再加密。 例如:若给定序列a1,a2,…,a7分别为2,5,3,7,6,1,4。 ·当文本为“PROGRAM”时,加密后的文本为“APOMRRG”。 ·当文本为“PROGRAMMING”时,加密后的文本为“APOMRRGMING”。 ·当文本为“THANK”时,加密后的文本为“*TA*HKN”。 下面的过程code实现这一算法。其中参数数组a()中存放给定序列(个数与数组a的元素个数相等)a1,a2,a3,…的值,要加密的文本放在参数变量mystr中。过程执行完毕,加密后的文本仍然放在变量mystr中。请填空。 Option Base 1 Private Sub code(a() As Integer, mystr As String) Dim ch As String, c1 As String n=UBound(a)-Len(mystr) If n>0 Then mystr=mystr & String$(n, "*") End If ch=mystr For k= (14) To UBound(a) c1=Mid(mystr,k,1) n= (15) Mid(ch, n)=c1 Next k mystr=ch End Sub
填空题下列程序的运行结果是{{U}} 【6】 {{/U}}。
X=96
Y=10
X=X Mod Y^2
X=X/4
Print X
填空题为命令按钮的Picture属性装入了一个图片,但却发现图片没有显示出来,要使图片显示出来,应设置它的{{U}} 【6】 {{/U}}属性。
填空题可以通过______快捷键或者______快捷键退出Visual Basic。
填空题窗体上有名称为Command1的命令按钮及名称为Text1、能显示多行文本的文本框。程序运行后,如果单击命令按钮,则可打开磁盘文件C:/test.txt,并将文件中的内容(多行文本)显示在文本框中。下面是实现此功能的程序,请填空。 Private Sub Command1_Click() Text1="" Number=FreeFile Open "c:/test.txt" For Input As Number Do While Not EOF( (14) ) Line Input #Number, s Text1.Text=Text1.Text+ (15) +Chr(13)+Chr(10) Loop Close #Number End Sub
填空题窗体上有List1、List2两个列表框,程序运行时,在两个列表框中分别选中1个项目,如图a所示,单击名称为Command1的“交换”按钮,则把选中的项目互换,互换后的位置不限,如图b所示。下面的程序可实现这一功能,请填空。PrivateSubCommand1_Click()IfList1.Text=""OrList2,Text=""ThenMsgBox"请选择交换的物品!"ElseList1.AddItemList2.TextList2.Removeltem45List1.RemoveltemList1.ListlndexEndIfEndSub
填空题在单链表中,要删除一个指定的结点,必须要找到该结点的______。
填空题用户可以用【 】语句定义自己的数据类型。
填空题一个控件在窗体上的位置由{{U}} {{U}} {{/U}} {{/U}}属性决定,其大小由Width和Height属性决定。
填空题某人编写了如下函数来判断a是否为素数,若是,则函数返回True;否则返回False。 Function Prime(a As Integer) AS Boolean Dim k As Interger, isprime AS Boolean If a<2 Then isprime=False EIse isprime=True k=2 Do While k If a Mod k=0 Then iprime=False ELSE k=k+1 End IF LOOP End If prime=isprime End Function 在测试时发现有一个非素数也被判断为素数,这个错判的数是______。
填空题与结构化需求分析方法相对应的是{{U}} 【3】 {{/U}}方法。
填空题数据的逻辑结构有线性结构和 【1】 两大类。
填空题________
是从二维表列的方向进行的运算。
填空题数据库完整性的实现应该包括两个方面:一是系统要提供定义完整性约束条件的功能;二是提供{{U}} 【5】 {{/U}}的方法。
填空题下面运行程序后,单击命令按钮,输出的结果是______。
Private Sub Commandl_clck()
Dim a%(1 To 4),b%(3 To 6),i%,s1#,s2#
Fori=1 To 4
a(i)=i
Nexti
For i=3 To 6
b(i)=i
Nexti
s1=YAS(a)
S2=YAS(b)
Printt"s1=";S1"S2=";s2
End Sub
FunctionYAS(a()AsInteger)
Dimt#,i%
t=1
For i=LBound(a)ToUBound(a)
t=t*a(i)
Nexti
YAS=t
End Funtoon
填空题所谓 【1】 ,是指对数据集合中的各元素以各种方式进行运算,包括插入、删除、查找、更改等运算,也包括对数据元素进行分析。
填空题窗体上有一个名称为List1的列表框,一个名称为Picture1的图片框。Form_Load事件过程的作用是,把Datal.txt文件中的物品名称添加到列表框中。运行程序,当双击列表框中的物品名称时,可以把该物品对应的图片显示在图片框中如图所示。以下是类型定义及程序,请填空。PrivateTypePicgNameAsString*10物品名称picFileAsString*20物品图片的图片文件名EndTypeDimp(4)AsPic,pRecAsPicPrivateSubFormLoad()Open"Datal.txt"ForRandomAs#1____________=Len(pRec)Fori=0To4Get#1,i+1,P(i)List1.AddItemp(i).gNaineNextiClose#1EndSubPrivateSubListI-DbICIickOFori=OTo4IfRTrim(List-List(i))=RTrim(____________)ThenPicture1,Picture=LoadPicture(p(i).____________)ExitForEndIfNextEndSub
