搜档网
当前位置:搜档网 › Form1添加一个文本框Text1,通过属性窗口设置窗体和文本框的属性,实现如下功能

Form1添加一个文本框Text1,通过属性窗口设置窗体和文本框的属性,实现如下功能

Form1添加一个文本框Text1,通过属性窗口设置窗体和文本框的属性,实现如下功能
Form1添加一个文本框Text1,通过属性窗口设置窗体和文本框的属性,实现如下功能

基础题(1)

【解题思路】文本框控件的MultiLine属性用于设置文本框是否能以多行显示文本,值为True表示允许,值为False表示不允许;Font属性用于设置控件标题中文本的字体、字号和字型等。Text属性用于设置文本框中显示的文本。窗体标题通过其Caption属性设置。

【操作步骤】

步骤1:建立界面,并设置控件的属性。程序中用到的控件及属性见表3.110和表3.111。

表3.110

步骤2:调试并运行程序,关闭程序后按题目要求存盘。

基础题(2)

【解题思路】在窗体上建立控件后,先设置控件的属性,再编写事件过程。

单击命令按钮触发Click事件。利用按钮的Height和Width属性来改变按钮的大小;利用按钮的Left和Top属性来改变按钮的位置。

【操作步骤】

步骤1:建立界面,并设置控件的属性。程序中用到的控件及属性见表3.112。

表3.112

步骤2:编写程序代码。

参考答案

Option Explicit

Private Sub Cmd1_Click()

Cmd1.Left = 0

Cmd1.Top = 0

End Sub

简单题(1)

【解题思路】Rnd()函数用于产生一个小于1但大于或等于0的随机数。

本题程序用变量Max记录最大数,最初把数组的第一个元素的值赋给Max,然后通过For循环语句将其后的元素依次与之比较,如果其值大于Max则将其赋值给Max,依次类推,最终Max 的值就是数组各元素中的最大值。

【操作步骤】

步骤1:打开本题工程文件。

步骤2:分析并编写程序代码。

程序提供代码

Option Base 1

Private Sub Command1_Click()

Dim arrN(30) As Integer

Dim Max As Integer

Randomize

For i = 1 To 30

'arrN(i) = Int(Rnd * ?)

Next i

'? = arrN(1)

For i = 2 To 30

'If ? Then

Max = arrN(i)

End If

Next i

Print Max

End Sub

程序结束

参考答案

第1个?处填入:1000

第2个?处填入:Max

第3个?处填入:arrN(i) > Max或Max < arrN(i)

简单题(2)

【解题思路】本题要求的是1000以内能被5或7整除的数的个数。在Visual Basic中,使用Mod 运算符来判断一个数是否可以被另一个数整除,如果计算结果为0,则表示可以整除,否则不能

整除。

【操作步骤】

步骤1:打开本题工程文件。

步骤2:分析并编写程序代码。

参考答案

Function Fun()

Dim s As Integer, i As Integer

For i = 1 To 1000

If i Mod 5 = 0 Or i Mod 7 = 0 Then

s = s + 1

End If

Next i

Fun = s

End Function

Private Sub Cmd2_Click()

Cmd2.Height = Cmd2.Height * 2

Cmd2.Width = Cmd2.Width * 2

End Sub

综合题

【解题思路】Tab函数常与Print # 语句或Print方法一起使用,对输出进行定位,其语法为:Tab[(n)]

其中,可选的参数n表示在显示或打印下一个表达式之前移动的列数。在使用数组时,应先定义。Input #语句用于读取顺序文件中一项(或多项)数据给一个变量(或多个变量),其语法格式为:

Input # FileNumber ,Varlist

其中:FileNumber参数表示打开文件的句柄,Varlist为变量列表。语句"Option Base 1"用于限定数组下标的下限默认为1。

本题中文件以Input方式打开,使用一个5行、5列的二维数组Mat来存放数据,并使用一个嵌套的For循环显示矩阵,对于5*5的矩阵来说,位于左上到右下对角线上的元素具有行号等于列号的特点。

【操作步骤】

步骤1:打开本题工程文件。

步骤2:分析并编写程序代码。

程序提供代码

Option Base 1

Private Sub Form_Click()

Const N = 5

Const M = 5

'Dim ?

Dim i, j

' Open App.Path & "\" & "datain.txt" ? As #1

For i = 1 To N

For j = 1 To M

'?

Next j

Next i

Close #1

Print

Print "初始矩阵为:"

Print

For i = 1 To N

For j = 1 To M

Print Tab(5 * j); Mat(i, j);

Next j

Print

Next i

Print

Print "左上-右下对角线上的数为:"

For i = 1 To N

For j= 1 To M

'If ? Then Print Tab(5 * j); Mat(i, j);

Next j

Next i

End Sub

程序结束

参考答案

第1个?处填入:Mat(N, M) As Integer或Mat(5, 5) As Integer 第2个?处填入:For Input

第3个?处填入:Input #1, Mat(i, j)

第4个?处填入:i=j

步骤3:调试并运行程序,关闭程序后按题目要求存盘。

为Form1、标题为“文本框练习”的窗体上添加1个名称为Text1的文本框

