下面程序段的作用:在窗体上一个命令按钮。单击命令按钮后,将程序中字符串 "Welcome Home"中的字符
Private Sub Command1_Click()
a = "Welcome Home";
b = "Wel Back"
c = 【 】+ LCase(B) Print c
End Sub
Private Sub Command1_Click()
a = "Welcome Home";
b = "Wel Back"
c = 【 】+ LCase(B) Print c
End Sub
(2)使用报表向导建立报表“rpt1”,用报表显示“result”表的内容。报表分组记录选择“无”,样式为“带区式”,列数为“3”,字段布局为“行”,方向为“纵向”,报表中数据按“年龄”升序排列,年龄相同的按“姓名”升序排序。报表标题是“学生年龄”。
Private Sub Command1_ Click()
CommonDialogFlags = cd10FNHideReadOnly
CommonDialogFilter= "All Files (*.*) |*.* |Text Files" &
"(*.txt |*.txt|Batch Files (*.bat)|*.bat)"
CommonDialogFilterIndex = 1
CommonDialog1.ShowOpen
MsgBox CommonDialog1.FileName
End Sub
程序运行后,单击命令按钮,将显示一个“打开”对话框,此时在“文件类型”框中显示的是 ______;如果在对话框中选择D盘temp 目录下的te1.txt 文件,然后单击“确定”按钮,则在信息框中显示的提示信息是______。
Private Sub Command1_ Click()
Dim x As Integer, y As Integer, Result As Integer
x = InputBox (“请输入第一个数”)
y = InputBox (“请输入第二个数”)
Result =______
Print x; "和"; y; "的最大公约数为: "; Result
End Sub
Private Function GYS (ByVal A As Integer, ByVal B As Integer)
Dim T As Integer
T = A Mod B
Do While ______
A = B
B = T
T = A Mod B
Loop
______
End Function
为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!