vb语言

来个短一点的,PrivateSubForm_click()ClsDima()AsSinglen=Val(InputBox("请输入行数","杨辉三角",5))ReDima(n+1,n+1)Fori=1

解题思路：历史知识的积累解题过程：<三国演义>最终答案：略

返回包含于字符串内的数字,字符串中是一个适当类型的数值.语法Val(string)必要的string参数可以是任何有效的字符串表达式.说明Val函数,在它不能识别为数字的第一个字符上,停止读入字符串.

你的意思应该是:(8\3)*(61Mod5)吧,是吗?平时写代码时这种优先级不确定的最好加括号你那样写是计算:3*61,再求与8的商,最后求与5的余.*的优先级比\(求商)及MOD(求余)都高

01-02-04-06-08-10里有2个相连号?按我的理解写的代码Dims(0To6)AsStringPrivateSubForm_Load()s1=Split("1,2,3,4,5,6,7,8,9

PrivateSubForm_Load()s="1,2,3,6,8,9,12,16"s1=Split(s,",")Fori=1To3s3=s1(i-1)Fori2=i+1To4s4=s3&"-"&s1

SubDoArr()Dima(9)AsIntegera(1)=1:a(2)=2:a(3)=3a(4)=6:a(5)=8:a(6)=9a(7)=12:a(8)=16DimArrAsStringDimne

对质数的定义是：除了1和本身,不能和其它数整除.那么计算质数我们,仅需要一趟循环检查就可以了.假设用户输入了初始值jj那么确定质数应该：1）计数器aa必须从2开始（1不算）.2）计数器aa必须小于jj

做完了,不用任何控件,代码如下：DimM(6)AsByte,H(6)AsByteDimG(3)AsByteDimIAsByte,JAsByte,HjAsIntegerConstN=10,X=6,Y=3

公倍数,余下的,再装到其中一种盒子中.再问：。。。。这就是不知道肿么编啊程序死了N次了对信息真心要没信心了怎么编啊？

是这样的,你有好几个textbox控件,而且他们都是以控件数组的形式出现的,就是说你有text1(0),text1(1).,你要的到text1的输入值是就可以选中textbox控件看它是数组中的哪一个

PublicClassForm1　　InheritsSystem.Windows.Forms.Form　　PublicfilenameAsString="英汉词典.txt"　　Publicmyword

对数运算：用log函数,log(n)返回n的自然对数值（double型）.要计算以n为底x的对数值,可写为log(x)/log(n)计算lg(2)：log(2)/log(10)

Ifx5THENEndIf

asp'cssc&C++///**/vb'

不好意思我好久没用vb了大概如下dimcassingledimxassinglex=inputbox("输入x")c=5*(x-32)/9printc\我以前把vb删了不能试你试试吧

dimnasintegerdimsasintgerPrivateSubCommand1_Click()Don=n+1s=s+nLoopuntills>=30000Printn-1EndSu

编辑一个有0~9、小数点、加减乘除的计算器用一个窗体就可以实现,你可以试试OptionExplicitDimstrNumberAsStringDimstrPointAsStringDimdblNum1

就是在数字前面加个减号啊比如x=-123

log(7.6)/log(10)