扫二维码下载作业帮
拍照搜题，秒出答案，一键查看所有搜题记录
下载作业帮安装包
扫二维码下载作业帮
拍照搜题，秒出答案，一键查看所有搜题记录
输入华氏温度F,转换成摄氏温度C,并用消息框给出提示信息.华氏温度与摄氏温度的转换公式为：&C=5/9*(F-32)提示信息：C&40时,提示“HOT”;30&C&=40时,提示“WARM”;20&C&=30时,提示“ROOM&TEMPERATURE”10&C&=20时,提示“COO\x05L”0&C&=10时,提示“COLD”C&=0时,提示“FREEZING”该题目做完后保存时,窗体文件和工程文件都命名为V3.我的编写是这样的：Private&Sub&Command1_Click()Dim&x&As&Singlex&=&Val(Text1.Text)Text2.Text&=&(5&/&9)&*&(x&-&32)Select&Case&Text2.TextCase&Text2.Text&&&40MsgBox&&HOT&Case&Text2.Text&&=&40&And&Text2.Text&&&30MsgBox&&WARM&Case&Text2.Text&&&20&And&Text2.Text&&=&30MsgBox&&ROOM&TEMPERATURE&Case&Text2.Text&&&10&And&Text2.Text&&=&20MsgBox&&COOL&Case&Text2.Text&&&0&And&Text2.Text&&=&10MsgBox&&cold&Case&Text2.Text&&=&0MsgBox&&FREEZING&End&Select为什么它就没有消息框显示呢?
扫二维码下载作业帮
拍照搜题，秒出答案，一键查看所有搜题记录
Private Sub Command1_Click()Dim x As Singlex = Val(Text1.Text)Text2.Text = (5 / 9) * (x - 32)Select Case Val(Text2.Text)Case Is > 40MsgBox "HOT"Case Is > 30MsgBox "WARM"Case Is > 20MsgBox "ROOM TEMPERATURE"Case Is > 10MsgBox "COOL"Case Is > 0MsgBox "cold"Case Is
为您推荐：
其他类似问题
扫描下载二维码}