请高手赐教移动卡开钻的教程!!!收费站治理绕道、骗子绕道!…

2014年移动卡点播钻教程,附开钻代码大全,成功实战卡QQ蓝钻
2014年移动卡点播钻教程,附开钻代码大全,成功实战卡QQ蓝钻
今天爱上qq吧小编带给大家的是移动点播钻,无成本哦,大家应该知道31号陕西宽带钻就要关闭了,那么只有来看看手机钻咯!
没有蓝钻,我先卡个蓝钻。
首先来发开通业务吧!看下面的短信内容吧!
1.发代码比如超级QQ MQ#QQ号码 到
比如我QQ你就写&& MQ#& 发送到&
2.他会发来是否订购回复y&& 你就回复 y
3.上你QQ看钻上去了么上去了没,看截图,钻上去了哦,下面编辑 0000& 到& 10086&&&
10086会发一些业务&& 你取消你开通的业务& 比如超级QQ& 他是炫酷vip回复1 取消&
你就对应回复数字1&&& ok钻上去了 业务没了
看到没,业务已经取消了,不过话费还在哦! 不过QQ业务还在哦!
手机卡问题& 地区问题& 2个问题让我怎么解释?& 卡不成功了就别问别人怎么办& 你说能怎么办 我还去你们那看看去?不成功就不成功呗。
新手必备代码大全
超级QQ MQ#QQ号码 到
黄钻:HZ#QQ号码发送到
蓝钻:LZ#QQ号码发送到
绿钻:LZ#QQ号码发送到
图书:YD#QQ号码发送到
分享本文到:
上一篇:下一篇:
您可能会对以下内容感兴趣
喜欢就评论一下吧(*^__^*)关于双通手机的疑惑,请高手赐教。_百度知道> 手头有几个问题一直没有解决,请高手赐教我手头有几个问题一直没有解决,请高手赐教1.我用mschar
手头有几个问题一直没有解决,请高手赐教我手头有几个问题一直没有解决,请高手赐教1.我用mschar
yanzideaiqing & &
发布时间: & &
浏览:21 & &
回复:2 & &
悬赏:0.0希赛币
手头有几个问题一直没有解决,请高手赐教!我手头有几个问题一直没有解决,请高手赐教!
 1.我用mschart画出曲线图,但是由于数据多所以横坐标的标签显的模糊不清,这个怎么解决?还有我运行后不想让它可以来回移动,要固定住,这哪里可以设置?
 2.msflexgrid控件的问题:我怎么可以将控件里的所有内容都选中,相当于按下CTRL+A键的功能?还有我要删除选中的多行,我怎么确定哪些行列处在多选状态或者跨行的选中?我要将控件里的内容保存到文本文件中,这有我的一些代码可出错提示说记录长度有误?
  CommonDialog1.Action & = & 2
& Dim & temp & As & String
& Dim & i & As & Integer
& Dim & num & As & Long
& Open & CommonDialog1.FileName & For & Random & As & #1
& For & i & = & 0 & To & MSFlexGrid1.Rows & - & 1
& For & j & = & 0 & To & MSFlexGrid1.Cols & - & 1
& temp & = & temp & & & MSFlexGrid1.TextMatrix(i, & j) & & & Chr(10) & & & Chr(13)
& Next & j
& Next & i
& Put & #1, & , & temp   '这是出错语句,可能需要记录号吧,
& Close & #1
& 再一问题是我这msflexgrid控件中我选中一行,然后我想将这一行复制下来,因我这控件右键有弹出菜单,我要实现里面的一个复制功能,请赐教。!
 3.我的listbox里有内容,我要将这些内容写入文本文件,然后将其再调用进来,可加进来以后都是显示在listbox的一行里面,我想文本文件中一行为listbox里面的一行,请赐教!
& 因问题众多,如能帮解决问题的,一定给分!分少可以再加!
 因刚初学,希望可以和众多高手交流经验。
MSFlexGrid有一个属性是允许用户多行选择的,请打开该选项,就可以进行多行选择,如果设成BOTH的话, 可以进行多行和多列选择。
在MSFlexGrid中的选择好象只能用鼠标进行选择, 用CTRL+A好象实现不了。不过可以在它的KEYDOWN事件中自己写函数。
问题二附加:自己添加一个POPMENU控件, 要做什么自己写就是了。
MSFLEXGRID好象有个SELECT集。(不好意思,手头上没装VB,只能写个大概)
在每行LIST的值末尾强制加个回车就行了。
yanzidengyan & &
10:49:03 & &
& & (0)(0)MSFlexGrid.selection不知道是否有这个属性,我电脑上没装VB,实在记不清楚了。
全选并存储的函数大概可以这样子写
dim sRowVal as string
dim aryFlx() as string
if shift =2 then
if keycode= 'A ' then
dim i,j as integer
with MSFlexGrid
redim aryFlx(.rows) as string
for i=0 to .rows
for j=0 to .cols
'这里按行拼接成串, 存到一个变量里面
sRowVal=sRowVal & .matrix(i,j).text
aryFlx(i)=sRowVal & vbcrlf
PS:具体语法有问题,未测试过yanzifeng520 & &
10:49:03 & &
& & (0)(0)
本问题标题:
本问题地址:
温馨提示:本问题已经关闭,不能解答。
暂无合适的专家
&&&&&&&&&&&&&&&
希赛网 版权所有 & &&

参考资料

 

随机推荐