[简答题]在窗体上建立一个标签Label1，一个文本框TextBox1，一个命令按钮，标签的text属性设置为“VC#程序设计”，设计一个程序，单击命令按钮，将标签上的信息显示在文本框中。触发什么事件？

更多"在窗体上建立一个标签Label1，一个文本框TextBox1，一个命令"的相关试题:

[简答题]在窗体上建立一个标签Label1，一个文本框TextBox1，一个命令按钮，标签的text属性设置为“VC#程序设计”，设计一个程序，单击命令按钮，将标签上的信息显示在文本框中。“将标签上的信息显示在文本框中”的详细代码？

[单项选择]在窗体上画一个名称为text1的文本框和一个名称为label1的标签，要求如下程序运行时，在文本框中输入的内容立即在标签中显示，在下划线上填入的内容是( )。 Private Sub Text1______ Label 1.Caption=Text1.Text End Sub
A. Focus
B. Crick
C. Chang
D. LostFocus

查看答案

[单项选择]在窗体上画四个文本框，并用这四个文本框建立一个控件数组，名称为Text1(下标从0开始，依次增大)，然后编写如下事件过程： Private Sub Command1_Click（　） For Each TextBox In TeXt1 Text1(i)=Text1(i).Index i=i+1 Next End Sub 程序运行后，单击命令按钮，四个文本框中显示的内容分别为 ______。
A. 0 1 2 3
B. 1 2 3 4
C. 0 1 3 2
D. 出错信息

查看答案

[单项选择]在窗体上画四个文本框（如图所示），并用这四个文本框建立一个控件数组，名称为Text1（下标从0开始，自左至右顺序增大），然后编写如下事件过程：　　Private Sub Command1_Click（　）　　　For Each TextBox In Text1　　　　Text1(i) = Text1(i).Index　　　　i = i + 1　　　Next　　End Sub　　程序运行后，单击命令按钮，四个文本框中显示的内容分别为
A. 0　1　2　3
B. 1　2　3　4
C. 0　1　3　2
D. 出错信息

查看答案

[单项选择]在窗体上画四个文本框(如下图所示)，并用这四个文本框建立一个控件数组，名称为 Text1(下标从0开始，自左至右顺序增大)，然后编写如下事件过程 Private Sub Commandl_Click（　） For Each TextBoxinTextl Text1(i)=Text1(i).Index i=i+1 Next End Sub 程序运行后，单击命令按钮，四个文本框中显示的内容分别为( )。
A. 0 1 2 3
B. 1 2 3 4
C. 0 1 3 2
D. 出错信息

查看答案

[单项选择]在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为Text1、Command1和Label1，文本框的Text1属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click（　） x=Int(Val(Text1.Text)+0.5) Label1.Caption=Str(x) End Sub 程序运行后，在文本框中输入28.653，单击命令按钮，标签中显示的内容是______。
A. 27
B. 28
C. 29
D. 30

查看答案

[单项选择]在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为Text1、Command1和Labe11，文本框的Text1属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click（　） x=Int(Val(Text1.Text)+0.5) Labe11.Caption=Str(x) End Sub 程序运行后，在文本框中输入28.653，单击命令按钮，标签中显示的内容是______。
A. 27
B. 28
C. 29
D. 30

查看答案

[单项选择]窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Commandl的命令按钮。运行后的窗体外观如下图所示。设有如下的类型声明： Type Person name As String*8 major As String*20 End Type 当单击“保存”按钮时，将两个文本框中的内容写入一个随机文件Test290.dat中。设文本框中的数据已正确地赋值给Person类型的变量P。则能够正确地把数据写入文件的程序段是( )。
A. Open"c:/Test29.dat"ForRandom As #1 Put#1，1，p Close#1
B. Open"c:/Test29.dat"ForRandomAs#1 Get#1，1，p Close#1
C. Open"c:/Test29.dat"ForRandomAs#1Len=Len( Put#1，1，p Close#1
D. Open"c:/Test29.dat"ForRandomAS#1Len=Len( Get#1，1，p Close#1

查看答案

[单项选择]窗体上有三个文本框Text1、Text2和Text3以及一个命令按钮Command1，设文本框Text1中内容为 12，文本框Text2中内容为34。下面程序的执行结果为______。Private Sub Command1_ Cilick（　） Text3.Text = Str＄(Val(Text1.Text)) + Val(Text2.Text) Print val(Text3,Text)End Sub
A. 12
B. 34
C. 46
D. 1234

查看答案

[单项选择]在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click（　） Text1.Text="Visual" Me.Text1="Basic" Text1="Program" End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的是( )。
A. Visual
B. Basic
C. Program
D. 出错

查看答案

[单项选择]窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。设有如下的类型声明： Type Person name As String*8 major As String*20 End Type 当单击“Command1”按钮时，能够正确地把数据写入文件的程序段是______。
A. Private Sub Command1_Click() Dim p As Person name=Text1. Text major=Text2. Text Open"C:/dat dat" For Random As #1 Put #1, 1, p Close #1 End Sub
B. Private Sub Command1_Click() Dim p As Person name=Text1.Text major=Text2. Text Open"C:/dat dat" For Random As #1 Get #1, 1, p Close #1 End Sub
C. Private Sub Command1_Click() Dis p As Person name=Text1. Text major=Text2. Text open "C:/dat dat" For Random As #1 Len=Len( Put #1, 1, p Close #1 End Sub
D. Private Sub Command1_Click() Dim p As Person name=Text1. Text major=Text2. Text Open "C:/dat dat" For Random As #1=Len( Get #1, 1, p Close #1 End Sub

查看答案

[单项选择]在窗体上画一个名称为Text1的文本框，要求文本框只能接收大写字母的输入，以下能实现该操作的事件过程是______。
A. Private Sub Text1_KeyPress(KeyAscii As Intege If KeyAscii＜65 Or KeyAscii＞90 Then MsgBox"请输入大写字母" KeyAscii=0 End If End Sub
B. Private Sub Text1_KeyDown(Keycode As Integer, Shift As Intege If KeyCode＜65 Or Keycode＞90 Then MsgBox"请输入大写字母" KcyCode=0 End If End Sub
C. Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Singl If Asc(Text1. Tex＜65 Or Asc(Text1. Tex＞90 Then MsgBox"请输入大写字母" End If End Sub
D. Private Sub Text1_Change() If Asc(Text1. Tex＞64 Or Asc(Text1. Tex＜91 Then MsgBox"请输入大写字母" End If End Sub

查看答案

[单项选择]在窗体上画一个名称为Text1的文本框，要求文本框只能接收大写字母的输入。以下能够正确实现该操作的事件过程是______ 。
A. Private Sub Text1_ KeyPress (KeyAscii As Intege IfKeyAscii ＜ 65 Or KeyAscii ＞ 9t Then MsgBox “请输入大写字母” End If End sub
B. Private Sub Text1_ KeyDown (KeyCode As Integer, Shift As Intege IfKeyCode ＜ 65 Or KeyCode ＞ 91 Then MsgBox “请输入大写字母” End If End sub
C. Private Sub Text1_ MouseDown (Button As Integer, _ Shift As Integer, X As Single, YAs Singl IfAsc (Text1.Tex ＜ 65 Or Asc (Text1. Tex ＞ 91 Then MsgBox “请输入大写字母” End If End sub
D. Private Sub Text1_ Change() IfAsc(Text 1.Tex ＜ 65 Or Asc(Text1. Tex ＞ 91 Then MsgBox “请输入大写字母” End If End sub

查看答案

我来回答:

提交