基本题(1) 【解题思路】MaxLength属性设置文本框中输入的字符串长度是否有限制。默认值为0,表示该单行文本框中字符串的长度只受操作系统内存的限制;若设置为大于0的数,则表示能够输入的最大字符数目。 【操作步骤】 步骤1:建立界面,并设置控件的属性。程序中用到的控件及属性见表3.162。 表3.162 步骤2:调试并运行程序,关闭程序后按题目要求存盘。 基本题(2) 【解题思路】按照题目要求设置标签和命令按钮的属性,在命令按钮的Click事件过程中,通过设置标签的FontSize属性值实现标签内容字体的放大和还原。 【操作步骤】 步骤1:建立界面,并设置控件的属性。程序中用到的控件及属性见表3.163和表3.164。 表3.163 表3.164 步骤2:编写程序代码。 参考答案 Private Sub Command1_Click() Label1.FontSize = Label1.FontSize + 2 End Sub Private Sub Command2_Click() Label1.FontSize = 12

End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 简单题(1) 【解题思路】在Cmd Click 事件过程中,通过Select Case语句判断选择命令按钮数组的Index属性值,Case 0表示单击"开始"按钮,计时器Timer1和"暂停"按钮的Enabled属性为True,状态变为可用,且如果Cmd(0)的Caption属性是"开始"按钮,那么Cmd(0)的Caption属性变为"继续",且Cmd(0)为不可用,单击"继续"按钮,则Timer1接着开始工作,"继续"按钮变为不可用,"暂停"按钮变为可用。同理Case 1表示单击"暂停"按钮,则Timer1停止工作,"暂停"按钮变为不可用,"继续"按钮变为可用;Case 2表示单击"结果"按钮,则结束程序运行。 Timer1 Timer 事件过程通过If判断语句,实现秒向分钟,分钟向小时的转换,并在三个文本框中显示出来。 【操作步骤】 步骤1:打开本题工程文件,画1个计时器timer1,设置计时器Interval属性为1000,Enabled属性设置为False。 步骤2:分析并编写程序代码。 程序提供代码 Dim t(3) As Integer Private Sub Cmd_Click(Index As Integer) ' Select Case ? Case 0 'Timer1.Enabled = ? Cmd(1).Enabled = True If Cmd(0).Caption = "开始" Then Cmd(0).Caption = "继续" End If 'Cmd(0).Enabled =? Case 1 Timer1.Enabled = False Cmd(0).Enabled = True Cmd(1).Enabled = False Case 2 End End Select End Sub Private Sub Timer1_Timer() t(3) = t(3) + 1 ' If t(3) = ? Then t(3) = 0 t(2) = t(2) + 1 If t(2) = 60 Then t(2) = 0

vb基础应用答案

91: (1)【考点分析】本题考点有ComboBox控件的属性设置,窗体Caption属性。 【解题思路】在窗体上添加控件后,要设置控件的相关属性,使其外观、数据与图示相同。【操作步骤】 步骤1:新建一个窗体,在窗体上添加一个ComboBox控件。 步骤2:设置这个ComboBox控件的名称为Cbo1,Style属性为"1-Simple Combo",List 值输入北京、天津、上海. 步骤3:设置窗体Caption属性为"使用组合框"。 步骤4:测试并运行程序,关闭程序后按题目要求存盘。 (2)【考点分析】本题考点有:窗体的Caption属性,窗体的单击事件,PictureBox控件的Print方法。 【解题思路】单击窗体,则改变窗体标题和PictureBox控件的显示文本,说明在窗体的Click事件中执行了改变以上相关属性的语句。改变窗体标题可直接对Caption属性赋值,改变PictureBox控件的显示文本可以使用它的Print方法。 【操作步骤】 步骤1:新建工程,设置窗体Capion属性为"程序设计"。 步骤2:在窗体上添加PictureBox控件,设置名称为P1。 步骤3:打开代码编辑窗口,在Form的Click事件下编写如下代码。 参考答案 P1.Print Caption Caption = "Basic" 步骤4:测试并运行程序,关闭程序后按题目要求存盘。 92: (1)【考点分析】本题考点是Image控件的属性、CommandButton控件的Tab属性。 【解题思路】使用图像随着控件的大小而变化,需要设置Image控件的Stretch属性为True。而窗体运行时按回车按即执行按钮的Click事件,需要设置按钮控件的TabIndex属性为0,TabStop属性为True。 【操作步骤】 步骤1:新建一个工程。 步骤2:在窗体上添加一个Image控件,一个Button控件。控件的主要属性设置如下表。 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2)【考点分析】本题考点是CommonDialog控件的添加使用,菜单的添加和事件设置。 【解题思路】通用对话框是一种ActiveX控件,在一般情况下,启动VB后,在工具箱中没有通用对话框控件。为了把通用对话框控件加到工具箱中,其操作步骤如下:执行"工程"菜单中的"部件"命令,打开"部件"对话框。在对话框中选择"控件"选项卡,然后在控件列表框中,选择"Microsoft Common DialogControl 6.0"。单击"确定"按钮,通用对话框立即被加到工具箱中,通用对话框的属性可以在属性窗口中直接设置。 菜单的添加可以在窗体上右击,选择"菜单编辑器"来创建和修改。 【操作步骤】 步骤1:新建一个工程。如果工具箱中没有通用对话框控件,则通过菜单"工程"-"部件"

在窗体上建立一个文本框、一个图片框和三个命令按钮,把三个命令.

