动力与电气工程
设计在∫1=50Hz电源上运行的三相感应电动机现改为在电压相同频率为60Hz的电网上，其电动机的（）。A、Tst减小，Tmax减小，Ist增大B、Tst减小，Tmax增大，Ist增加C、Tst减小，Tmax减小，Ist增加D、Tst增大，Tmax增大，Ist增大
题目
设计在∫1=50Hz电源上运行的三相感应电动机现改为在电压相同频率为60Hz的电网上，其电动机的（）。
- A、Tst减小，Tmax减小，Ist增大
- B、Tst减小，Tmax增大，Ist增加
- C、Tst减小，Tmax减小，Ist增加
- D、Tst增大，Tmax增大，Ist增大
相似问题和答案
第1题：
在通用声明中定义a，在窗体中添加一个命令按钮Command1，编写如下程序代码：
DimaAsInteger
Subtest()
a=a+1:b=b+1:c=c+1
Print"Sub:";a;"，";b;"，";c
EndSub
PrivateSubCommand1_Click()
a=2:b=3:c=4
Calltest
Calltest
EndSub
程序运行后，单击命令按钮，窗体中将显示( )
A.Sub：3，4，5Sub：4，5，6
B.Sub：2，3，4Sub：2，3，4
C.Sub：3，1，1Sub：4，1，1
D.Sub：1，1，1Sub：1，1，1
第2题：
设计在f=50HZ电源上运行的三相感应电动机现改为在电压相同频率为60HZ的电网上，其电动机的()。
A.Tst减小，Tmax减小，Ist增大
B.Tst减小，Tmax增大，Ist减小
C.Tst减小，Tmax减小，Ist减小
D.Tst增大，Tmax增大，Ist增大
第3题：
有一过程如下:
Sub Sub1(m As Integer,total As Long)
Dim i As Integer
total=1
For i=1 To m
total=total*i
Next
End Sub
调用它的事件过程如下:
Private Sub Command1_Click()
Dim tot As Long,a As Integer
a=Val(InputBox("请输入数据"))
Call Sub1(a,tot)
Print tot
End Sub
则输入数据5,运行结果为【 】。
120 解析：考查考生对过程中参数传递方式的掌握情况。本题的难点是实参与形参的传递问题。total按ByRef参数传递。子过程的功能是计算n!,题中输入5,因此5!=120。参数按传值方式传递时,不改变实参中的值;按传地址的方式传递时,实参和形参指向的内容被改变。
第4题：
在窗体上画—个名称为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show Text1.Text==" " Text1.SetFocus End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single，Y As Single) Print“程序设计” End Sub Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Print "VisualBasic"； End Sub 程序运行后，如果按A键，然后单击窗体，则在窗体上显示的内容是 ______。
A．Visual Basic
B．程序设计
C．A程序设计
D．Visual Basic程序设计
解析：因为程序一运行，文本框Text1获得焦点，按下A键后，执行Text1_KeyDown事件，在窗体上显示“Visual Basic”；这时再单击窗体，则触发Form_MouseUp事件，在窗体上显示“程序设计”。
第5题：
在窗体上添加文本框Text1，然后编写下列程序： Private Sub Form_Load() Text1.Text=" " End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) Char=Chr(KeyAscii+1) KeyAscii=Asc(Ucase(Char)) End Sub Private Sub Command1_Click() Print Text1.Text End Sub 程序运行后，在文本框中依次输入1、2、3、a、b、c，单击命令按钮，则窗体上显示的内容是
A．23BCD
B．ABC
C．!@#ABC
D．123abc
解析：在向文本框中依次输入1、2、3、a、b、c的同时，Text1_KeyPress过程分别接收到的是KeyAscii(各字符的ASCII码)，Chr函数将加过1的ASCII码转换成字符，UCase函数将字符转换成大写字符，数字保持不变，Asc函数又将字符转换成ASCII码，最后出现选项A的字符。
第6题：
设窗体上有一个名为Text1的文本框，并编写如下程序：Private Sub Form_Load() Show Text1.Text="" Text1.SetFocusEnd SubPrivate Sub Form_MouseUp(Button As Integer，_Shift As Integer,X As Single,Y As Single） Print"程序设计"End SubPrinvate Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print "Visual Basic";End Sub 程序运行后，如果在文本框中输入字母“a”，然后单击窗体，则在窗体上显示的内容是。A．Visual BasicB．程序设计C．Visual Basic 程序设计D．a程序设计
【解析】本题考查鼠标和键盘的事件过程。题目程序实现的功能是，当在文本框中有输入时，触发Text1_KeyDown事件，在窗体中输出“Visual Basic”，如果单击窗体，则会触发Form_MouseUp事件，在窗体中输出“程序设计”，所以正确答案为选项C。如果在文本框一直输入，则在窗体上会一直输出“Visual Basic”，同样，如果不停单击窗体，则在窗体上会一直输出“程序设计”。
第7题：
有以下程序：
Private Sub Form_Activate()
For j=1 to 3
x=3
For i=1 to 2
x=x+6
Next
Next
Print x
End Sub
程序运行后，窗体上显示的结果为______。
15 解析：每一次j的赋值后，x都等于3，所以只用计算最后一层循环当j=3，i=1时，x=3+6=9；i=2时，x=9-6=15。
第8题：
在窗体上画一个名称为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show Text1.Text=" Text1.SetFocus End Sub Phvate Sub Form_MouseUp(Buuon As Integer,Shift As Integer,X As Single，Y As Single) Phnt“程序设计” End Sub Private Sub Textl_KeyDow
A．Visual Basic
B．程序设计
C．A程序设计
D．VisualBasic程序设计
第9题：
有如下程序： Private Sub Command1_Click() Dim a As Single Dim b As Single a=5:b=4 Call Sub1(a,b) End Sub Sub Sub1(x As Single，y As Single) t=X X=t\Y Y=t Mod y End Sub 在调用运行上述程序后，a和b的值分别为
A．0 0
B． 1 1
C．2 2
D．1 2
解析：考查考生对调用通用过程的掌握情况。
[解题要点] 调用一个过程时，必须把实际参数传送给过程，完成形式参数与实际参数的结合，然后用实际参数执行调用的过程。因为在默认的情况下，变量都是通过“引用”传送给sub1过程，在这种情况下，可以通过改变过程中相应的参数来改变变量的值。过程Sub1的形参获得a，b的地址，此时x=5，y=4，在过程Sub1中，将x，即5的值赋给t，而将t\y的值赋给x，将t除以y的余数赋给y，此时x,y的值为1,1。
[错解分析] 调用通用过程可以返回多个参数值。
[考点链接] 过程调用、参数传递。
第10题：
设窗体上有一个名为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show Text1.Text=" " Text1.SetFocus End Sub Private Sub Form_MouseUp(Button As Integer， Shift As Integer，X As Single，Y As Single) Print“程序设计” End Sub Private Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer) Print "Visual Basic"； End Sub 程序运行后，如果在文本框中输入字母“a”，然后单击窗体，则在窗本上显示的内容是
A．Visual Basic
B．程序设计
C．Visual Basic程序设计
D．a程序设计
解析：本题考查鼠标和键盘的事件过程。题目程序实现的功能是，当在文本框中有输入时，触发Text1 KeyDown事件，在窗体中输出“Visual Basic”，如果单击窗体，则会触发 Form. MouseUp事件，在窗体中输出“程序设计”，所以正确答案为选项C。如果在文本框一直输入，则在窗体上会一直输出“Visual Basic”，同样，如果不停单击窗体，则在窗体上会一直输出“程序设计”。