vb作业求助 明天交作业了 急急急 不会啊 求大神帮忙

求大神指教,真心不会做!明天就交作业了,求帮助【vb吧】_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名:今日本吧第个签到,本吧因你更精彩,明天继续来努力!
本吧签到人数:0成为超级会员,使用一键签到本月漏签0次!成为超级会员,赠送8张补签卡连续签到:天&&累计签到:天超级会员单次开通12个月以上,赠送连续签到卡3张
关注:102,805贴子:
求大神指教,真心不会做!明天就交作业了,求帮助收藏
大神不做中学生作业
c1大写c2小写c3复原:dim str as stringPrivate Sub Form_Load()c1.Enabled=truec2.Enabled=truec3.Enabled=Falsetext1.text=&&end sub'========赋值Text1内容给字符串strPrivate Sub Text1_LostFocus()str= Text1.TextEnd Sub'========================private sub c1_click()text1.text=UCase(str)c1.Enabled=Falsec2.Enabled=truec3.Enabled=trueend sub'======================private sub c2_click()text1.text=LCase(str)c1.Enabled=truec2.Enabled=Falsec3.Enabled=trueend sub'===========================private sub c3_click()text1.text=strc1.Enabled=truec2.Enabled=truec3.Enabled=Falseend sub
下面一题Private Sub Combo1_Click()L1.Font = Combo1.TextEnd SubPrivate Sub Combo2_Click()L1.FontSize = Combo2.TextEnd Sub
登录百度帐号推荐应用求大神帮忙,VB作业,明天交【内蒙古财经学院吧】_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名:今日本吧第个签到,本吧因你更精彩,明天继续来努力!
本吧签到人数:0成为超级会员,使用一键签到本月漏签0次!成为超级会员,赠送8张补签卡连续签到:天&&累计签到:天超级会员单次开通12个月以上,赠送连续签到卡3张
关注:134,702贴子:
求大神帮忙,VB作业,明天交收藏
上图有题的要求
登录百度帐号推荐应用急急急,请教今天要交的作业,,【vb吧】_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名:今日本吧第个签到,本吧因你更精彩,明天继续来努力!
本吧签到人数:0成为超级会员,使用一键签到本月漏签0次!成为超级会员,赠送8张补签卡连续签到:天&&累计签到:天超级会员单次开通12个月以上,赠送连续签到卡3张
关注:102,805贴子:
急急急,请教今天要交的作业,,收藏
快试试吧,可以对自己使用挽尊卡咯~◆◆
帮我写下~~
怎么用VB,,表示
随机产生一个20到30之间的正整数,
随机产生一个a到z之间包括a和z的字母
表示5&=X&=15的表达式
表示a和b中有一个不等于c!
快试试吧,可以对自己使用挽尊卡咯~◆◆
本人刚学,弄个你看对不对?Dim&a&as&integer,b&as&integera=int(rnd*30)If&a&=20&Thenb=aPrint&bElseEndEnd&if第一道随机的
第二题Dim&b(1to26)For&i=1to26Temp$=inputbox$(&please&enter&one&letter&one&by&one&)b(i)=tempNext&iA%=int(rnd*26)Print&b(A%)&
A&=5and&A&=15这个都不会,悲哀啊
A&&C&OR&B&&C作假哪!请高手看下第一第二有无更简单的解法!
第二题也可以通过ASCII码来做,对于字母a--z&ASCII码值为97--123.这样就可以通过产生97--123的数字再通过STR函数转换。
希望能与楼上的一起帮到你!他的解法可行。
助人为乐!
快试试吧,可以对自己使用挽尊卡咯~◆◆
第一个20+int(rnd()*10)
随机产生一个20到30之间的正整数
Randomize
msgbox&int(rnd*(30-20+1))&+&20
a到z&a=97&z=122
Randomize
msgbox&Chr(int(rnd*(122-97+1))&+&97)
if&X&=5&and&X&=15&then
1f&a&&c&or&b&&c&then
'**********************************************
【随机数的使用法】
随机数是小于1,并且后面带好几位小数点,因为随机数一般不会用到小数点,所以加上Int&将初始值整数化为&0.&
Randomize&不加上这行,则每次所得到的一批数值都是依&&固定顺序&&排列的&&相同&&乱数.&
Rnd&*&100&这行的正确解释是&从&0&起算,&得到从&0-99&总共100个的随机数.&(但得不到&100&这个数)&
1.从&1&到&100&之间取个随机数,&公式如下:&
公式可以这样理解:&最小值=1&最大值=100&
xx=int(Rnd&*&(最大值-最小值+1))&+&最小值.&代码:&xx=int(Rnd&*&(100-1+1))&+&1&
2.从&10&到&100&之间取个随机数,&公式如下:&
公式可以这样理解:&最小值=10&最大值=100&
xx=int(Rnd&*&(最大值-最小值+1))&+&最小值.&代码:&xx=int(Rnd&*&(100-10+1))&+&10&
3.从&101&到&500&之间取个随机数,&公式如下:&
公式可以这样理解:&最小值=101&最大值=500&
xx=int(Rnd&*&(最大值-最小值+1))&+&最小值.
xx=int(Rnd&*&(500-101+1))&+&101
登录百度帐号推荐应用}

我要回帖

更多关于 vb xmlhttp post提交 的文章

更多推荐

版权声明:文章内容来源于网络,版权归原作者所有,如有侵权请点击这里与我们联系,我们将及时删除。

点击添加站长微信