1、编写程序,用文本框检查口令输入。在窗体上建立一个文本框、一个图片框和三个命令 按钮,把三个命令按钮的标题分别设置为“开始”、“检查口令”和“结束”。程序运行后,单击第一个命令按钮,清除文本框中的信息,并把光标移到文本框中;在文本框中输入口令;单击第二个命令按钮,检查输入口令是否正确。如果正确,则在图片框中显示图形;否则显示信息框,要求重新输入,此时调用第一个命令按钮的Click 事件过程,重新在文本框中输入口令,直到输入口令正确为止。如果单击“结束”按钮,则结束程序。画出界面设计,属性列表,写出相关事件过程代码。 答:Text1 PasswordChar = "*" Command3 Caption = " 结束" Command2 Caption = " 检查口令" Command1 Caption = " 开始" Image1 Stretch = True Visible = False Label1 Caption = " 口令"

Option Explicit Dim msg As String Const password = "1234" Private Sub Command1_Click( Text1.Text = "" Image1.Visible = False Text1.SetFocus End Sub Private Sub Command2_Click( If Text1.Text = password Then Image1.Visible = True Else msg = "口令不对,请重新输入!" MsgBox msg Call Command1_Click End If End Sub Private Sub Command3_Click( End

窗体中的常用控件 单选3分

窗体中的常用控件单选3分 1.在计算机控件中,每个表达式前都要加上("=") 2.用于显示更新数据库中的字段的控件类型是(绑定型) 3.关于控件的叙述,(选项组不能设置为表达式)的说法正确 4.(表)不是窗体控件 5.纵栏式窗体同一时刻能显示(一条记录) 6.无论是自动创建窗体还是报表,都必须选定要创建该窗体或报表基于的(报表) 7.没有数据来源的控件类型是(非绑定型) 8.关于控件的叙述,(在窗体设计视图窗口中的工具箱中只能看到部分控件)说法错误 9.能够接受数字型数据输入的窗体控件是(文本框) 10.在教师信息输入窗口中,为职称字段提供"教授""副教授""讲师"等选项供用户直接选择,应使用控件是(组合框) 11.要用文本框来显示当前日期,应设置文本框的控件来源属性是(=Data()) 12.窗口事件是指操作窗口时所引发的事件,(取消)不属于窗口事件 13.如果想再加入控件时,控件自动与网格对其,则应在加入控件前,执行"格式(对其网格)"命令 14.当窗体的内容比较多无法在一页中全部显示时,可以使用(选项卡)进行分页,若要进行页面切换,用户只需单击选项卡上的标签即可 15.(选项组)是用来显示一组有限选项集合的控件 16.在学生表中使用"照片"字段存放相片,当使用向导为该表创建窗体时,照片字段使用的默认控件是(绑定对象框) 17.为窗体上的控件设置Tab键的顺序,应选择属性对话框中的(数据选项卡) 18.使用窗体设计视图,不能创建(报表) 19.如果在窗体上输入的数据总是取自某一个表或查询中记录的数据,或者取自某固定内容的数据,可以使用(组合框或列表框)控件 20.(只要单击选项组中所需的值,就可以为字段选定数据值)的说法正确 21.(命令按钮)代表一个或一组操作 22.(可以向组合框中输入新值,而列表框不行) 23.创建窗体的数据源不能是(报表) 24.若要求在文本框中输入文本时达到密码"*"号的显示效果,则应设置的属性是("输入掩码"属性) 25.(窗体设计器)不是窗体的组成部分 26.关于控件的叙述,(在选项组中每次只能选择一个选项)的说法是正确的 27.

在Form1,标题为“显示记录”的窗体上画1个名称为Text1的文本框,其初始内容为空

基础题(1) 【操作步骤】 步骤1:新建一个窗体,在窗体上创建一个文本框控件。 步骤2:在属性窗口中,设置其Text属性为空。 步骤3:在文本框下方绘制一个命令按钮Command1。 步骤4:在属性窗口中,将Caption设置为"上一条记录"。 步骤5:复制命令按钮"上一条记录",在窗体的空白位置处粘贴对话框,单击"是"按钮,创建一个控件数组。 步骤6:再创建3个命令按钮. 步骤7:按照题目要求将复制的3个命令按钮的Caption分别设置为"下一条记录"、"第一条记录"和"最后一条记录",并将窗体的Caption设置为"显示记录"。 步骤8:选择"上一条记录"命令按钮,通过属性窗口设置Enable为False,选择"下一条记录"命令按钮,通过属性窗口设置Default为True.。 步骤9:将文件保存至考生文件夹下,且设置窗体文件名为sjt1.frm,工程文件名为sjt1.vbp。基础题(2) 【操作步骤】 步骤1:打开VB开发环境,新建一个窗体。 步骤2:在窗体中添加一个标签控件Lable1,在属性窗口中设置标签的Caption属性为"等级考试",然后设置其AutoSize属性为True,设置其BorderStyle属性为1。 步骤3:然后在窗体中添加一个计时器Timer1,设置其Interval属性为0,Enabled属性为True。步骤4:打开代码窗口,编写代码如下。 Private Sub Form_Load() Timer1.Interval = 1000 End Sub Private Sub Timer1_Timer() Label1.Visible = Not Label1.Visible End Sub 步骤5:运行程序,然后将文件保存至考生文件夹下,窗体文件名为sjt2.frm,工程文件名为sjt2.vbp。 简单题(1) 【操作步骤】 步骤1:打开本题工程文件。

窗体选择题

1:在“窗体视图”中显示窗体时,窗体中没有记录选定器,应将窗体的“记录选定器”属性值设置为 A、是 B、否 C、有 D、无 2:如果在文本框内输入数据后,按Enter键或按Tab键,输入焦点可立即移至下一指定文本框,应设置的属性是______。 A、"制表位"属性 B、"Tab键索引"属性 C、"自动Tab键"属性 D、"Enter键行为"属性 3:在教师信息输入窗体中,为职称字段提供"教授"、"副教授"、"讲师"等选项供用户直接选择,最合适的控件是______。 A、标签 B、复选框 C、文本框 D、组合框 4:在学生表中用"照片"字段存放相片,当使用向导为该表创建窗体时,照片字段使用的默认控件是______。 A、图形 B、图像 C、绑定对象框 D、未绑定对象框 5:下列属性中,属于窗体的"数据"类属性的是______。 A、记录源 B、自动居中 C、获得焦点 D、记录选择器 6:在Access中为窗体上的控件设置Tab键的顺序,应选择"属性"对话框的 ______。 A、"格式"选项卡 B、"数据"选项卡 C、"事件"选项卡 D、"其他"选项卡

7:若在"销售总数"窗体中有"订货总数"文本框控件,能够正确引用控件值的是______。 A、Forms.[销售总数].[订货总数] B、Forms![销售总数].[订货总数] C、Forms.[销售总数]![订货总数]: D、Forms![销售总数]![订货总数] 8:主窗体和子窗体通常用于显示多个表或查询中的数据,这些表或查询中的数据一般应该具有的关系是______。 A、一对一 B、一对多 C、多对多 D、关联 9:能够接受数值型数据输入的窗体控件是______。 A、图形 B、文本框 C、标签 D、命令按钮 10:下列可用于创建窗体或修改窗体的视图是______。 A、设计视图 B、窗体视图 C、数据表视图 D、透视表视图 11:设计窗体时,可通过设置命令按钮的一个属性来指定按钮上要显示的文字,该属性是______。 A、名称 B、标题 C、格式: D、图像 12:在窗体设计时,要设置标签文字的显示格式应使用______。 A、格式工具栏 B、字段列表框 C、工具箱 D、窗体设计工具栏 13:下列关于窗体的叙述中,正确的是______。 A、窗体只能用作数据的输出界面 B、窗体可设计成切换面板形式,用以打开其他窗体 C、窗体只能用作数据的输入界面:

VB控件文本框属性详解

自学教材(常用控件的属性)一一1.03、文本框(TextBox )控件的常 作者:杜 VisualBasic 用属性

False能通过键盘修改文本框的Text属性内容 MaxLe ngth 获得或设置Text属性中所能输入的最大字符输。如果输入的字符数超过MaxLength设定的数目时,系统将不接受超出部分,并且发出警告声。 Mouselc on MousePointer=99时,设疋一个自疋义的鼠标图标Mouse Poin ter MultiLi ne 设置文本框对象是否可以输入多行文字。取值为: True当文本超过控件边界时,自动换行。 False 需要注意的是:若该属性为False时,文本框控件对象的A lignment属性无效。 OLEDragMode 获得或设置该对象是否能作为OLE拖/放源,以及该进程是自动启动,还是在程序控制下启动。取值为: 0 Manual(手动) 1 Automatic(自动) OLEDro pMode 获得或设置该对象是否能作为一个OLE放下目标,以及它是自动发生,还是在程序控制下发生。取值为: 0 No ne(无) 1 Manual(手动) P asswordChar 该属性将文本显示的内容全部改为所设置的内容。他常用于设置密码,如PasswordChar设定为"*",那么无论用户输入什么字符,都只显示"*"。 RightToLeft 文本书与是否自左向右。取值为:True False自右向左 ScrollBoars 设置边框滚动条模式:0无滚动条 1水平滚动条 2垂直滚动条 3水平和垂直滚动条 SelLe ngth 返回或设置选定文本的长度(字符数)。 该属性没有列在属性窗口中,但在程序中可以使用这些属性。 SelStart 返回或设置选定文本的起始位置,如果没有文本被选中,则指出插入点的位置。 该属性没有列在属性窗口中,但在程序中可以使用这些属

Access窗体操作技巧题

Access窗体操作题 2、考生文件夹下存在一个数据库文件"Access3.mdb",里面已经设计好窗体对象"教师"。试在此基础上按照以下要求补充窗体设计: (1)在窗体的窗体页眉节区位置添加一个标签控件,其名称为"bTitle",标题显示为"教师奖励信息";(2)在主体节区位置添加一个选项组控件,将其命名为"opt",选项组标签显示内容为"奖励",名称为"bopt"; (3)在选项组内放置二个单选按钮控件,选项按钮分别命名为"opt1"和"opt2",选项按钮标签显示内容分别为"有"和"无",名称分别为"bopt1"和"bopt2"。 (4)在窗体页脚节区位置添加两个命令按钮,分别命名为"bOk"和"bQuit",按钮标题分别为"确定"和"退出"; (5)将窗体标题设置为"教师奖励信息"。 注意:不允许修改窗体对象"教师"中已设置好的属性。 等级:3 难度:3 知识点:access知识点/窗体题 3、考生文件夹下存在一个数据库文件"Access3.mdb",里面已经设计好窗体对象"教师"。试在此基础上按照一下要求补充窗体设计: (1)在窗体的窗体页眉节区位置添加一个标签控件,其名称为"bTitle",标题显示为"教师基本信息输出";(2)在主体节区中"年龄"标签右侧的文本框显示内容设置为"年龄"字段值,并将文本框名称更名为"tAge";(3)在主体节区添加一个标签控件,该控件放置在距左边0.1厘米、距上边5.0厘米,标签显示内容为"出生地",名称为"bMem"; (4)在窗体页脚节区位置添加两个命令按钮,分别命名为"bOk"和"bQuit",按钮标题分别为"确定"和"退出"; (5)将窗体标题设置为"教师基本信息"。 注意:不允许修改窗体对象"教师"中未涉及的控件和属性。

在名称为Form1的窗体上建立一个文本框

在名称为Form1的窗体上建立一个文本框(名称为Text1,MultiLine 属性为True,ScrollBars属性为2)和两个命令按钮(名称分别为 Cmd1和Cmd2,标题分别为"读入数据"和"计算保存")(如图所示)。 要求程序运行后,如果单击"读入数据"按钮,则读入"in.txt"文件中的100个整数,放入一个数组中(数组下界为1),同时在文本框中显示出来;如果单击"计算保存"按钮,则计算数组中大于或等于400并且小于800的所有数之和,把求和结果在文本框Text1中显示出来,同时把结果存入考生文件夹中的文件result.txt中。(在prog.bas 中的putdata过程可以把结果存入result.txt文件,考生可以把该模块文件添加到自己的工程中,直接调用此过程)。 注意:文件必须存放在考生文件夹下,窗体文件名为wy7.frm,工程文件名为wy7.vbp,计算结果存入result.txt,否则没有成绩。 新建一工程,在上面放置一文本框设置其MultiLine属性为True,ScrollBars属性为True,再建立两个命令按钮(名称分别为Cmd1和Cmd2,标题分别为"读入数据"和"计算保存"),整个工程的代码如下: Dim i(1 To 100) As Integer Private Sub Cmd1_Click() Dim j As Integer j = 0 Open App.Path & "\in.txt" For Input As #1 For j = 1 To 100 Input #1, i(j) Next Close #1 For j = 1 To 100 Text1.Text = Text1.Text & i(j) & Space(5) Next End Sub Private Sub Cmd2_Click() Dim temp As Long Dim j As Integer For j = 1 To 100 If i(j) >= 400 And i(j) < 800 Then temp = temp + i(j) End If

vb常用控件__练习题(含答案)

第九章控件综合试题 一、填空题 1.在图片框上放置的控件称为图片框的(子)对象,而窗体是图片框的(父)对象。2.窗体的“名称”(Name)属性只能在(属性窗口中)设置。 3.在程序中设置窗体Form1的Caption属性为"主窗体",使用的赋值语句是(Form1.Caption="主窗体")。 4.当窗体的Enabled属性为(True)时,指定窗体响应事件。 5.窗体的Unload事件是在QueryUnload事件发生之(后)发生。 6.程序中,把当前窗体移动到屏幕左上角使用的方法为(Move0,0)。 7.在窗体Form1中坐标为(1600,800)的位置上输出字符串“Visual Basic 6.0”使用的语句为(Form1.Currentx=1600)、(Form1.Currenty=800)、和(Form1.Print "VisualBasic6.0")。 8.若使文本框有边框,需设置BorderStyle属性的值为(1)。 9.在程序运行期间,用户可以用文本框显示信息。文本框接收输入的内容的属性是 (Text)。 10.若使文本框内能够接受多行文本,则要设置Multiline属性的值为(True)。11.要把图形文件“C:\sample\diannt.jpg”装载到图片框Picture1上,使用的语句为(Picturel.Picture=LoadPicture("C:\sample\diannt.jpg"))。 12.若使图片框自动调整大小以适应装入的图形,则要设置Autosize属性的值为(True)。 13.除了在程序使用LoadPicture函数装载图形外,还可以在设计阶段通过修改(Picture)属性装载图形。 14.若程序中要把一些文本内容输出到图片框PictureBox,应使用(Print)方法。 15.当单选按钮OpdonButton的Value属性为(False)时,表示该单选按钮处于未选中状态。 16.若使命令按钮Command1重新生效,则使用的赋值语句为(Command1.Enabled=True)。 17.若使命令按钮不能接收和响应任何事件,可以设置Visible属性的值为(False)。

Visual Basic 文本框常用属性

文本框 文本框是一个文本编辑区域,在程序设计和运行阶段都可以在这个区域中对文本框的内容进行输入、编辑和显示文本。因此,如果需要进行输入或者修改文字信息时通常使用文本框控件。 文本框常用属性 前面介绍的一些属性也可用于文本框,这些属性包括BorderStyle、Enable、Font属性组、Width、Height、Top、Left、Visible,此外文本框还具有如下属性: (1)MaxLength 用来设置文本框中输入的最大字符数。 如果该属性设置为0,则在文本框中输入的字符数不能超过32K。一般情况下,该属性默认值为0. (2)MultiLine 用来设置文本框采用单行或多行显示文本。 如果把该属性设置为False,文本框只能输入单行文本;当被设置为True时,可以使用多行文本,即在文本框中输入或输出文本时可以换行。 (3)ScrollBars 该属性用来确定文本框中有没有滚动条显示,可以取值0、1、2、3四个值,其含义分别为: 0——文本框中没有滚动条(默认值); 1——只有水平滚动条; 2——只有垂直滚动条; 3——同时具有水平和垂直滚动条。 ScrollBars属性需配合MultiLine属性一起使用,当MultiLine属性设置为True时才能使用ScrollBars属性在文本框中设置滚动条。 (5)Text 该属性用来设置文本框中显示的内容。 默认值与文本框名称属性值相同。当用户需要在文本框中输入或者输出信息时,通常都是通过修改Text属性来做到。 (6)PasswordChar 该属性可用于密码口令的输入。 在默认状态下,该属性被设置为空字符串(不是空格),用户在文本框中输入的信息可以显示出来。如果该属性值被设置为另外一个字符,例如字符串星号(*),则在文本框内输入字符时,显示的不是输入字符,而是被替代显示为星号。需注意的是此时文本框的Text属性

文本框控件(TextBox)的常用属性

1.03、文本框控件(TextBox)的常用属性 属性说明(Name)文本框控件的名称 Alignment 设置Caption属性文本的对齐方式, 取值为: 0 左对齐 1 右对齐 2 中间对齐 Appearance 是否用立体效果绘制,取值为: 0 平面 1 3D(立体) BackColor背景颜色,可从弹出的调色板选择。 BorderStyle 设置边界样式,取值为: 0 None(无边界线) 1 FixedSingle(固定单线框) CauseValidation 该控件获得焦点时,失去焦点的控件的Validate事件是否发生。取值为:True 发生 False 不发生 DataField获得或设置一个值,将控件绑定到当前记录的一个字段DataFormat返回数据格式对象,用于该部件的可绑定性(打开属性页) DataMember获得或设置一个值,为数据连接描述数据成员 DataSource设置一个数值,指出数据控件通过它将当前控件绑定到数据库DragIcon该对象在拖动过程中鼠标的图标 DragMode 该对象的拖动模式,取值为: 0 Manual(手动) 1 Automatic(自动) Enabled 用于设定是否对事件产生响应,取值为: True 可用 False 不可用,在执行程序时,该对象用灰色显示,并且不响应任何事件 Font字型,可从弹出的对话框选择字体,大小和风格ForeColor前景颜色,可从弹出的调色板选择。 Height文本框控件的高度 HelpContextID指定一个对象的缺省帮助文件上下文标识符 HideSelection 当控件失去焦点时选定文本是否不加强显示。取值为:True 不加强显示,此为默认值 False 加强显示

css控制文本框的只读属性的方法

css控制文本框的只读属性的方法 css 封装整个只读文本框的属性: .TextBoxReadOnly { border:1px solid #C0C0C0; text-align:left; background-color:#D3D3D3; width:100px; readonly:expression(this.readOnly=true); } 它工作得很好, 经过测试, 发现了一个问题: 用js 代码: txt.readOnly=false , 不能使文本框回到可读写状态, 用: txt.className="OtherStyle"; txt.readOnly=false; 也不行! 总之, 一旦使用css 修饰了该控件使它只读, 就不能再使它恢复到可读写的状态了. 即使换成其它的css 样式, 有知道的朋友,请告知下哦。. 于是乎, 又写了一个样式: .TextBoxReadWrite { border:1px solid #C0C0C0; text-align:left; background-color:#FFFFFF; width:100px; readonly:expression(this.readOnly=false); } 这样再用js 切换样式, 就可以在只读与可读写之间来回切换了, 把这个过程封装到一个函数中, 在程序中就可以自由调用了, 虽然有点绕, 不过是目前我找到的最好的办法. 切换的js: function f1(ctr,isReadOnly) { var octr=document.getElementById(ctr); if(octr!=null) { if(isReadOnly) octr.className="TextBoxReadOnly"; else octr.className="TextBoxReadWrite"; } } 调用: function f3() { f1("<%=txt1.ClientID %>",true); }

VB窗体的设计 文本框和标签

[教案] (四)窗体的设计 授课方式:讲授法 授课学时:1学时 教学目的: 通过本次课的学习,学生应该掌握窗体的常用属性、事件和方法,掌握多种窗体的建立方法,学会设置启动窗体和启动工程。 教学重点和难点: 1.窗体的常用属性、常用事件以及窗体的五种方法; 2.多重窗体的建立 教学过程: 4.1 窗体的属性、事件和方法 一、窗体的常用属性 介绍窗体的Name属性、Picture属性和AutoRedraw属性 二、窗体的常用事件 通过例题来详细讲解窗体的以下几种常用事件 ——Load事件与Unload事件;Click事件与DblClick事件;KeyPress事件、KeyDown 事件和KeyUp事件;MouseMove事件、MouseDown事件和MouseUp事件;Resize 事件;Activeate事件与Deactivate事件 1.事件的具体应用情况 2.触发事件的条件 三、窗体的常用方法 通过例题使学生掌握以下五种方法的应用Cls方法、Hide方法与Show方法、Move 方法和Print方法 1.每个方法的具体功能和用途 2.方法调用的语法格式 4.2 多重窗体 一、设置启动窗体 使学生掌握启动窗体设置的步骤 二、设置启动工程 使学生掌握启动工程设置的两种方法

学生作业: 上机实验二:窗体的使用 (五)文本框和标签 授课方式:讲授法 授课学时:1学时 教学目的: 通过本次课的学习,学生应该能会使用文本框处理字符信息,能灵活使用文本框的属性、方法和事件,掌握使用标签控件显示字符信息的方法,并且能够灵活使用标签控件的属性、方法和事件。 教学重点和难点: 1.文本框控件的属性、方法和事件; 2.标签控件的属性、方法和事件。 教学过程: 第1节文本框和标签 一、文本框控件(Textbox) 1.介绍文本框在VB中的用途。 2.掌握以下9个文本框的主要属性 (1)Text、(2)MaxLength(3)MultiLine(4)ScrollBars(5)Locked(6)SelStart (7)SelLength(8)SelText(9)PasswordChar 3.掌握文本框的一个主要方法——SetFocus方法 (1)本方法的应用情况 (2)它的语法格式:[对象.] SetFocus 4.掌握文本框的4个主要事件 ——Chang事件、KeyPress事件、LostFocus事件和GotFocus事件 (1)掌握事件的应用情况 (2)掌握触发事件的条件 5.举例说明 讲解一道利用文本框来实现复制、剪贴和粘贴功能的例题,通过此例题的讲解使学生更加熟练的掌握有关文本框控件的常用属性、方法和事件。 二、标签控件(Label) 1.介绍标签在VB中的用途以及它的实际应用环境。 2.掌握以下4个标签的主要属性:

CSS控制文本框的只读属性的几种方法

CSS控制文本框的只读属性的方法 ●解决方案一: 有时候,我们希望表单中的文本框是只读的,让用户不能修改其中的信息,如使 的内容,"中国"两个字不可以修改。 实现的方式归纳一下,有如下几种: 方法1: onfocus=this.blur() //当鼠标放不上就离开焦点 方法2:readonly 方法3:disabled 完整的例子: disabled="true" //此果文字会变成灰色,不可编辑 readOnly="true" //文字不会变色,也是不可编辑的 css屏蔽输入: 有两种方法第一:disabled="disabled"这样定义之后被禁用的input 元素既不可用,也不可点击。第二:readonly="readonly" 只读字段是不能修改的。 不过,用户仍然可以使用tab 键切换到该字段,还可以选中或拷贝其文本。 ●解决方案二: CSS封装整个只读文本框的属性: .TextBoxReadOnly { border:1px solid #C0C0C0; text-align:left; background-color:#D3D3D3; width:100px; readonly:expression(this.readOnly=true); } 它工作得很好,经过测试,发现了一个问题:用JS代码txt.readOnly=false,不能使文本框回到

制作注册窗体

VB试题 一,填空 1.在文本框控件内输入,属性,可以屏蔽用户输入的密码,通过设置文本框的,属性,可以输入多行文本。 2.文本框的英文写法是,,标签的英文写法是。 3.文本框的scrollbars属性为2是,显示滚动条。 4.文本框的常用方法是setfcus,语法格式为:,可以将焦点移到文本框控件,如果一个名字为“textbox1”的文本框,想把焦点移至它的文本框,语法内容为。 5.文本框的sellength,selstart,seltext,这些属性用于对文本框的文本进行选定操作。其中,sellength属性返回或设置所选择的,selstart返回或设置所选择的文本的,,seltext属性返回或设置包含当前所选择文本的,如果没有选择字符,则为零字符串长度(“”)。 6.文本框的tabindex属性,可以返回或设置文本框访问键的顺序。 7.文本框的常用事件包括: (1)当文本框的内容发生改变时发生此事件 (2)和这些事件是当一个控件具有焦点时按下或松开一个键时发生。 8. 1.阴影字效果是可用位置上有一定偏移的标签来生成,这两个标签相应是。他们的前景颜色不一样,用作下方的标签作为,其前景颜色可以设为深灰色。阴影字效果是鼠标指向标签时出现,鼠标离开标签时消失,可通过标签和窗体的事件过程来设置。 2.新建的vb中的EXE程序一般有两个文件,分别是他们的扩展名分别是。 的汉语意思是 的汉语意思是。 的汉语意思是。 Forecolor的汉语意思是

6.运行程序的快捷键是 7.标签控件具有一些方法,其中最常用的是MOVE方法,用于在窗体上移动标签控件,语法格式如下:left,top,width,height 其中和是必选的,分别指定objict左边的水平坐标和顶边的垂直坐标。

Form1添加一个文本框Text1,通过属性窗口设置窗体和文本框的属性,实现如下功能

基础题(1) 【解题思路】文本框控件的MultiLine属性用于设置文本框是否能以多行显示文本,值为True表示允许,值为False表示不允许;Font属性用于设置控件标题中文本的字体、字号和字型等。Text属性用于设置文本框中显示的文本。窗体标题通过其Caption属性设置。 【操作步骤】 步骤1:建立界面,并设置控件的属性。程序中用到的控件及属性见表3.110和表3.111。 表3.110 步骤2:调试并运行程序,关闭程序后按题目要求存盘。 基础题(2) 【解题思路】在窗体上建立控件后,先设置控件的属性,再编写事件过程。 单击命令按钮触发Click事件。利用按钮的Height和Width属性来改变按钮的大小;利用按钮的Left和Top属性来改变按钮的位置。 【操作步骤】 步骤1:建立界面,并设置控件的属性。程序中用到的控件及属性见表3.112。 表3.112 步骤2:编写程序代码。 参考答案 Option Explicit Private Sub Cmd1_Click() Cmd1.Left = 0 Cmd1.Top = 0 End Sub

简单题(1) 【解题思路】Rnd()函数用于产生一个小于1但大于或等于0的随机数。 本题程序用变量Max记录最大数,最初把数组的第一个元素的值赋给Max,然后通过For循环语句将其后的元素依次与之比较,如果其值大于Max则将其赋值给Max,依次类推,最终Max 的值就是数组各元素中的最大值。 【操作步骤】 步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Option Base 1 Private Sub Command1_Click() Dim arrN(30) As Integer Dim Max As Integer Randomize For i = 1 To 30 'arrN(i) = Int(Rnd * ?) Next i '? = arrN(1) For i = 2 To 30 'If ? Then Max = arrN(i) End If Next i Print Max End Sub 程序结束 参考答案 第1个?处填入:1000 第2个?处填入:Max 第3个?处填入:arrN(i) > Max或Max < arrN(i) 简单题(2) 【解题思路】本题要求的是1000以内能被5或7整除的数的个数。在Visual Basic中,使用Mod 运算符来判断一个数是否可以被另一个数整除,如果计算结果为0,则表示可以整除,否则不能

窗体报表操作题答案

第5章窗体 窗体1-5:2、4、10、16、71 窗体6-10:2、3、18、32、35 窗体11-15:47、53、56、59、62 窗体16-20:70、72、107、109、130 Access窗体操作题 代码中常用的属性:标题 Caption ;前景色 foreColor ;是否可用 Enabled ;记录源 RecordSource 4、 (5)设置命令按钮bTest的单击事件属性为给定的宏对象m1; 本题直接选择事件,运行宏m1 如果要求写入运行宏的代码就为:docmd.runmacro “宏名称” 即:docmd.runmacro “m1” 35、 (5)设置所建命令按钮bC的单击事件,使用户单击该命令按钮后,CDID标签的显示颜色改为红色。要求用VBA代码实现。 属性设置为:对象名.属性名=值 窗体为:form.属性名=值如:form.caption=time() 也可以:me.caption=time() 本题是将CDID文本框所带标签改变颜色: CDID_标签.forecolor=vbred 或 CDID_标签.forecolor=rgb(255,0,0) 53、(1)将窗体"fEmp"上文本框"tSS"更改为组合框类型,保持控件名称不变。设置其相关属性实现下拉列表形式输入性别"男"和"女"; 选择文本框右键,选择更改为组合框,在属性窗口设置属性行来源:男;女(不要选择控件来源),行来源类型:值列表。 (2)修改查询对象"qEmp"为参数查询,参数为引用窗体对象"fEmp"上文本框"tSS"的输入值; 在查询qemp的设计视图下:添加性别字段,在条件行输入:[forms]![femp]![tss]。注意:性别不显示。 (3)设置窗体对象"fEmp"上文本框"tPa"为计算控件。要求依据"党员否"字段值显示内容:"党员否"字段值为True,显示"党员"两字;"党员否"字段值为False,显示"非党员"三字; =iif([党员否]=true,”党员”,”非党员”) (4)单击"刷新"按钮(名为"bt1"),事件过程动态设置窗体记录源为查询对象"qEmp",实现窗体数据按性别条件动态显示;单击"退出"按钮(名为"bt2"),关闭窗体。 Form.recordsource=”qemp” Docmd.close 56、(5)在窗体中有一个"显示全部记录"命令按钮(名称为bList),单击该按钮后,应实现将"tStudent"表中的全部记录显示出来的功能。现已编写了部分VBA代码,请按照VBA代码中的指示将代码补充完整。 Select * from tstudent 可以参考这条语句上面的语句。 59、(5)在窗体中有一个"退出"命令按钮(名称为bQuit),单击该按钮后,应关闭"fStudent"窗体。现已编写了部分VBA代码,请按照VBA代码中的指示将代码补充完整。 Docmd.close 62、(5)在窗体中还有"修改"和"保存"两个命令按钮,名称分别为"CmdEdit"和"CmdSave",其中"保存"命令按钮在初始状态为不可用,当单击"修改"按钮后,应使"保存"按钮变为可用。现已编写了部分VBA代码,请按照VBA代码中的指示将代码补充完整。 cmdsave.enabled=true 70、(1)将窗体"fEmp"上文本框"tSS"更改为组合框类型,并保持控件名称不变; 同53题 (2)修改查询对象"qEmp"为参数查询,参数为引用窗体对象"fEmp"上文本框"tSS"的输入值; 同53题

Visual Studio2010 TextBox属性

名称说明 AcceptsReturn 获取或设置一个值,该值指示在多行 TextBox控件中按 Enter 键时,是在控件 中创建一行新文本还是激活窗体的默认按 钮。(继承自TextBox。) AcceptsTab 获取或设置一个值,该值指示在多行文本框 控件中按 Tab 键时,是否在控件中键入一 个 Tab 字符,而不是按选项卡的顺序将焦 点移动到下一个控件。(继承自 TextBoxBase。) AccessibilityObject 获取分配给该控件的AccessibleObject。 (继承自Control。) AccessibleDefaultActionDescr iption 获取或设置控件的默认操作说明,供辅助功 能客户端应用程序使用。(继承自 Control。) AccessibleDescription 获取或设置辅助功能客户端应用程序使用 的控件说明。(继承自Control。) AccessibleName 获取或设置辅助功能客户端应用程序所使 用的控件名称。(继承自Control。) AccessibleRole 获取或设置控件的辅助性角色(继承自 Control。) AllowDrop 获取或设置一个值,该值指示控件是否可以 接受用户拖放到它上面的数据。(继承自 Control。) AltHTML基础结构。 Anchor基础结构。(重写Control.Anchor。) Application 获取一个Application对象,该对象表示 TextBox的创建者。 AutoCompleteCustomSource 获取或设置在AutoCompleteSource属性 设置为CustomSource 时使用的自定义 System.Collections.Specialized.String Collection。(继承自TextBox。) AutoCompleteMode 获取或设置控制自动完成如何作用于 TextBox的选项。(继承自TextBox。) AutoCompleteSource 获取或设置一个值,该值指定用于自动完成 的完整字符串的源。(继承自TextBox。) AutoScrollOffset 获取或设置一个值,该值指示在 ScrollControlIntoView中将控件滚动到 何处。(继承自Control。) AutoSize 获取或设置一个值,该值指示当更改分配给 控件的字体时,是否自动调整控件的高度。 (继承自TextBoxBase。)

相关主题