下列程序计算Sn的值。Sn=a+aa+aaa+…+aaa…a,其中最后一项为n个。例如:a=5,n=4时,则Sn=5+55+555+5555。请在空白处填人适当的内容,将程序充完整。Private Sub Command1_Click() Dim a As Integer,n As Integer,Cout As Integer Dim Sn As Long,Tn As Long Cout=1 Sn=0 Tn=0 a=InputBox("请输入a的值:") 【11】 Do Tn=Tn * 10 + a Sn二Sn + Tn Cout=Cout+1 【12】 Debug.Print a,n,SnEnd Sub
Wood carving began as a necessity in America and developed into an art. Because of the lack of other materials, early settlers were forced to make tools and utensils out of the wood. At first these articles were whittled with a knife, but when pioneer craftsmen set up their primitive shops most of them were fashioned on a lathe - a machine which holds an object and rotates it while it is being shaped by a tool. However, even after Massachusetts-born Thomas Blanchard designed a lathe which could turn irregular shapes - an innovation that made possible mass production of gun-stocks, shoe lasts, oblong and square wooden ware - craftsmen who could use knife and chisel skill- fully were still in demand. Some found ready employment in shops of cabinet makers and chairmakers, while others carved decoys. Still others specialized in creating shop signs, ship figureheads, or in decoration interior woodwork. A few even accepted commissions to make busts of prominent citizens. Which of the following objects was an important woodworking tool used by early American craftsmen
A bust.
B. A decoy.
C. A figurehead.
D. A chisel.
Wood carving began as a necessity in America and developed into an art. Because of the lack of other materials, early settlers were forced to make tools and utensils out of the wood. At first these articles were whittled with a knife, but when pioneer craftsmen set up their primitive shops most of them were fashioned on a lathe - a machine which holds an object and rotates it while it is being shaped by a tool. However, even after Massachusetts-born Thomas Blanchard designed a lathe which could turn irregular shapes - an innovation that made possible mass production of gun-stocks, shoe lasts, oblong and square wooden ware - craftsmen who could use knife and chisel skill- fully were still in demand. Some found ready employment in shops of cabinet makers and chairmakers, while others carved decoys. Still others specialized in creating shop signs, ship figureheads, or in decoration interior woodwork. A few even accepted commissions to make busts of prominent citizens. The first settlers used wood for their utensils and tools because it was ______.
A. durable
B. inexpensive
C. available
D. attractive
在窗体上有一个“背景色变换”按钮和一个“结束”按钮。单击“背景色变换”按钮,背景色变为红色;再单击,背景色变为绿色;再单击,背景色变为蓝色;再单击背景色变为红色……如此循环。单击“结束”按钮,程序运行结束。请填空。 Private Sub cmdChange_Click() If Mark=0 Then 【13】 Mark=1 ElseIf 【14】 Then Forml.BackColor=vbGreen Mark=2 ElseIf Mark=2 Then Form1.BackColor;vbBlue 【15】 End If End Sub Private Sub cmdExit_Click() End End Sub