在窗体上画一个文本框和一个图片框,然后编写下列两个事件过程:private sub form_c1ick() textl.text="vb programming"end subprivate subtext1_change() picture1.print"vb程序设计"end sub程序运行后,单击窗体,则在文本框中显示的内容是______,而在图片框中显示的内容是______。
有如下sub过程: sub ind(a as integer) static x as integer x= x a print x: end sub 以下是调用它的事件过程,程序运行后,单击命令按纽command1三次,输出结果为 【14】 。 private sub command1_click() ind 2 end sub
下列程序段的执行结果是______。 i=4 j:5 do i=i 1 j=j 2 loop until i >= 7 print “j=”; j
以下程序完成的功能是输入一个数n,并判断它是否为素数,是或不是都通过消息对话框(msgbox)来给出提示。请将程序补充完整。private sub cemmand1_click() n = inputbox (“请输入一个整数”) k = int(sqr(n)) i = 2 flag = 0 do while i= k and flag = 0 if 【6】 = 0 then flag = 1 else i= i 1 end if loop if 【7】 then msgbox “这是一个素数!”,vbokonly,“提示” else msgbox “这不是一个素数!”,vbokonly,“提示” end ifend sub
窗体的enable属性的值是( )类型的数据。
已知b的ascii码为66,以下程序统计由键盘输入的字符串中各英文字母的使用次数dim pp (65 to 90)for i = 65 to 90 pp(i) =0next x$ = inputbox(" enter a string", x$ ) x$ = ucase$ (x$) for i = 1 to len (x$) n =asc(mid$ (x$, i, 1) ) if n>= 65 and n = 90 then 【11】 end if next for i = 65 to 90 ifpp(i)>0then print chr$ (i) ; pp (i) end if next
在vb集成环境中要结束一个正在运行的工程,可单击工具栏上的一个按钮,这个按钮是()
执行下面程序,单击命令按钮cmd1后,窗体上显示的第一行内容是___(13)___,第二行内容是___(14)___ ;最后一行内容是___(15)___ option explicit private sub cmdl_click()dim i as integer,c as integer,s as string,t as string*1dim a() as string,s1 as string,jg as integers="43x17z23y"’for i=1 to len(s) t=mid(s,i,1) s1=s1 & t if t>="x" and t<="z" then c=c 1 redim preserve a(c) a(c)=s1 s1="" end ifnext icall sub1(a,jg)print jg endsub private sub sub1(a(
有如下函数过程: function gys(byval x as integer,byval y as integer)as integer do while y<>0preminder=x/yx=yy=preminder loop gys=x end function 以下是调用该函数的事件过程,该程序的运行结果是 【9】 。 private sub command1_click() dim a as integer,b as integer a=10:b=2 x=gys(a,b) print x end sub
设有如下通用过程: public sub fun(a(),byval x as integer)for i=1 to 5 x=x a(i)next end sub 在窗体上画一个名称为text1的文本框和一个名称为command1的命令按钮,然后编写如下的事件过程: private sub command1_click() dim arr(5)as variantfor i=1 to 5 arr(i)=inextn=10call fun(arr(),n)text1.text=n end sub 程序运行后,单击命令按钮,则在文本框中显示的内容是 【8】 。