文件名称:vb-pdf
介绍说明--下载内容均来自于网络,请自行研究使用
把form1中的
Private Sub Form_Load()
改为
Public Sub Form_Load()
在Form2中:Call Form1.Form_Load
private sub command1_click()
dim max
for i = 1 to 3
n=val(inputbox("输入第" & i & "个数"))
if n>max then
max =n
end if
next
print "三个数中最大的数是" & max-In the form1 Private Sub Form_Load () to Public Sub Form_Load () in Form2 in: Call Form1.Form_Load private sub command1_click () dim max for i = 1 to 3 n = val (inputbox (" Enter the first" & i & " Number" )) if n> max then max = n end if next print " The maximum number of three numbers is" & max
Private Sub Form_Load()
改为
Public Sub Form_Load()
在Form2中:Call Form1.Form_Load
private sub command1_click()
dim max
for i = 1 to 3
n=val(inputbox("输入第" & i & "个数"))
if n>max then
max =n
end if
next
print "三个数中最大的数是" & max-In the form1 Private Sub Form_Load () to Public Sub Form_Load () in Form2 in: Call Form1.Form_Load private sub command1_click () dim max for i = 1 to 3 n = val (inputbox (" Enter the first" & i & " Number" )) if n> max then max = n end if next print " The maximum number of three numbers is" & max
(系统自动生成,下载前可以参看下载内容)
下载文件列表
(没有文件,原文件不完全或已损坏或有密码)