填空题
在窗体中有两个文本框分别为Text1和Text2,一个命令按钮Command1,编写如下两个事件过程:
Private Sub Command1_Click()
a=Text1.Value+Text2.Value
MsgBox a
End Sub
Private Sub Form_Load()
Text1.Value=" "
Text2.Vatue=" "
End Sub
程序运行时,在文本框Text1中输入78,在文本框中Text2输入87,单击命令按钮,消息框中输出的结果为______。
【参考答案】
7887
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
在VBA中求字符串的长度可以使用函数______。
点击查看答案&解析
填空题
“学生成绩”表含有字段(学号,姓名,数学,外语,专业,总分)。下列程序的功能是:计算每名学生的总分(总分=数学+外语+专业)。请在程序空白处填入适当语句,使程序实现所需要的功能。 Private Sub Command1_Click() Dim cn AS New ADODB.Connection Dim rs AS New ADODB.Recordset Dim zongfen As New ADODB.Fileld Dim shuxue AS New ADODB.Fileld Dim waiyu AS New ADODB.Fileld Dim zhuanye As New ADODB.Fileld Dim strSQL As Sting Set cn=CurrentProjeet.Connection StrSQL= Select*from成绩表 rs.OpenstrSQL,cn,adOpenDynamic,adLockptimistic,adCmdText Set zongfen=rs.Filelds( 总分 ) Set shuxue=rs.Filelds( 数学 ) Set waiyu=rs.Filelds( 外语 ) Set zhuanye=rs.Filelds( 专业 ) Do while______ Zongfen=shuxue+waiyu+zhuanye ______ rs.MoveNext Loop rs.close cn.close Set rs=Nothing Set cn=Nothing End Sub
点击查看答案&解析
相关试题
要将正实数x保留两位小数,若采用Int函数完...
当文本框中的内容发生了改变时,触发的事件...
某次大奖赛有7个评委同时为一位选手打分,...