题目内容

某人设计了下面的函数fun，功能是返回参数a中数值的位数： Function fun(a AS Integer)AS Integer Dim n％ N=1 While a＼10＞=0 N=n+l：a=a＼l0 Wend Fun=n End Function 在调用该函数时发现返回的结果不正确，函数需要修改，下面的修改方案中正确的是。 A．把错句n=1改为n=0 B．把循环条件a＼l0＞=0改为a＼l0＞0 C．把语句a=a＼l0改为a=a Mod 10 D．把语句fun=n改为fun=a

查看答案

搜索结果不匹配？点我反馈

更多问题

若窗体中已经有若干个不同的单选按钮，要把它们改为一个单选按钮数组，在属性窗口中需要且只需要进行的操作是。 A．把所有单选按钮的Index属性改为相同值 B．把所有单选按钮的Index属性改为连续的不同值 C．把所有单选按钮的Caption属性值改为相同 D．把所有单选按钮的名称改为相同，且把它们的Index属性改为连续的不同值

下面程序的输出结果是。 Private Sub Commandl_Click ch$=“ABCDEF” proc ch：Print ch End Sub Private Sub proc(ch As Stnng) s=“” For k=Len(ch) TO 1 Step -1 s=s&Mid(ch，k，1) Next k ch=s End Sub A．ABCDEF B．FEDCBA C．A D．F

一棵二叉树中共有70个叶子节点与与80个度为1的节点，则该二叉树中的总节点数为。 A．219 B．221 C．229 D．231

设窗体上有一个名称为CDl的通用对话框、一个名称为Textl的文本框和一个名称为Commandl的命令按钮。程序执行时，单击Commandl按钮，则显示打开文件对话框，操作者从中选择一个文本文件，并单击对话框上的“打开”按钮后，则可打开该文字文件，并读人一行文本，显示在Textl中。下面是实现此功能的事件过程，请填空。 Private Sub Command1_Click CD1.Filter=“文本文件|.txt|Word文档|.doc” CDl.FilterIndex=1：CD1.ShowOpen If CD1.FileName＜＞“” Then Open 【9】 For Input As #1 Line Input#1，ch$ Close#1：Text1.Text= 【10】 End If End Sub