若羌灰枣上有粉末:在选择某一个学生的成绩的时候,往往会发生错行的情况VBA实例精解

来源:百度文库 编辑:中财网 时间:2024/03/28 23:23:31
例】在选择某一个学生的成绩的时候,往往会发生错行的情况,而这个程序可以使您在选择某一个成绩时,自动显示该学生的所有信息。

  代码如下:

  Private Sub Worksheet_SelectionChange(ByVal Target As Range)

  If (Target.Column 1) Then

  Cells(Target.Row, 1).Select

  MsgBox "姓名: " & Me.Cells(Target.Row, 1) & Chr(13) _

  & "语文: " & Me.Cells(Target.Row, 2) & Chr(13) _

  & "数学: " & Me.Cells(Target.Row, 3) & Chr(13) _

  & "英语: " & Me.Cells(Target.Row, 4) & Chr(13) _

  & "物理: " & Me.Cells(Target.Row, 5) & Chr(13) _

  & "化学: " & Me.Cells(Target.Row, 6) & Chr(13) _

  & "地理: " & Me.Cells(Target.Row, 7) & Chr(13) _

  & "历史: " & Me.Cells(Target.Row, 8) & Chr(13) _

  & "生物: " & Me.Cells(Target.Row, 9) & Chr(13) _

  & "体育: " & Me.Cells(Target.Row, 10) & Chr(13) _

  & "总分: " & Me.Cells(Target.Row, 11) & Chr(13) _

  , vbOKOnly, "提示"

  End If

  End Sub

       程序实现后的结果:

  首先,这个代码使用了一条语句,Msgbox,这条语句的作用是调用一个消息对话框,这个语句带有三个参数,各个参数之间都用逗号分隔。

  其次,我们看到该语句的第一个参数就占据了好几行,那么大家可能会问,不是在上一讲中提到了VBA识别判断是否是一条语句就凭借换行符吗?那么像这样在多行中的语句为什么是属于同一条语句呢?这个主要是因为有时候语句太长,如果在一行写可能会导致格式混乱且不容易阅读和理解,所以我们就使用下划线(即:“_”)来将未写完的代码转到下一行继续写,并告诉系统,该语句在这行没有结束,下行还是属于该语句的内容。让我们仔细看看第一个参数的内容,总体上是一个字符串,该字符串由个部分构成,每个部分占据了一行,每个部分都是由工作表中的列标题字符串组成,“&”符号表示两个字符串之间的连接符,通过该符号,后面跟了一串代码,看起来也像个函数的样子(为什么说像函数呢?也为有函数名、括号和括号里的参数),对,这个是一个集合,其中的“me”表示引用本工作表,例如这里就是指Worksheet1工作表,“Cells”表示本工作表的所有单元格的集合,其中的参数表示行序号和列序号,这个在昨天的讲解中讲过。其实这里省略了一个部分,完整的应该是这样写“Me.Cells(Target.Row, 1).Value”,即这里返回的是指定单元格内的值,为啥省略呢?由于Value属性是Cells集合的默认属性,所以可以省略不写。最后,还跟了一个函数,即“Chr(13)”,这个函数的参数为一个整数值,作用是返回ASCII编码表中对应该整数值的字符或不可打印符号的。比如这里的13,在ASCII表中就对应了换行符,那么通过这个函数就返回了一个换行符,这样就可以让每个列标题的部分在对话框中占据一行的位置。

我在安装软件的时候,说找不到某一个源文件。 电脑在开机的时候,桌面上会出现提示:在C盘的某一个文件夹里找不到模块? 为什末我在打开某一个网页的时候.上面会显示我的IP地址.? 我在玩QQ堂的时候,退出后往往会死机,请各位大虾帮忙看一下,这是什么原因 请问,我在用bt下电影的时候,往往在播放的时候会有一些网页不停的跳出来,怎么才能去掉它们呀? 迅雷不再弹出选择浏览在某一个文件夹的对话框了 开会的时候往往很困!怎么办? 制幻灯片的时候,往往要“组合”, 学生进校门的时候最希望发生什么事? 我是高二的学生,成绩很好,喜欢美术,但美术功底不好,我想从现在起学美术,但会影响成绩我要怎么选择? 是不是所有的人,心情不好的时候,往往会对身边的人发脾气? 为什么发生性关系时!~女人往往是被动的。 人们思考问题的时候往往会转动眼球,这是为什么? 在选择对象的时候你会选择爱你的还是你爱的 电脑在运行的过程中,双击某一个文件的时候,电脑突然重新启动,是什么原因呢? 怎样去查一个学校的某一个学生 在安装操作系统的时候都是选择中国,如果选择其他国家会怎么样〉? 在您选择自驾游的时候,会选择旅行社帮助吗?? 在没有M的时候,下腹也会觉得痛,那是发生了什么事? 在没有M的时候,下腹也会觉得痛,那是发生了%C 用卡巴斯基扫描硬盘的时候容易被困在某一个文件上 一个人在心情最烦,最低落的时候却想着某一个,为什么呢 大家认为在购买药品时,促使你在选择某一个品牌时的原因有哪些? 为什么百度知道往往在xx98分的时候就不长分了? 为什么人在酒醉醒来后往往就对酒醉时候的事情记不太清了?