键结合（不动）的轴槽的表面粗糙度R_a值不大

第1题

文本框Text1的KeyDown事件过程如下： Private Sub Text 1_KeyDown(KeyCode As Integer,Shift As Integer) … End Sub 其中参数KeyCode的值表示的是发生此事件时( )。A．是否按下了＜Alt＞键或＜Ertl＞键B．按下的是哪个数字键C．所按的键盘键的键码D．按下的是哪个鼠标键

点击查看答案

第2题

在窗体中添加一个标签LblResult和一个命令按钮Command1，然后编写程序。程序的功能是单击命令按钮，计算1+2+3+4+5的值，并把结果转化为字符串显示在标签内，能够实现上述功能的程序段是， ( )A．Private Sub Command1_Click() Dim I,R As Integer For I=1 To 5 Step 1 R=R+I Next LblResult. Name=Str$ (R) End SubB．Private Sub Command1_ClickO Dim I,R As Integer For I=1 To 5 Step 1 R=R+I Next LblResult. Caption= Str$ (R) End SubC．Private Sub Command1_Click() Dim I,R As Integer Do While I＜5 R=R+I I=I+1 Loop LblResult. Caption=Str$ (R) End SubD．Private Sub Command1_Click() Dim I,R As Integer Do R=R+I I=I+1 Loop While I＜5 LblResult. Caption=Str$ (R) End Sub

点击查看答案

第3题

【程序说明】 计算下列算式的值。a，Ai为正整数，从键盘输入。其小∑Ai＝1+2…+ Ai，Ai!＝1 *2*3*Ai(i＝1，2… a)。【程序】SET TAIK OFFCLEARINPUT“M＝”TO MSTORE 0 TO S1，S2FOR I=1 TO M(8)DO SUB1DO SUB2ENDFOR? ” 所求算式的值为：“+ALLTRIM(STR(S1/S2，15，3))SET TALK ONPROCEDURE SUB1(9)FOR R＝1 TO AK＝K+RENDFOR(10)RETURNPROCEDURE SUB2(11)FOR P＝1 TO AT=T*PENDFOR(12)RETURN(8)A．INPUT“A＝”TO AB．INPUT“I=”TO IC．INPUT“R=”TO STR(R)D．INPUT“K＝”TOK

点击查看答案

第4题

编写如下事件过程： Private Sub Form_KeyDown (KeyCode As Integer，Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_Key Press (KeyAscii As Integer) Print Chr (Key Ascii) End Sub 在一般情况下(即不按住Shift键和锁定大写键时)运行程序，若按“T”键，则程序输出的结果是A．T TB．t TC．T TD．t t

点击查看答案

第5题

在窗体上画了两个按钮控件Command1和Command2，有如下程序： Private Sub Command1_Click() Print "Visual"； End Sub Private Sub Command2_Click() Print "Basic"； End Sub Private Sub Form_Load() CommandCancel=True Command1.Cancel=True End Sub 执行程序后，按键盘Cancel键，在窗体上输出的结果是A．BasicB．VisualC．CancelD．True

点击查看答案

第6题

编写如下两个事件过程： Private Sub Form_KeyDown (KeyCode As Integer, Shift As Integer) Print Cb_r(KeyCode) End Sub Private Sub Form_KeyPress( KeyAscii As Integer) Print Chr(KeyAscii) End Sub 在一般情况下(即不按住Shift键和锁定大写键时)运行程序，如果按“A”键，则程序输出的结果是A．A AB．a AC．A aD．a a

点击查看答案

第7题

将窗体的KeyPreview属性设置为True，然后编写如下过程： Private Sub Form. KeyDown(KeyCode As Integer，Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_KeyUp(KeyCode As Integer，Shift As Integer) Print Chr(KeyCode+2) End Sub 程序运行后，如果按“A”键，则输出的结果为A．A AB．A BC．A CD．A D

点击查看答案