在VB中实现1 3*1 5*1 7*1 11

最大数＝IIF（数1>数2,数1,数2）

OptionBase1OptionExplicitDima(11)AsIntegerPrivateSubCommand1_Click()DimiAsIntegerPicture1.ClsPicture

flag应该是布尔型变量boolean有true和false两个值（真假）true即为1..false为0

a=1b=1c=1fori=4to100d=a+b+cforj=2todif(imodj=0)thenbreak;endifnextifjdthenprinti&"issushu"endifa=bb=

With语句在一个单一对象或一个用户定义类型上执行一系列的语句.语法Withobject[statements]EndWithWith语句的语法具有以下几个部分：部分描述object必要参数.一个对象

看看我以下回答的答案吧：http://zhidao.baidu.com/question/332055124.html

创建两个text控件和一个command按钮控件再输入以下代码PrivateSubCommand1_Click()Fori=1ToLen(Text1.Text)a=Mid(Text1.Text,i,1

第一题：PrivateSubCommand1_Click()Foru=1To20h=0.0001*(2^u)NextPrint"厚度为0.1毫米的纸,折叠20次后厚度为"&h&"米"EndSub第二题

位数多了截取一下不就完了吗?再问：所有的数据都要输出打印截取不好操作吧再答：用字符型就可以搞定了！~数据是从数据库取出来的吗？再问：不是是矩阵算出来的我就是不知道定义变体的时候怎么定义再答：dima这

去http://www.softhy.net/找一下吧

=相等>=大于等于

从用户信息.mdb数据库中查询相关记录信息调用的时候传入一条sql语句返回一个记录集

DimcAsObjectSetc=CreateObject("MSScriptControl.ScriptControl")c.Language="vbscript"MsgBoxc.Eval("2+4

是一个数组.不是函数,是一个数值,切确讲,是一个数组的数值.是一个按钮的数值.

'新建工程-添加4个text,2个Command'粘贴下面代码..'单词倒排PrivateSubCommand1_Click()DimsText2.Text=""s=Split(Text1.Text,

直接复制代码就可以了按F5运行：OKPrivateSubForm_Load()ShowDimiAsInteger,jAsIntegerDima(3,3)AsInteger,b(3,3)AsIntege

PrivateSubCommand1_Click()s=0zf=0Fori=1To10s=InputBox("第"&i&"位评委给分:")zf=zf+sNextiPrint"总得分："&zfEndSu

用split函数按空格分割该字符串,然后倒着输出就可以了再问：可不可以具体一点，麻烦把程序写出来好吗？谢谢啦！再答：我已经告诉了你思路，写程序要费精力的。再问：您好，您说的那个貌似是split（"Ia

With语句可以对某个对象执行一系列的语句,而不用重复指出对象的名称.例如,要改变一个对象的多个属性,可以在With控制结构中加上属性的赋值语句,这时候只是引用对象一次而不是在每个属性赋值时都要引用它

这个较简单,我给你一个函数：XiaoShu(保留小数前的原始数值,保留位数）调用方法如下：假设你的数字存在变量A中,现在要将A中的数字保留三位小数（不四舍五入）放入B中,则Dim A&nbs