（1）请编写名称为“CX”的命令程序并执行，该程序实现下面的功能：将“商品信息”进行备份，备份文件名为“b一商品信息．dbf”；将“商品信息”中“商品编号”后两位编号小于“03”（不含03）的商品的“价格”修改为原价的95％；使用“价格调整”表对商品信息的部分商品价格进行修改（按“商品编号”相同为条件）。（2）设计一个名称为“bd2”的表单，上面有“调整价格”和“关闭”两个命令按钮。单击“调整价格”命令按钮时，调用“CX”命令程序实现商品价格调整；单击“关闭”命令按钮时，关闭表单。注意：以上两个命令按钮均只舍一条语句，不可以有多余的语句。

[试题]①请编写名称为change_c的命令程序并执行，该程序实现下面的功能：将“商品表”进行备份，备份文件名为spbak.dbf；将“商品表”中“商品号”前两位编号为“10”的商品的“单价”修改为出厂单价提高10%；使用“单价调整表”对商品表的部分商品出厂单价进行修改(按“商品号”相同为条件)。②设计一个名称为form2的表单，上面有“调整”(名称Command1)和“退出”(名称Command2)两个命令按钮。单击“调整”命令按钮时，调用change_ c命令程序实现商品单价调整；单击“退出”命令按钮

[试题]（1）请编写名称为CX的程序并执行。该程序实现下面的功能：将工资表进行备份，备份文件名为“b_工资．dbf”。利用“人事部”向“财务部”提供的雇员工资调整表“c_工资”的“工资”，对工资表的‘‘工资”进行调整（请注意：按“职员编号”相同进行调整，并且只是部分职员的工资进行了调整，其他职员的工资不动）。最后将工资表中的记录存储到“n_ 工资”表中（表结构与工资表完全相同）。（2）设计一个文件名为“bd2”的表单，其中包含“调整工资”和“关闭”两个命令按钮。单击“调整工资”命令按钮时，调用CX命令程序

[单选题]在窗体上面—个名称为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 程序运行时，

[单选题]在窗体上有一个名称为Command1的命令按钮，并编写有如下事件过程：程序执行时，单击命令按钮，实现的功能是（ ）。A． 命令按钮移动到距窗体左边界、上边界各500的位置B． 命令按钮向左、上方向各移动500C． 窗体移动到距屏幕左边界、上边界各500的位置D． 窗体向左、上方向各移动500

[单选题]在窗体上画1一个名称为Command1的命令按钮，并编写以下程序Private Sub Command1_Click（）Print fun（“ABCDEFG”）E．nd SubF．unction fun（st As String） As Stringstlen=Len（st）temp=””F．or kfun=tempE．nd Function程序运行时，单击命令按钮，则窗体上显示的是（ ）。A．ABCDEFGB．AGBFCEC．GFEDCBAD．AGBFCED

[单选题]在窗体上画一个名称为Command1的命令按钮，并编写如下程序：Private Sub Command1_Click（）D．im x As IntegerStatic y As Integerx=10y=5C．all f1（x,y）Print x,yE．nd SubPrivate Sub f1（ByRef x1 As Integer, y1 As Integer）x1=x1+2y1=y1+2E．nd Sub程序运行后，单击命令按钮，在窗体上显示的内容是（ ）。A．10 5B．12 5C．10 7

[单选题]（ 32 ）在窗体上画一个名称为 Command1 的命令按钮，并编写以下程序：Private Sub Command1_Click()D．im n%,b,tt = 1:b = 1:n = 2D．ob = b*nt = t + bn = n +1Loop Until n>9Print tE．nd Sub此程序计算并输出一个表达式的值，该表达式是A． ） 9 ！B． ） 10 ！C． ） 1 ！ +2 ！ + … +9 ！D． ） 1 ！ +2 ！ + … +10 ！

[单选题]在窗体上画一个名称为Command1的命令按钮,并编写如下程序: Public x As IntegerPrivate Sub Command1_Click()D．im y As Integerx=10 : y=5C．all f(x, y)Print x; yE．nd SubPrivate Sub f(x1 As Integer, y1 As Integer)x1=x+2y1=y+2E．nd Sub程序运行后,单击命令按钮,在窗体上显示的内容是( )。A． 10 5B． 12 7C． 12 2D

[单选题]在窗体上画一个名称为Command1的命令按钮，并编写如下程序： Private Sub Command1_Click( ) Dim x As Integer Static y As Integer x=10 y=5 Call f1(x，y) Print x，y End Sub Private Sub f1(ByRef x1 As Integer，y1 As Integer) x1=x1+2 y1=y1+2 End Sub程序运行后，单击命令按钮，在窗体上显示的内容是A．10 5B．12 5C．

[主观题]将下面的程序填写完整，如要计算1+2+…+10，请完成下面的程序，其中，s是单精度类型的变量。D．im x as Integer，s as Singles=0F．or x=1 to 10s=[ ]Next x