帮我看几道题吧各位,求求急要
vb吧
全部回复
仅看楼主
level 3
榆酒👻 楼主
麻烦啦[泪][泪][泪]
2023年01月05日 01点01分 1
level 3
榆酒👻 楼主
upup
2023年01月05日 01点01分 2
level 2
mod ,+ ,len() ,asc() ,rnd()
2023年01月05日 10点01分 4
第二个,加号也可以有这个功能,但是还有一个专用的&符号;第四个,应该是Val函数,Asc是将一个字符转换成对应的ASCII码
2023年01月05日 11点01分
好的好的感谢🙏
2023年01月06日 00点01分
@初音✨七奈 时间太长了记混了[菜狗]感谢指正
2023年01月13日 13点01分
level 9
三楼回答的那么漂亮怎么被切掉了。
2023年01月06日 05点01分 5
被吞了吧[泪]
2023年01月09日 01点01分
level 1
窗体创建一个label1(文字框)和command1(按钮)控件,label1的caption属性清空,command1的caption属性改为开始计算,双击command1,把下面的代码复制进去。手机输入的乘号和电脑的乘号不一样,记得改。我不清楚消息框是label还是text,如果是text控件自己改一下。
2023年01月06日 09点01分 7
@嘟嘟逸凡 Label1.Caption="总评" & Inputbox("请输入笔试成绩:")×0.6 + Inputbox("请输入上机考试成绩:")×0.4
2023年01月06日 09点01分
消息框是MsgBox函数
2023年01月06日 11点01分
@初音✨七奈 那就 MsgBox"总评" & Inputbox("请输入笔试成绩:")×0.6 + Inputbox("请输入上机考试成绩:")×0.4 窗体只要一个按钮不要文字框
2023年01月06日 12点01分
level 1
最后一题,创建一个label控件和一个text控件。同样清空。
代码如下:
Private Sub Text1_Change()
If val(text1)<60 then
Label1="不及格"
Elseif val(text1)<90 then
Label1="良好"
Else
Label1="优秀"
End if
End Sub
2023年01月06日 09点01分 8
1