网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
单选题
End—End—Mid创建模式表示的是（）。
A
先建立半径再确定圆弧
B
先建立圆弧再确定半径
C
先建立直径再确定圆弧
D
先建立圆弧再确定直径
参考答案
参考解析
解析：
暂无解析
更多 “单选题End—End—Mid创建模式表示的是（）。A 先建立半径再确定圆弧B 先建立圆弧再确定半径C 先建立直径再确定圆弧D 先建立圆弧再确定直径” 相关考题
考题
以下程序的功能是将字符串“12345”逆序打印出来。请在画线处填上适当的内容使程序完整。Function rev(newl)As Stringb=Mid( _______ ,1,1)if b=" "thenrev=" "elserev=rev(Mid(new 1,2))+ _______end ifEnd FunctionPrivate Sub Form_Click()ld="12345"Print oldPrint rev(old)End Sub
考题
在窗体上面—个名称为Command1的命令按钮，并编写以下程序： Private Sub Command1_Click() Print fun("ABCDEFG") End Sub Function fun(st As String)As String stlen=Len(st) tempe="" For k=1 To stlen/2 temp=temp+Mid(st,k,1)+Mid(st,stlen-k+1,1) Next k fun=temp End Function 程序运行时，单击命令按钮，则在窗体上显示的是______。A．ABCDEFGB．AGBFCEC．GFEDCBAD．AGBFCED
考题
（ 14 ）执行以下程序后输出的是Private Sub Command1_Click()Ch$= ” AABCDEFGH ”Print Mid(Righ(ch$,6),Len(left(ch$,4)),2)End SubA)CDEFGHB)ABCDC)FGD)AB
考题
下列程序的功能是将字符串“abcde”逆序打印出来。请填写空白处以完善程序。 Munction rev(str1)As String B = Mid(,1,1) If B =＂＂Then rev =＂＂ Else rev = rev(Mid(str1,2))+b End If End Function Private Sub Form_Click() old =＂abcde＂ Print rev(old) End Sub
考题
在汇编语言程序中，下面关于END语句的叙述正确的是A．END 语句表示子程序执行到此结束B．END 语句在汇编后要产生机器码C．END 语句是可执行语句D．END 语句表示源程序到此结束
考题
运行下列程序： Private Sub Form. Click() Sum=0 For i=1 To 100 If Mid(CStr(i)，1， 1)="1" Then Sum=Sum+1 End If Next i Print Sum End Sub 单击窗体后，在窗体上显示的结果是A．12B．13C．14D．15
考题
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Coinmand1 Click（ ） Dim a$，b$，c$，k％ a="ABCD" b="123456" c="" k=1 Do While k=Len(a)Or k=Len(b) If k=Len(a)Then c=c＆Mid(a，k，1) End If If k=Len(b)Then c=c＆Mid(a，k，1) End If k=k+1 Loop Print c End Sub 运行程序，单击命令按钮，输出结果是（ ）。A.123456ABCDB.ABCD123456C.D6C584A321D.A1B2C3D456
考题
下列程序的执行结果为 Private Sub Command1_Click() Dim FirStr As String FtrSt="abcdef" Print Pat(FirStr) End Sub Private Function Pat(xStr As String)As String Dim tempStr As String，strLen As Integer tempStr="" strLen=Len(xStr) i=1 Do While i＜=Len(xStr)-3 tempStr=tempStr+Mid(xStr,i,1)+Mid(xStr，strLen -i+1,1) i=i+1 Loop Pat=tempStr End FunctionA．abcdefB．afbecdC．fedcbaD．defabc
考题
下列程序的执行结果为 Ptivate Sub Commandl_Click() Dim FirStr As String FirStr="abcdef" Print Pct (FirStr) End Sub Private Function Pct(xStr As String)As String Dim tempStr As String,strLen As Integer tempStr="" strLen=Len(xStr) i=1 Do While i＜=Len(xStr)-3 tempStr=tempStr + Mid(xStr，i，l) + Mid(xStr，strLen - i+i ，1) i=i + 1 Loop Pct=tempStr End FunCtionA．abcdefB．afbecdC．fedcbaD．defabc
考题
下列对条件语句、分支语句、固定循环次数语句、不定循环次数语句关键字排序正确的是（）A、if elseend；for end；switch case end；while end；B、if elseend；switch case end；for end；while end；C、for end；if else end；while end；switch case end；D、while end；for end；switch case end；if else end；
考题
单选题循环两列放在一维数组A[0…M-1]中，end1指向队头元素，end2指向队尾元素的后一个位置。假设队列两端均可进行入队和出队操作，队列中最多能容纳M-1个元素。初始时为空，下列判断队空和队满的条件中，正确的是（）A
队空：end1==end2；队满：end1==(end2+1)modMB
队空：end1==end2;队满：end2==(end1+1)mod(M-1)C
队空：end2==(end1+1)modM;队满：end1==（end2+1）modMD
队空：end1==（end2+1）modM;队满：end2==(end1+1)mod(M-1)
考题
单选题下列对条件语句、分支语句、固定循环次数语句、不定循环次数语句关键字排序正确的是（）A
if elseend；for end；switch case end；while end；B
if elseend；switch case end；for end；while end；C
for end；if else end；while end；switch case end；D
while end；for end；switch case end；if else end；
热门标签
最新试卷
