紧急:问下 烽火战国官网 一进去 OK 然后有一个什么每日…

烽火战国英雄选择
本回答由提问者推荐
var sogou_ad_id=731547;
var sogou_ad_height=160;
var sogou_ad_width=690;VB新手 老师要求写一个类要求在文本框内输入一个数字&然后点击OK&&下面的文本框内显示出(如输入3):
1*1=1&1*2=2
1*1=1&1*2=2&1*3=3
老师要求写个类&&然后建个标准的EXE引用这个类&达到这么效果&要求上交一个exe和一个dll文件
请各种大师教教新人啊&
回答1:新建一个activex&dll项目(project2),新建一个类模块(class1)
编写如下代码:
Public&Function&Output(ByVal&n&As&Integer)&As&String
&&&&Dim&i&As&Integer,&j&As&Integer
&&&&For&i&=&1&To&n
&&&&&&&&For&j&=&1&To&i
&&&&&&&&&&&&Output&=&Output&&&"&"&&&i&&&"*"&&&j&&&"="&&&i&*&j
&&&&&&&&Next
&&&&&&&&Output&=&Output&&&VbCrLf
End&Function
编译。产生project2.dll
新建一个窗体程序,工程-引用-project2
编写代码:
Button_Click()里面
Dim&c&As&New&project2.class1
Text2.Text&=&c.Output(Val(Text1.Text))

参考资料

 

随机推荐