首页 > 计算机应用技术> JAVA程序设计

网友您好，请在下方输入框内输入要搜索的题目：

请输入或粘贴题目内容搜题

搜题

拍照、语音搜题，请扫码下载APP

题目内容（请给出正确答案）

[主观题]

在一个窗体上有两个命令按钮，cmdMax 和 cmdMin。单击cmdMax时，窗体上显示“字体由小变大”，字号每次

增加2；单击cmdMin时，窗体上显示“字体由大变小”，字号每次减小2。请填空。 Private Sub Form_Load() Forml．Caption =“字体变化示范” cmdMax．Caption=“字体变大” cmdMin．Caption=“字体变小” End Sub Private Sub cmdMax_Click() 【】 Forml．Print”字体由小变大” End Sub Private Sub cmdMin_Click() 【】 Forml．Print“字体由大变小” End Sub

答案

查看答案

发布时间：2022-12-03

更多“在一个窗体上有两个命令按钮，cmdMax 和 cmdMin。单击cmdMax时，窗体上显示“字体由小变大”，字号每次”相关的问题

第1题

在窗体中添加一个命令按钮，然后编写如下程序： Private Sub Command1_Click() Dim a As Integer

, b As Integer a=InputBox("Enter the Firstinteger") b=InputBox("Enter the Secondinteger") Print b+a End Sub 程序运行后，单击命令按钮，先后在两个输入框中分别输入123和123，则输出结果是()。

A.456

B.246

C.123123

D.123

点击查看答案

第2题

在窗体上画一个命令按钮，然后编写如下事件过程：

Private Sub Command1_Click（）

Dim a, b As Integer

a = val（InputBox（"Enter the First integer"））

b = val（InputBox（"Enter the Second integer"））

Print a + b

End Sub

程序运行后，单击命令按钮，先后在两个输入对话框中分别输入123和456，则输出结果是和（）。

A.579

B.123

C.456

D.123456

点击查看答案

第3题

在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事

件过程： Private Sub Command1_Click() n= Text1.Text Select Case n Case 1 To 20 x=10 Case 2，4，6 x=20 Case Is＜10 x=30 Case 10 x=40 End Select Text2.Text=x End Sub 程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是()。

A.40

B.30

C.20

D.10

点击查看答案

第4题

在窗体中添加一个命令按钮，命名为Command1，然后编写如下程序：PrinvateSubCommand1_Click（)A=1234B=Str（A)C=Len（B)PrintCEndSub程序运行后，单击命令按钮，则在窗体上显示的内容是（)

A.0

B.5

C.6

D.7

点击查看答案

第5题

在窗体上添加一个名称为Command1的命令按钮，然后编写如下事件过程：OptionBase1PrivateSubComma

A.空白

B.错误提示

C.绿色

D.白色

点击查看答案

第6题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click（)x=-5 If x＞0 Then y=x∧2 Else y=x End If Print y End Sub 程序运行后，单击命令按钮，窗体上显示的是（)。

A.-5

B.25

C.1

D.-1

点击查看答案

第7题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：

Private Sub Command1_Click（）

Dim a As Integer, s As Integer

a = 8

s = 1

s = s + a

a = a－1

Loop While a ＜＝ 0

Print s; a

End Sub

程序运行后，单击命令按钮，则窗体上显示的内容是（）。

A.7 9

B.34 0

C.9 7

D.死循环

点击查看答案

第8题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim num As Integer num = 1 Do Until num > 6 Print num; num = num + 2.4 Loop End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是()。

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim num As Integer num = 1 Do Until num ＞ 6 Print num; num = num + 2.4 Loop End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是()。

A.无数据输出

B.1 3.4 5.8

C.1 4 7

D.1 3 5

点击查看答案

第9题

在窗体上画一个名称为Command1的命令按钮，并编写如下程序：

Private Sub Command1_Click（）

Dim x As Integer

Static y As Integer

x=10

y=5