求做一份vb大作业

求大神帮做一个vb四则运算测试的程序,是计算机大作业
"Label2.Caption = "请输入结果："Command1.Caption = "下一题"Command2.Caption = "重来"ReDim OP(9)For i = 0 To 9RandomizeOP(i).i = iOP(i).k = Int(Rnd * 4 + 1)OP(i).a = Int(Rnd * 90 + 10)OP(i).b = Int(Rnd * 90 + 10)Select Case OP(i).k Case ...

VB大作业,一个文本编辑器,需要利用组合框来设置字体的类型大小颜色等...
如图。。。

VB大作业关于逆向倍数,请教具体步骤
以下代码涉及控件：Command1、Picture1、Picture2 Sub F(n As Integer, m As Integer, t As Boolean)m = StrReverse(n)t = ((m Mod n) = 0 And m \\ n > 1)End Sub Private Sub Command1_Click()Dim n As Integer, m As Integer, t As Boolean For n = 1000 To 9999 F n, m...

求高手帮我做一个VB大作业,有悬赏!!!
贪吃蛇程序，我可以给你，我自己无聊时，写过一个JS版本的，可以很快改成VB版本，纯属原创。我一个熟练的老程序员，还写了一下午，可见是有难度的。

高分悬赏vb编程作业代码 邮箱 419398151@qq.com
Private Sub Command1_Click()Dim l(2) As Double Dim temp As Double For i = 1 To 3 l(i - 1) = Val(InputBox("请输入第" & i & "条线段长度"))If l(i - 1) > l(0) Then temp = l(0): l(0) = l(i - 1): l(i - 1) = temp Next List1.AddItem "三角形三...

数据库大作业,要求做一个网上书店信息系统,VB+SQL
这个作业什么时候要呢？Private Sub Command1_Click() Dim n As Integer Dim sum As Double sum = 0 n = InputBox("请输入n的值") For i = 1 To n sum = sum + jiecheng(i) Next i Print sumEnd SubPublic Function jiecheng(ByVal n As Integer) As Double...

设计开发一个VB应用小程序 由于是专选课 不需要太复杂的 项目不限...
（输入5个成绩，求合格，不合格人数和平均分）Dim a(1 to 5)As Integer For i=1 to 5 a(i)=Inputbox(" "," ")Next i t=0 For j=1 to 5 If a(j)>=60 then t=t+1 end if s=s+a(j)\/5 text1.text=t text2.text =5-t text3.text =s （用函数了哟，我个人认为不是...

vb.net2008制作一个聊天系统,不用太华丽。能实现双方聊天。有登录、注册...
这个不难的，有Tcp协议，实现方式也比较自由，看你的要求，可以做成C\/S架构，也可以直接连数据库实现。界面可能要稍微花点精力，找免费的第三方皮肤控件还有没有合适的。既然是作业，还是自己查资料，然后自己动手做比较好。供参考，不要你的分。

高分问2个问题,答出一个就送
1：VBScript脚本语言的IF...THEN...或者Select...CASE语句编写一个页面 根据分数变量Grade值输出不同的等级（Grade>=90 :优秀 Grade>=80：良好Grade>=70 中等 Grade>=60 合格 Grade〈60 不及格 ，Grade 初值自定 答案:select case grade case >=90 msgbox("成绩为优秀")case >=80 msgbox("...

医院电子处方病历打印!!就是把一个界面中的所有病人就诊后的信息打印成...
貌似难度不大，莫非楼主是在做vb数据库大作业？看起来挺像作业的，楼主可以尝试另外拖入一个richtextbox，用richtextbox自带的savefile函数试试看，效果不错，具体请搜索相关函数的用法 或者拖入savefiledialog控件，printdialog控件，也很方便，具体函数可以百度一下，毕竟自己尝试对于软件开发的好处是相当多的...