搜题

【填空题】

在窗体上画一个名称为Command1、标题为“计算”的命令按钮；画3个文本框，名称分别为Text1、Text2和Text3；然后画4个标签，名称分别为Label1、Label2、Label3和Label4，标题分别为“操作数1”、“操作数2”、“运算结果”、“＝”符；再建立一个含有4个单选按纽的RadioGroup组件，名称为RadioGroup 1，标题分别为“+”、“-”、“*”和“/”。程序运行后，在Text1、Text2中输入两个整数值，选中一个单选按钮后单击命令按钮，相应的计算结果显示在Text3，程序运行情况如图所示。请填入适当的内容，将程序补充完整。 <img src="https://nimg.ppkao.com/2018-08/luke/2018080114200334040.jpg?sign=dc7c795a709c6a78db1d4dc9637ff312&t=62d1d618" /> <br /> procedure TForm1.Button1Click(Sender: TObject); <br /> var <br />    x1,x2,y :Integer; begin <br />    x1 := StrToInt(Edit1.（①）);    <br /> x2 := StrToInt(Edit2.（②）);    <br /> Case （③）.ItemIndex of    <br />  0: y := x1 + x2 ;    <br />  1: y := x1 - x2;  &#8194

查看正确答案

更多“ 在窗体上画一个名称为Command1、标题为“计算”的命令按钮；画3个文本框，名称分别为Text1、Text2和Text3；然后画4个标签，名称分别为Label1、Label2、Label3和Label4，标题分别为“操作数1”、“操作数2”、“运算结果”、“＝”符；再建立一个含有4个单选按纽的RadioGroup组件，名称为RadioGroup 1，标题分别为“+”、“-”、“*”和“/”。程序运行后，在Text1、Text2中输入两个整数值，选中一个单选按钮后单击命令按钮，相应的计算结果显示在Text3，程序运行情况如图所示。请填入适当的内容，将程序补充完整。 <img src="https://nimg.ppkao.com/2018-08/luke/2018080114200334040.jpg?sign=dc7c795a709c6a78db1d4dc9637ff312&t=62d1d618" /> <br /> procedure TForm1.Button1Click(Sender: TObject); <br /> var <br />    x1,x2,y :Integer; begin <br />    x1 := StrToInt(Edit1.（①）);    <br /> x2 := StrToInt(Edit2.（②）);    <br /> Case （③）.ItemIndex of    <br />  0: y := x1 + x2 ;    <br />  1: y := x1 - x2;  &#8194”相关的问题

第1题

[单选题] 在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程：程序运行后，单击命令按钮，则标签中显示的内容是（）

A、5 B、15 C、20 D、25

点击查看答案

第2题

[单选题] 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click（） Dim c As Integer，n As Integer For c=0 To 50 c=c+3 n=n+1 Ifc＞10Then Exit For Next c Text1.Text=Str（n） End Sub 程序运行后，单击命令按钮，在文本框中显示的值是（）

A、2 B、3 C、4 D、5

点击查看答案

第3题

[单选题] 在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序： Private Sub Command1_Click（） Static x As Integer Stati cy As Integer y=1 y=y+5 x=x+5 Printx；y End Sub 程序运行时，三次单击命令按钮Commandl后，窗体上显示的结果为（）

A、1516 B、156 C、1515 D、56

点击查看答案

第4题

[单选题] 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click（） Dim array1（10，10）As Integer Dim I，j As Integer For I=1 To 3 For j=2 To 4 array1（I，j）=I+j Next j Next I Text1.Text=array1（2，3）+array1（3，4） End Sub 程序运行后，单击命令按钮，在文本框中显示的值是（）

A、12 B、13 C、14 D、15

点击查看答案

第5题

[单选题] 在窗体上画两个文本框，（其Name 属性分别为Text1和Text2）和一个命令按纽（其Name属性为Command1），然后编写如下事件过程（）

A、1和0 B、2和72 C、3和50 D、4和168

点击查看答案

第6题

[单选题] 在窗体上画两个名称分别为Text1、Texte2的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click（） Dim x As Integer，n As Integer x=1 n=0 DoWhilex＜20 x=x*3 n=n+1 Loop Text1.Text=Str（x） Text2.Text=Str（n） End Sub 程序运行后，单击命令按钮，在两个文本框中显示的值分别是（）

A、15和1 B、27和3 C、195和3 D、600和4

点击查看答案

第7题

[单选题] 在窗体上画两个文本框（其Name属性分别为Text1和Tex12）和一个命令按钮（其Name属性为Command1），然后编写如下事件过程：程序运行后，单击命令按钮，在两个文本框中显示的值分别为（）。

A、10和0 B、2和100 C、3和50 D、4和168

点击查看答案

第8题

[简答题] 在窗体（Name属性为Form1）上画两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（Name属性为Command1），然后编写如下两个事件过程：程序运行后，在第一个文本框（Text1）和第二个文本框（Text2）中分别输入“同学们，”和“你们好”，然后单击命令按钮，则输出结果为多少？

点击查看答案

第9题

[单选题] 在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Private Sub Command1_Click（） Dim I As Integer，j As Integer Dim a（10，10）As Integer For I=1 To 3 For j=1 To 3 a（I，j）=（I-1）*3+j Print a（I，j）； Next j Print Next i End Sub 程序运行后，单击命令按钮，窗体上显示的是（）。（其中CR表示回车和换行）

A、1 2 3 CR 3 4 5 CR 5 6 7 CR B、2 3 4 CR 4 5 6 CR 789 CR C、1 4 7 CR 4 5 8 CR 9 10 11 CR D、1 2 3 CR 4 5 6 CR 7 8 9 CR

点击查看答案

第10题

[单选题] 应用程序窗体的名称属性为Frm1，窗体上有一个命令按钮，其名称属性为Cmd1，窗体和命令按钮的Click事件过程名分别为（）

A、Frm1_Click（）Cmd1_Click（） B、Form_Click（）Command1_Click（） C、Frm1_Click（）Command1_Click（） D、Form_Click（）Cmd1_Click（）

点击查看答案

账号：登录

TOP

请使用微信扫码支付

订单号：
遇到问题请联系在线客服