vb程序设计课后答案

① 求vb程序设计 课后习题答案

尽量自己去做
如果真不会的话 可以发帖询问
有答案只会让自己更懒惰

② vb程序设计第三版的课后题答案

Private Sub Command1_Click()
FontSize = 15
FontName = "黑体制"
ForeColor = vbRed
Print Text1.Text & "同学，你好！祝你学好vb程序设计"
Command3.Visible = True
Command2.Visible = True
End Sub

Private Sub Command3_Click()
End
End Sub

Private Sub Form_Load()
Label1.Caption = "你好！请输入你的姓名"

Command1.Caption = "确定"
Command2.Caption = "继续"
Command2.Visible = False
Command3.Caption = "结束"
Command3.Visible = False

End Sub

③ VB程序设计 郭贤海主编的课后题答案

http://wenku..com/view/c26aebf1ba0d4a7302763a8e.html

④ VB程序设计教程课后习题答案，铁道出版社

这种没意义的问题让人怎么回答？

⑤ vb程序设计课后习题答案

高等学院程序设计规划教材VB（清华大学出版社，郑阿奇主编）课后答案

⑥ vb程序设计教程答案

先插入三个Textbox 控件 textbox1 textbox2 textbox3用于输入a、b、c三个数
再插入两个label控件label1、label2用于显示最大值与最小值
最后插入一个控件
双击button控件输入以下代码即可
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim a, b, c As Integer
a = CInt(TextBox1.Text)
b = CInt(TextBox2.Text)
c = CInt(TextBox3.Text)
If a > b And b > c Then
Label1.Text = CStr(a)
Label2.Text = CStr(c)
End If
If a > c And c > b Then
Label1.Text = CStr(a)
Label2.Text = CStr(b)
End If
If b > a And a > c Then
Label1.Text = CStr(b)
Label2.Text = CStr(c)
End If
If b > c And c > a Then
Label1.Text = CStr(b)
Label2.Text = CStr(a)
End If
If c > b And b > a Then
Label1.Text = CStr(c)
Label2.Text = CStr(a)
End If
If c > a And a > b Then
Label1.Text = CStr(c)
Label2.Text = CStr(b)
End If
End Sub
可能有更简便的方法

⑦ 《vb程序设计案例教程》课后习题答案

PrivateSubCommand1_Click()
Fori=1To10
Forj=1To10
Ifi*j>=10Andi*j<100Then
Printi*j;
EndIf
Nextj
Nexti
EndSub

⑧ VB程序设计第二版课后实验的答案

答案是要自己做才有的，问别人你还学个神马劲

⑨ 求vb程序设计教程第三版的课后习题答案。。。

建议你把题贴出来还好办，要不为了回答你这个题还去买本书不成~~