inputbox函数怎么用 vb编程题，定义一下有20个元素的一维数组，使用InputBox函数为数组中的所有元素赋值，并显示？

vb编程题，定义一下有20个元素的一维数组，使用InputBox函数为数组中的所有元素赋值，并显示？

Dim a（1到20）As IntegerPrivate Sub FormuuClick（）MX=a（1）Mn=a（1）for I=1到20 a（I）=InputBox（“input a numerical value”，“input”）如果a（I）> MX那么MX=a（I）如果a（I）< Mn那么Mn=a（I）nextprint“最大值是”&；MX&”，最小值是“&；mnend Sub

Dim a（20）DimI，J，kfori=0到19a（I）=InputBox（“input No.”&I 1&instr函数指定一个字符串在另一个字符串中第一次出现的位置。Syntax instr（[start]，string1，string2，[compare]）instr函数语法具有以下参数：part description start optional。设置每次搜索开始位置的数值表达式。如果忽略，搜索将从第一个字符位置开始。如果start包含null，则会发生错误。如果指定了compare，则需要start参数。字符串1是必需的。要搜索的字符串表达式。字符串2是必需的。找到字符串表达式。比较是可选的。指定字符串比较的类型。如果compare为null，则发生错误。如果省略比较，则选项比较设置确定比较的类型。指定有效的LCID（localeid）以在比较中使用特定于区域设置的规则。

inputbox函数怎么用 excel赋值函数怎么用 inputbox函数编写程序

版权声明：本文内容由互联网用户自发贡献，本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。