柠檬试题库
search
首页 计算机 公务员 驾照 关于
sub
在窗体上有一个命令按钮Commandl，编写事件代码如下： Private Sub Command1_Click() 　　Dim x As Integer，y As Integer 　　x＝12：y＝32 　　Call Proc(x，y) 　　Debug.Print x；y End Sub Public Sub Proc(n As Integer， ByVal m As Integer) 　　n＝n Mod 10 　　m＝m Mod 10 End Sub 打开窗体运行后，单击命令按钮，立即窗口上输出的结果是(　　)。
在窗体中有一个文本框Text1，编写事件代码如下： Private Sub Form_Click() 　　X＝val(Inputbox("输入x的值")) 　　Y＝1 　　If X<>0 Then Y＝2 　　Text1.Value＝Y End Sub 打开窗体运行后，在输入框中输入整数12，文本框Text1中输出的结果是(　　)。
若有以下窗体单击事件过程： Private Sub Form_Click() 　　result＝1 　　For i＝1 To 6 step 3 　　　　　　result＝result * i 　　Next i 　　MsgBox result End Sub 打开窗体运行后，单击窗体，则消息框的输出内容是(　　)。
窗体中有3个命令按钮，分别命名为Command1、Command2和Command3。当单击Command1按钮时，Command2按钮变为可用，Command3按钮变为不可见。下列Command1的单击事件过程中，正确的是(　　)。
若有如下Sub过程： Sub sfun(x As Single,y As Single ) 　　　　t＝x 　　　　x＝t/y 　　　　y＝t Mod y End Sub 在窗体中添加一个命令按钮Command33，对应的事件过程如下： Private Sub Command33_Click() 　　　　Dim a As Single 　　　　Dim b As Single 　　　　a＝5 ：b＝4 　　　　sfun a， b 　　　　MsgBox a & chr(10)＋ chr(13)& b End Sub 打开窗体运行后，单击命令按钮，消息框中有两行输出，内容分别为(　　)。
一个窗体上有两个文本框，其放置顺序分别是：Text1，Text2 ，要想在Text1中按"回车"键后焦点自动转到Text2上，需编写的事件是(　　)。
有下列命令按钮控件test的单击事件过程： Private Sub test_click() 　　Dim I，R 　　R＝0 　　For I＝1 To 5 Step 1 　　　　R＝R＋I 　　Next I 　　bResult.Caption＝Str(R) End Sub 当运行窗体，单击命令按钮时，在名为bResult的窗体标签内将显示的是(　　)。