窗体上有一公共对话框Commondialog1,和一个命令按钮Command1,...log1.ShowColorEndSub
举一反三
- 窗体上有文本框Text1和命令按钮Command1,对Command1编写如下事...时,单击命令按钮,出现的信息框显示().
- 窗体上有一个命令按钮Command1,编写Command1_Click()事件过程:For i = 1 To 4: For j = 4 To 8: Sum = Sum + 1: Next j: Next i,运行后,单击按钮,变量Sum的结果是
- 在窗体上有一命令按钮Command1,其Click事件代码如下: Private Sub Command1_Click() Dim a%, b%, i%, n% For i = 1 To 10 n = InputBox("请输入一个整数", "输入数据框", 2) If n Mod 2 = 0 Then a = a + 1 Else b = b + 1 End If Next i MsgBox ("运行结果a=" & str(a) & ", b=" & str(b)) End Sub
- 窗体上有一个名称为Command1的命令按钮，其事件
- 已知一窗体中有如下函数过程和一命令按钮Command1，则单击Command1时，输出结果为。 Public Function Fn(n) If n = 0 Then Fn = 1 Else Fn = Fn(n - 1) * n End Function Private Sub Command1_Click() Print Fn(6) End Sub