Question

任何语言编有关星座查询的程序（最好vb）

要交的课题，老师要求任何语言（JAVA.C.VC.VB.C++）编个关于查询的程序当考查，本人像编个星座查询的，但由于几次都失败，所以现在跪求~~~~！！！（能运行不出错的）谢谢...如果能用的话我在追加分.
就是下拉菜单里是星座，查询他的内容。谢谢

Answer 1

这样行不行，界面图如下

Answer 2

'是不是这样的？

Private Sub Combo1_Click()
Dim s As String
Text1.Text = ""
If Dir(Combo1.Text & ".txt") <> "" Then
Open Combo1.Text & ".txt" For Input As #1
Do Until EOF(1)
Line Input #1, s
Text1.Text = Text1.Text & s & vbCrLf
Loop
Close #1
Else
Text1.Text = "暂无资料"
End If
End Sub

Private Sub Form_Load()
With Combo1
.AddItem "魔羯座"
.AddItem "水瓶座"
.AddItem "双鱼座"
.AddItem "牡羊座"
.AddItem "金牛座"
.AddItem "双子座"
.AddItem "巨蟹座"
.AddItem "狮子座"
.AddItem "处女座"
.AddItem "天秤座"
.AddItem "天蝎座"
.AddItem "射手座"
End With
End Sub

'目录下放 “魔羯座.txt 水瓶座.txt ........等 ”

Answer 3

哈哈，太巧了
我这里正好有一个！
以前写的！
你看看截图
http://hi.baidu.com/luobo528/blog/item/a03450c2a61e4635e5dd3b85.html

你说选中星座，然后查询其他信息？
需要查询什么信息？

Answer 4

原理简单,但是我不知道哪几月几日是什么座,哈哈.
把界面做好看点就行了.

Answer 5

要求不够明确哦!~是输入日期查询星座吗???只需要弄三个下拉控件.分别对应年,月,日.查询的时候注意时间用##号包含起来.像#1987-04-11#.其他的没什么问题吧!~